Absolute / Relative References

[Guest]

Hi

I'd like to start a process on 6 adjacent highlighted cells but "ActiveCell"
just changes the top left cell - how can I change this code to include all 6?

TIA

Tim

ActiveCell.Select
Selection.Font.Italic = True
With Selection.Borders(xlEdgeTop)
.LineStyle = xlDouble
.Weight = xlThick
.ColorIndex = xlAutomatic

 

[Guest]

hi,

Range(activecell, activecell.offset(0,6)).select

FSt1

 

[Bob Phillips]

Just remove the activecell.select statement.

--

HTH

RP
(remove nothere from the email address if mailing direct)