Width Property Example

This example sets the width of the embedded chart.

Worksheets("Sheet1").ChartObjects(1).Width = 360

This example expands the active window to the maximum size available (assuming that the window isn’t maximized).

With ActiveWindow
    .WindowState = xlNormal
    .Top = 1
    .Left = 1
    .Height = Application.UsableHeight
    .Width = Application.UsableWidth
End With