Why am I getting this error for the "input" sheet?
Protected sheet, password "1"
Sub unshade()
'
' unshade Macro
'
'
Range("A1:AD96").Select
ActiveWindow.SmallScroll Down:=-114
Range("A1:AD96").Select
Range("AB1").Activate
With Selection.Interior
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorDark1
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Cells.FormatConditions.Delete
End Sub
Presumably, some cells are unlocked for data entry and others are locked to protect headings and formulas. You'll get the error if/when your code attempts to format the cells. UnProtect the sheet before formatting and protect it again afterwards.
Trevor Shuttleworth - Retired Excel/VBA Consultant
I dream of a better world where chickens can cross the road without having their motives questioned
'Being unapologetic means never having to say you're sorry' John Cooper Clarke
Thank you!
You're welcome.
If you are satisfied with the solution(s) provided, please mark your thread as Solved.
New quick method:
Select Thread Tools-> Mark thread as Solved. To undo, select Thread Tools-> Mark thread as Unsolved.
Or you can use this way:
How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save
You may also want to consider thanking those people who helped you by clicking on the little star at the bottom left of their reply to your question.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks