TwipsPerPixelX Function

αžαŸ’αžšαž‘αž”αŸ‹β€‹αž…αŸ†αž“αž½αž“β€‹αž’αŸ’αžœαžΈαž”β€‹αžŠαŸ‚αž›β€‹αžαŸ†αžŽαžΆαž„β€‹αž‘αž‘αžΉαž„β€‹αž“αŸƒβ€‹αž—αžΈαž€αžŸαŸ‚αž›Β αŸ”

αžœαžΆαž€αŸ’αž™β€‹αžŸαž˜αŸ’αž–αž“αŸ’αž’ αŸ–

n = TwipsPerPixelX

αžαž˜αŸ’αž›αŸƒβ€‹αžαŸ’αžšαž‘αž”αŸ‹ αŸ–

αž…αŸ†αž“αž½αž“β€‹αž‚αžαŸ‹

αž§αž‘αžΆαž αžšαžŽαŸ αŸ–

Sub ExamplePixelTwips

    MsgBox "" & TwipsPerPixelX() & " Twips * " & TwipsPerPixelY() & " Twips",0,"Pixel size"

End Sub