Absolute / Relative References

  • Thread starter Thread starter Guest
  • Start date Start date
G

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
 
Just remove the activecell.select statement.

--

HTH

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

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Run Time error 1004 - Pastespecial method of range class failed. 3
Shorten code to apply to all sheets except a few, instead of individually naming them, and later add 3
Formatting stop when reach blank cell 6
SCripting Border in Excel 2
Code debug 5
Format cell and adjacent cell 3
How to rewrite this code? (Second half) 1
Border formatting row of cells 22

Back
Top