Mod needed to
1) Convert formulas to values in columns A:F
2)DELETE instead of hide columns G-Z
Here is what I am using
Sheets("Quote Tool").Select
Sheets("Quote Tool").Copy
Columns("G:G").ColumnWidth = 3.86 ' retain col widths ??
Columns("G:G").Select
Range("G2").Activate
ActiveWindow.ScrollColumn = 2
Columns("G:ak").Select
Range("G2").Activate
Selection.EntireColumn.Hidden = True
Selection.Delete = True
ActiveWindow.ScrollColumn = 1
1) Convert formulas to values in columns A:F
2)DELETE instead of hide columns G-Z
Here is what I am using
Sheets("Quote Tool").Select
Sheets("Quote Tool").Copy
Columns("G:G").ColumnWidth = 3.86 ' retain col widths ??
Columns("G:G").Select
Range("G2").Activate
ActiveWindow.ScrollColumn = 2
Columns("G:ak").Select
Range("G2").Activate
Selection.EntireColumn.Hidden = True
Selection.Delete = True
ActiveWindow.ScrollColumn = 1