changing column widths across multi workbooks

[ckelley1020]

Trying to make these changes below across multiple workbooks with 1 worksheet each.

Columns("C:C").Select
Selection.ColumnWidth = 46
Columns("D:D").Select
Selection.ColumnWidth = 25
Columns("E:E").Select
Selection.ColumnWidth = 25
Columns("F:F").Select
Selection.ColumnWidth = 25
Columns("G:G").Select
With Selection
.HorizontalAlignment = xlGeneral
.VerticalAlignment = xlBottom
.WrapText = True
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With

 

[mole999]

have a look at the worksheet.activate event, and place either the code or the link on each you need to change, then every time the page is opened, it will get set

you can change these

Columns("C:C").Select
Selection.ColumnWidth = 46
Columns("D:D").Select
Selection.ColumnWidth = 25
Columns("E:E").Select
Selection.ColumnWidth = 25
Columns("F:F").Select
Selection.ColumnWidth = 25

to

Columns("C:C").ColumnWidth = 46
Columns("D:F").ColumnWidth = 25