Исправить ошибку в коде VBA. - Помощь студентам

NitriNKa · 29.04.2009, 20:57

Помогите исправить.

Код:

Sub Таблица()
' Таблица Макрос
    With Selection.Tables(1)
        .Style = "Классическая таблица 2"
        .ApplyStyleHeadingRows = True
        .ApplyStyleLastRow = True
        .ApplyStyleFirstColumn = True
        .ApplyStyleLastColumn = True
    End With
End Sub

Выделяет ошибку в строке : With Selection.Tables(1). Что это значит???

Serge_Bliznykov · 29.04.2009, 22:15

ну, например, потому что это код для VBA MS Word, а Вы пытаетесь запустить его где-то ещё...

p.s. кстати, у меня этот код в MS Word 2003 отработал без ошибок.

Лукманов Александр · 29.04.2009, 22:22

А вы не забываете перед выполнением макроса, выделить таблицу?

29.04.2009, 20:57	#1
NitriNKa Пользователь Регистрация: 29.03.2009 Сообщений: 45	Исправить ошибку в коде VBA. Помогите исправить. Код: `Sub Таблица() ' Таблица Макрос With Selection.Tables(1) .Style = "Классическая таблица 2" .ApplyStyleHeadingRows = True .ApplyStyleLastRow = True .ApplyStyleFirstColumn = True .ApplyStyleLastColumn = True End With End Sub` Выделяет ошибку в строке : With Selection.Tables(1). Что это значит???

29.04.2009, 22:22	#3
Лукманов Александр работа не волк.... Форумчанин Регистрация: 09.06.2008 Сообщений: 337	А вы не забываете перед выполнением макроса, выделить таблицу? Цель, для которой требуются неправые средства, не есть неправая цель.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
исправить ошибку на VBA	NitriNKa	Помощь студентам	1	08.04.2009 22:59
Ошибка в коде Сортировщика! Ргается! помогите исправить!	sting	Помощь студентам	2	24.11.2008 23:21
Памагите найти ошибку в коде...С++	Goblin	Помощь студентам	1	13.05.2008 18:15
использование SQL запросов в коде VBA	b00s	Microsoft Office Access	3	26.04.2008 13:40
Помогите исправить ошибку в коде...	prizrak1390	Общие вопросы Delphi	4	26.04.2008 13:19

29.04.2009, 22:15	#2
Serge_Bliznykov Старожил Регистрация: 09.01.2008 Сообщений: 26,229	ну, например, потому что это код для VBA MS Word, а Вы пытаетесь запустить его где-то ещё... p.s. кстати, у меня этот код в MS Word 2003 отработал без ошибок.