| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Macro formatting last row
Brilliant! That did it -- thanks so much :-)
"Gary''s Student" wrote: Just resize it: Sub dural() lastrow = Cells(Rows.Count, "B").End(xlUp).Row Range("B" & lastrow).Resize(1, 3).Select With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous .Weight = xlMedium .ColorIndex = xlAutomatic End With End Sub -- Gary''s Student - gsnu201001 "Erin" wrote: I tried posting this question earlier and received an error message, so I apologize if this question shows up twice. I'm trying to insert a bottom border on a range of cells, but I can't figure out the syntax for the range. Here's what I currently have: Range("B" & lastrow).Select With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous .Weight = xlMedium .ColorIndex = xlAutomatic End With This works for column B, but I want the border to also be on column C and D. I could add the same code for each column separately, but I'm wondering if there is a way to do the entire range (B:D) at one time. Thanks! |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| formatting macro help | Excel Discussion (Misc queries) | |||
| Formatting using Macro | Excel Discussion (Misc queries) | |||
| Formatting for a Macro | Excel Discussion (Misc queries) | |||
| Formatting via a macro | Excel Discussion (Misc queries) | |||
| Conditional Formatting in Macro | Excel Discussion (Misc queries) | |||
Hybrid Mode
