Window.PointsToScreenPixelsX (Excel)

Converts a horizontal measurement from points (document coordinates) to screen pixels (screen coordinates). Returns the converted measurement as a Long value.

PointsToScreenPixelsX (Points)

Points: The number of points horizontally along the top of the document window, starting from the left.

With ActiveWindow 
 lWinWidth = _ 
 .PointsToScreenPixelsX(.Selection.Width) 
 lWinHeight = _ 
 .PointsToScreenPixelsY(.Selection.Height) 
End With