Ошибка выполнения 4605: метод или свойство ShowHiddenText недоступны, так как эта команда недоступна для чтения

Question

Я довольно новичок в использовании элементов управления контентом и создаю форму Word для работы. В текущей форме скрыт текст справки для элементов управления контентом (у меня включена опция отображения скрытых элементов управления на моем компьютере); однако я хочу убедиться, что пользователи формы могут видеть эти элементы управления при открытии формы. Проблема в том, что когда текст справки не скрыт, он печатается на форме. Есть ли способ установить элементы управления, чтобы текст справки не печатался, но он все еще был виден пользователям, когда они открывали форму?

Я попытался использовать следующий код, но столкнулся с проблемами с ним. Код работал на моем компьютере, но когда коллега проверил его, он вызвал сообщение об ошибке, и я не мог понять, почему. Была выделена единственная строка кода, но поскольку код работал на моем компьютере, я не уверен, как это исправить (я также очень плохо знаком с Visual Basic).

Sub AutoOpen()

    ActiveWindow.View.ShowHiddenText = True

End Sub

Я надеялся, что когда другой пользователь откроет документ, он увидит скрытый текст, как если бы он не был скрыт; однако, когда другой пользователь открывает документ, он получает эту ошибку:

"Ошибка времени выполнения '4605':

Метод или свойство ShowHiddenText недоступны, так как команда недоступна для чтения. "

Answer 1

Сообщение об ошибке возникает из-за того, что Word открывает документ в режиме чтения, а не в режиме печати.Это часто имеет место, например, когда документ открывается по электронной почте.

Добавление следующей строки перед строкой для скрытого текста должно помочь, поскольку это заставит документ переключиться в представление «Макет печати»:

ActiveWindow.View = wdPrintView

Итак

Sub AutoOpen()
  Dim vw as View
  Set vw= ActiveWindow.View
  vw = wdPrintView
  vw.ShowHiddenText = True
End Sub