Window.PointsToScreenPixelsX (Excel)

Convierte una medida horizontal de puntos (coordenadas de documento) en píxeles de pantalla (coordenadas de pantalla). Devuelve la medida convertida expresada como un valor Long.

PointsToScreenPixelsX (Points)

Points: Número de puntos en horizontal a lo largo de la parte superior de la ventana del documento, empezando por la izquierda.

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