Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Selection.Borders and replace with new colour procedure
I have populated my worksheet with data from pivot tables. An advantag is that all cells are merged and borders are drawn for me. My questio is whether it is possible to change the colour of all lines and border using a VB procedure. I have recorded a macro below. Perhapss I need t detect all lines/borders that are black then do a replace with ne colour. Code ------------------- With Selection.Borders(xlEdgeRight) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = 6 End With ------------------- Once again thanks -- webby200 ----------------------------------------------------------------------- webby2006's Profile: http://www.excelforum.com/member.php...fo&userid=3674 View this thread: http://www.excelforum.com/showthread.php?threadid=56700 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
find/replace cell borders | Excel Discussion (Misc queries) | |||
SUM CELL BORDERS? (and by colour too?) | Excel Discussion (Misc queries) | |||
Some borders show on the screen as grey, when the colour is black. | Excel Worksheet Functions | |||
Display sum of selection with SelectionChange procedure | Excel Programming |