how to edit column width in excel 2007 by vba code example

Example: column width vba

With Worksheets("Sheet1").Columns("A") 
 .ColumnWidth = .ColumnWidth * 2 
End With