Auto sorting in excel

I think you answered your own question.
The sheet needs to be unprotected before you can sort.

ActiveSheet.Unprotect
'your code here
ActiveSheet.Protect

if your sheet has a passwrod
expression.Unprotect(Password)
Then protect it with the same password