Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Lastrow of a range
Hi all, I have a macro which deletes rows in a report with multiple borders
where it deletes blank rows to compact the print area. Unfortunately one of the cells loses its bottom border when the row above is deleted. The cell is the last cell in the range V2:V20 and there is a similar range below it in row V. The number of rows in the range after deletion is dynamic so I cannot use an absolute reference. I have added the code I have tried below but have run out of ideas. Any help would be appreciated. Sub filterrows1() 'Dim myrange As Range Cells.Select With Selection Rows("2:200").Select .AutoFilter Field:=30, Criteria1:="1" Selection.EntireRow.Delete Shift:=xlUp ActiveSheet.ShowAllData ' Set myrange = Range("V2:V20") ' myrange.Lastrow.Select Range(Cells(firstrow, firstcolumn), Cells(Lastrow, lastcolumn)).Select ' LastRow = .Cells(Range("V2:V20").End(xlUp)) With Selection.FormatConditions(1).Borders(xlBottom) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = xlAutomatic End With Thanks Davie |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
HELP Lastrow Range | Excel Discussion (Misc queries) | |||
diff between used range row and lastrow | Excel Programming | |||
Defining Named Range for Lastrow in a specific column | Excel Discussion (Misc queries) | |||
Lastrow in Range | Excel Discussion (Misc queries) | |||
Go to lastrow using other column's lastrow | Excel Programming |