unprotect file autofill and protect with macro

[Virgo_anil]

Hi

I am using below formula to unprotect, autofill and protect sheet in excel however it is giving error message.

Sub sbUnProtectSheet()


ActiveSheet.Unprotect "9999"


Set SourceRange = ActiveSheet.Range("B10:H10")
Set FillRange = ActiveSheet.Range("B11:H39")
SourceRange.AutoFill.FillRange
Range("B11").Select


ActiveSheet.Protect "9999", True, True


End Sub

Majority of the cells are blank in sourcerange however I want it to blank out if user enters incorrect details and then click on fix errors.

Can someone please guide on priority basis?

Thanks
Anil

 

[Fluff]

Duplicate https://www.mrexcel.com/forum/excel-questions/1102139-urgent-help-vba-macro_need-guidance.html

Please do not post the same question multiple times. All clarifications, follow-ups, and bumps should be posted back to the original thread.
Per forum rules, posts of a duplicate nature will be locked or deleted (rule 12 here: Forum Rules).