Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Adjusting Column Widths

Sub AdjustColumns()     Dim ws As Worksheet     On Error Resume Next     Set ws = ThisWorkbook.Worksheets("Sheet1")     ws.Columns.ColumnWidth = 12     Set ws = Nothing End Sub