Hello Everyone
I have created this basic VBA but I am stuck at the last stage, which meant to basically autofill to the last Row
Can you help please ?
Thanks
Sub ConditionalFormatting()
Sheets("ageing").Select
Range("A1").End(xlToRight).Offset(0, 1).Select
ActiveCell.FormulaR1C1 = "% Provision"
Selection.Font.Bold = True
Selection.Interior.Color = 5
Selection.Font.Color = vbWhite
Selection.Offset(1, 0).Select
Selection.FormulaR1C1 = "=RC[-1]/RC[-9]"
Selection.NumberFormat = "0%"
Selection.AutoFill Destination:= Range("C" & Rows.Count).End(xlUp).Row)
End Sub
Bookmarks