VBA Excel 2019: отключить гиперссылки для книги для всех пользователей при открытии

#excel #vba #hyperlink

#excel #vba #гиперссылка

Вопрос:

У меня есть общая база данных контактов с их адресами электронной почты и веб-страницами, но я не хочу, чтобы они были связаны гиперссылками. Я отключил АвтоФормат для гиперссылок и удалил их все из книги для себя, но они появляются для других пользователей.

Есть ли способ отключить гиперссылки или автоформатирование для них, когда другие пользователи открывают книгу?

Для другой книги у меня есть автоматическое включение итеративного вычисления при открытии, но я не уверен, как и можно ли отключить гиперссылку таким же образом?

 Dim SaveIteration As Boolean

Private Sub Workbook_Open()
SaveIteration = Application.Iteration
Application.Iteration = True
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Iteration = SaveIteration

End Sub
 

Ответ №1:

Используйте событие открытия рабочей книги, чтобы вызвать подраздел, который перебирает все листы, перебирает ссылки на всех листах с помощью объекта hyperlinks, затем используйте свойства отдельных объектов гиперссылок, чтобы делать то, что вы хотите. например, используйте Range свойство и преобразуйте ссылку в обычный текст, удалите ее, что угодно.