Гость
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Word 2016. Не работает макрос / 4 сообщений из 4, страница 1 из 1
06.12.2016, 01:31
    #39360941
BlackEric
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word 2016. Не работает макрос
Есть макрос, для выделения таблиц, который отлично работает в 2010 ворде:

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Sub selecttables()
Dim mytable As Table
Application.ScreenUpdating = False

For Each mytable In ActiveDocument.Tables
mytable.Range.Editors.Add wdEditorEveryone
Next
ActiveDocument.SelectAllEditableRanges (wdEditorEveryone)
ActiveDocument.DeleteAllEditableRanges (wdEditorEveryone)
Application.ScreenUpdating = True
End Sub



В 2016 же он не выделяет таблицы и при повторном запуске ворд падает:

Сигнатура проблемы:
Имя события проблемы: APPCRASH
Имя приложения: WINWORD.EXE
Версия приложения: 16.0.4417.1000
Отметка времени приложения: 5784fe59
Имя модуля с ошибкой: StackHash_808b
Версия модуля с ошибкой: 6.1.7601.18247

Это баг 2016 ворда? Можно ли это как-нибудь обойти?
...
Рейтинг: 0 / 0
06.12.2016, 14:28
    #39361220
BlackEric
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word 2016. Не работает макрос
Хм, в 2013 офисе тоже не выделяются все таблицы и ворд переодически падает.
...
Рейтинг: 0 / 0
06.12.2016, 15:01
    #39361261
Казанский
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word 2016. Не работает макрос
BlackEric,
попробуйте закомментировать/удалить строку с ...SelectAll... - может, диапазон слишком сложный для выделения.
...
Рейтинг: 0 / 0
06.12.2016, 15:02
    #39361266
BlackEric
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Word 2016. Не работает макрос
Казанский,

Да, падает именно на этой строке, но это простой, одностраничный текстовый документ на 4 таблицы.
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Word 2016. Не работает макрос / 4 сообщений из 4, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]