Funció TwipsPerPixelY

Torna el número de twips que representen l'alçada d'un píxel.

Sintaxi:


n = TwipsPerPixelY

Valor de retorn:

Enter

Exemple:


Sub ExamplePixelTwips
    MsgBox "" & TwipsPerPixelX() & " Twips * " & TwipsPerPixelY() & " Twips",0,"Mida de píxel"
End Sub

Ens cal la vostra ajuda!