Hi Al,
Could you please help to tell me what is wrong in this code?
I would like to use autofill on a sheet, where only the first column contains function.
Thanks a lot
Could you please help to tell me what is wrong in this code?
I would like to use autofill on a sheet, where only the first column contains function.
Code:
ActiveWorkbook.Sheets("Numbers").Select
ActiveSheet.Unprotect (password)
element = Range("A3").End(xlDown).Row
Range("A3:A" & element).Select
Range("A3").Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.AutoFill Destination:=Range("A3:A" & element), Type:=xlFillDefault
Range("A3").Select
ActiveSheet.Protect (password), DrawingObjects:=True, Contents:=True, Scenarios:=True