Função TwipsPerPixelY
Retorna o número de twips que representam a altura de um pixel.
Sintaxe:
n = TwipsPerPixelY
Valor de retorno:
Integer
Exemplo:
Sub ExamplePixelTwips
MsgBox "" & TwipsPerPixelX() & " Twips * " & TwipsPerPixelY() & " Twips",0,"Pixel size"
End Sub