Sir,
I need vba code to fill down data in Range in a table format in Sheet1 A10,B10,E10,F10 based on last used row in Column D till one row above the last used row. The code should loop to next table which is dynamic in range.
Dim LastRow As Long
On Error Resume Next
LastRow = Range("D" & Rows.Count).End(xlUp).Row
Range("A10:F" & LastRow).SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"
End With
I need vba code to fill down data in Range in a table format in Sheet1 A10,B10,E10,F10 based on last used row in Column D till one row above the last used row. The code should loop to next table which is dynamic in range.
Dim LastRow As Long
On Error Resume Next
LastRow = Range("D" & Rows.Count).End(xlUp).Row
Range("A10:F" & LastRow).SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"
End With