проблем с макрос в ексела

имам един макрос в ексела който когато го пусна да се изпълнява стига до някъде и дава следното грешка с текст "400" което на мен нищо не ми говори.

като пусна да го дебъгвам стига до някъде и дава следното съобщение

Run-time error '1004':

Application-defined or object-defined error


някой има ли идея къв може да е проблема?

ето часто от кода и момента на който дава грешката

Sheets("ОПР").Select
ActiveSheet.Unprotect ("****")
Columns("A:D").Select
Range("D2").Activate - eто тук дава грешката, което е за мен е мн. странно

благодаря на всички които се опитат да помогнат

Аз съвсем малко се занимавам с VBA, но все по спомени мисля, че би трябвало да е така:

Sheets("ОПР").Activate
...
Range("D2").Select

или ако продължава да дава грешка на този ред:

Worksheets("ОПР").Range("D2").Select

Не съм сигурен. Пробвай вариантите.

Замени звездичките в реда ActiveSheet.Unprotect ("****") със истинската парола, или го използвай без аргумент за да те попита за парола. Иначе 1004 си е грешка за невалидна парола, нещо от сорта On Error, или в настройките не показва грешката на правилното място.