GefObject.Width (property)

Gets and sets the width of the object.
Syntax: long = object.Width
object.Width = long
Description: For GefObject, it returns the width of the object in TWIPS. Note: GefScreen.Width returns the width of the screen's window in pixels. GefScreen.Object.Width returns the size of the screen object in TWIPS regardless of the window size.

Example:

Sub GefObject_Width()
    
    Dim oCimObj As GefObject
    
    Set oCimObj = CimGetObject
    
    MsgBox "The Width of the object is " & _
        oCimObj.Width & " in twips"
    MsgBox "The Width of the object is " & _
        (oCimObj.Width / 20) & " in points"
    
End Sub