Objects(<object name or index>).Width = Value
Where Value determines the width of the object in the measurement units of the active template.
The Object.Width property sets or returns the width of a box, ellipse, text, rich text, or picture object.For text objects, the width property only applies to text that is formatted as a paragraph.