Returns or sets the width of the specified object, in points. Read-only Single for the object, read/write Single for all other objects.

Syntax

expression.Width

expression A variable that represents a ShapeRange object.

Return Value
Single

Example

This example arranges windows one and two horizontally; in other words, each window occupies half the available vertical space and all the available horizontal space in the application window's client area. For this example to work, there must be only two document windows open.

Visual Basic for Applications 
Windows.Arrange ppArrangeTiled ah = Windows(1).Height ' available height aw = Windows(1).Width + Windows(2).Width ' available width With Windows(1) .Width = aw .Height = ah / 2 .Left = 0 End With With Windows(2) .Width = aw .Height = ah / 2 .Top = ah / 2 .Left = 0 End With

This example sets the width for column one in the specified table to 80 points (72 points per inch).

Visual Basic for Applications 
ActivePresentation.Slides(2).Shapes(5).Table.Columns(1).Width = 80

See also: