I am formatting a couple of nonadjacent columns the same way. Is there a way that I can select them together, so I only have to make the format chages one time?
Thanks
Matt
E.g
Columns("A:A").Select
With Selection.Font
etc etc
End With
Columns("D"Select
With Selection.Font
etc ect
End With
etc etc
[VBA]Worksheets(1).Range("a:a,c:c,e:e").Font.Bold = True[/VBA]
or:
[VBA]Worksheets("Sheet1").Range("A:A,C:C,F:F").Font.Bold = True[/VBA]
Steve
"Nearly all men can stand adversity, but if you want to test a man's character, give him power."
-Abraham Lincoln
You can also copy and PasteSpecial formats.
MVP (Excel 2008-2010)
Post a workbook with sample data and layout if you want a quicker solution.
To help indent your macros try Smart Indent
Please remember to mark threads 'Solved'
Posting Permissions
Reply With Quote
