Ошибка времени выполнения '1004' Этот файл уже открыт в Защищенный вид

Question

У меня есть макрос, который считывает данные из другого файла Excel. Если файл уже открыт пользователем, Excel пытается повторно открыть файл - это пока прекрасно.

Однако, если файл открыт в режиме защищенного просмотра, то макрос останавливается на этой линии:

Workbooks.Open Filename:=Sheets("Control Sheet").Range("C6").value 

с ошибкой:

Run-time error '1004' This file is already open in Protected View 

Как я могу это исправить?

Answer 1

Для чтения я рекомендую решение Скотт Гольцман в:

Workbooks.Open Filename:="FileName", ReadOnly:=True 

В остальных случаях вы можете удалить защищенный режим с помощью:

Do While Application.ProtectedViewWindows.Count > 0 
    Application.ProtectedViewWindows(1).Edit 
Loop