Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Excel Constant for Border All Around Cell
Hi.
I'm creating headings dynamically in Excel and am placing a border around each cell as it's created. I'd like to be able to border a cell with just 1 Excel constant instead of having to use 4 - one for each side. Since adding borders, the program has slowed down considerably. Is there a more efficient way than the one I'm using now? '*** Put a border around the heading just added wshFIC.Cells(iHeadingLine, lLastColumn).Select With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous .Weight = xlThin End With With Selection.Borders(xlEdgeTop) .LineStyle = xlContinuous .Weight = xlThin End With With Selection.Borders(xlEdgeLeft) .LineStyle = xlContinuous .Weight = xlThin End With With Selection.Borders(xlEdgeRight) .LineStyle = xlContinuous .Weight = xlThin End With '*** Change the font for just this cell With Selection.Font .Name = "Arial Narrow" .Bold = True .Size = 9 End With With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter .Interior.ColorIndex = 37 End With TIA. Rita |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
border on last cell of page effects border on beginning cell of ne | Excel Discussion (Misc queries) | |||
excel uses what technique to keep a cell reference constant when | Excel Discussion (Misc queries) | |||
cell border colors in Excel | Excel Discussion (Misc queries) | |||
cell border in excel | Excel Discussion (Misc queries) | |||
Changing the border of one cell s/n change the border of adjacent | Excel Discussion (Misc queries) |