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