Открыть книгу для чтения для редактирования

Я пытаюсь автоматически обновлять файл на сервере, доступный для всех, только для чтения. Редактирование доступно только для нескольких человек. Поэтому он защищен паролем, но только для редактирования, а не для открытия.

Я попытался написать макрос, чтобы открыть защищенный паролем файл, но это работает только для файлов, которые защищены от открытия. Я попробовал следующий код, поскольку другие предположили, что это может помочь включить displayalerts и / или игнорировать, но это не помогает. Я продолжаю получать всплывающие окна, в которых говорится: «Введите пароль для доступа к записи или открыть только чтение». Я даже попробовал SendKeys ввести пароль, но всплывающие подсказки тоже.

Любые предложения, которые я, возможно, не имею?

Application.DisplayAlerts = False Workbooks.Open Filename:="test.xlsx", IgnoreReadOnlyRecommended:=True, Password:="password", ReadOnly:=False Application.DisplayAlerts = True 

 Sub test() Application.ScreenUpdating = False Application.DisplayAlerts = False Dim wb As Workbook Dim fFilename As String fFilename = "C:\Documents and Settings\Desktop\test.xlsx" SetAttr fFilename, vbNormal Set wb = Workbooks.Open(fFilename, Password:="test") wb.Worksheets("sheet1").Range("A1").Value = "Hello" wb.Close SaveChanges:=True ' It will set the File back to Read only SetAttr fFilename, vbReadOnly End Sub 
  • Как защитить паролем файл ZIP на Java?
  • Лучший способ защитить код Excel VBA?
  • Excel: защитить пароль, не совместимый с паролем VBA?
  • Проверка безопасности VBA Excel VBA
  • VBA: UserInterfaceOnly: = True не работает для Checkbox LinkedCell
  • Таким образом, мой пароль проекта Excel-VBA можно легко взломать ... Какие существуют другие варианты?
  • Недопустимая внешняя процедура - новая для кодирования
  • Отключить диалог пароля при открытии защищенного паролем файла Excel
  • Кнопка Set to Unlocked
  • Защита паролем листов от просмотра
  • Как подключить Excel с заблокированной базой данных из vba?
  • Давайте будем гением компьютера.