LinkFormat.Update: неверный запрос. Презентация не может быть изменена

Question

Я использую этот код для обновления всех своих ссылок в документе Powerpoint:

Sub UpdateExcelLinks()

For Each sld In ActivePresentation.Slides

    For Each sh In sld.Shapes

        If sh.Type = msoLinkedOLEObject Then

            sh.LinkFormat.Update

         End If

    Next
Next
MsgBox "Links uppdated"
End Sub

Он работает нормально, пока я не установлю документ Powerpoint в режимах Окончательный / Только чтение или Режим ограниченного доступа.

Тогда он больше не работает, и все, что я получаю, это сообщение:

Ошибка времени выполнения '-2147188160 (80048240)': LinkFormat.Update: Неверный запрос.Невозможно изменить презентацию.

Что можно сделать, чтобы мой документ Powerpoint мог обновляться в этих режимах?