There's more than just that problem with protected sheet; to solve the 2 that I came across:
1. Add the following line at the start of both
ResetMe and
blah:
Code:
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFormattingCells:=True, AllowFormattingColumns:=True, AllowFormattingRows:=True, AllowInsertingColumns:=True, AllowInsertingRows:=True, AllowInsertingHyperlinks:=True, AllowDeletingColumns:=True, AllowDeletingRows:=True, AllowSorting:=True, AllowFiltering:=True, AllowUsingPivotTables:=True, UserInterfaceOnly:=True
2. remove the line
Code:
cll.Errors(xlUnlockedFormulaCells).Ignore = True
from both macros (it seems the green error triangles that Excel puts in are only visible when the sheet is unprotected).
Separately, for PrintTable to work properly you need to change
Destn.Resize(, 8) = dictItem
to:
Destn.Resize(, 10) = dictItem