Is there any way to scale UserForm according to screen scaling?

Name:  iasLd.png
Views: 97
Size:  21.0 KB

This code works for screen resolution, but it does not recognize screen scaling:


Code:
    With Me
       .StartUpPosition = 1
       .Width = Application.Width * 0.85
       .Height = Application.Height * 0.85
       .Left = Application.Left + (Application.Width * 0.85) \ 2
       .Top = Application.Top + (Application.Height * 0.85) \ 2
    End With
Asked also here: https://stackoverflow.com/questions/...screen-scaling