Цитата kontox:
представьте, что есть 55 листов, на каждом текст в таблице, в ручную (резинкой) это опупеть можно удалять. »
|
Представил
![Wink](images/smilies/wink.gif)
. Затем нажал «Alt-F11», «Ctrl-G», в окно «Immediate» вставил строку:
Код:
![Выделить весь код](images/misc/selectcode.png)
For i = ThisDocument.Tables.Count To 1 Step -1 : ThisDocument.Tables.Item(i).Delete : Next i
Стал в конец вставленной строки, нажал «Enter».