Есть 2 книги vba
Из первой нужно обратиться к 2-запаролена, пароль известен, и заменить в её модуле1 строку.


'''''''
For wnd = 1 To Application.VBE.Windows.Count
If Application.VBE.Windows(wnd).Caption Like "Module1 (Code)*" Then
MsgBox (Application.VBE.Windows(wnd).Caption)
Application.VBE.Windows(wnd).SetFocus
Exit For
End If
Next
SendKeys "{Right}", True
SendKeys "11111" & "~", True

'
Посмотрела, передором окон я не могу обратиться к запароленному проекту.
ActiveWorkbook.VBProject.VBComponents("module1").CodeModule.ReplaceLine 402, "___")
вот на последней строке выпадает с ошибкой, что обращаюсь к запароленному проекту.

Да не надо мне нафиг пароль снимать, мне изменения в проект внести нужно.
Зло берет, в незащищенный проект изменения на раз-два вносятся, а в защищенном даже окна проекта неактивировать.

2 Старый ворчун
ОГРОМНОЕ СПАСИБО!