PDA

View Full Version : Solved: Selecting Non-adjacent columns



mferrisi
04-05-2007, 01:16 PM
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:D"Select
With Selection.Font
etc ect
End With

etc etc

Charlize
04-05-2007, 01:50 PM
Worksheets(1).Range("a:a,c:c,e:e").Font.Bold = True

lucas
04-05-2007, 01:53 PM
or:
Worksheets("Sheet1").Range("A:A,C:C,F:F").Font.Bold = True

mdmackillop
04-05-2007, 01:55 PM
You can also copy and PasteSpecial formats.