Макрос удаления закладок.

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Макрос удаления закладок. - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: _Boroda_, китин

Макрос удаления закладок. (Удалить все закладки одним макросом.)

Макрос удаления закладок.

Otter

Дата: Четверг, 06.09.2018, 09:40 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 174

Репутация: 0 ±

Замечаний: 0% ±

Excel 2019, Word 2019

Бывает в документе очень много закладок например в прикрепленном файле. Нужен код по удалению всех закладок в документе. Пожалуйста помогите решить задачу.Такой код не работает
[vba]

Код

Sub Удалить_закладки()
'
' Удалить все закладки
'
  With ActiveDocument.Bookmarks
        .DefaultSorting = wdSortByName
        .ShowHidden = True
    End With
    ActiveDocument.Bookmarks.Delete
End Sub

[/vba]