выделение ячеек в таблице word из VBA excel - Microsoft Office Excel

Святой Дьявол · 18.09.2010, 12:50

добрый день! работаю из vba excel с документом word. Мне требуется в таблице выделить диапазон ячеек и вставить в них значения из excel. пишу:

Код:

wa.Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend
    wa.Selection.MoveDown Unit:=wdLine, Count:=j, Extend:=wdExtend

где j=45. в результате почему то по вертикали выделяется только 4 ячейки, пробовал другие значения j, при j<4 все работает, но при j>4 выделяется почему то все равно только 4 ячейки. Может быть кто то сталкивался с такой проблемой?

R Dmitry · 18.09.2010, 12:59

Цитата:

Сообщение от Святой Дьявол

добрый день! работаю из vba excel с документом word. Мне требуется в таблице выделить диапазон ячеек и вставить в них значения из excel. пишу:

Код:

wa.Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend
    wa.Selection.MoveDown Unit:=wdLine, Count:=j, Extend:=wdExtend

где j=45. в результате почему то по вертикали выделяется только 4 ячейки, пробовал другие значения j, при j<4 все работает, но при j>4 выделяется почему то все равно только 4 ячейки. Может быть кто то сталкивался с такой проблемой?

А вы попробуйте обратится к самой таблице в Word
With wa.Selection.Tables(1)
и уже в таблице работать

Святой Дьявол · 18.09.2010, 13:41

Цитата:

Сообщение от R Dmitry

А вы попробуйте обратится к самой таблице в Word
With wa.Selection.Tables(1)
и уже в таблице работать

Спасибо за помощь R Dmitry, все получилось!

Megokelvin · 11.11.2022, 22:28

Дружище, поделись кодом будь добр

macomics · 11.11.2022, 23:17

Лет через 12 пришлет свой вариант.

Megokelvin · 12.11.2022, 00:57

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

если можешь -- скажи, как вставить скопированный диапазон из excel в определённый диапазон Word?

18.09.2010, 12:50	#1
Святой Дьявол Пользователь Регистрация: 19.08.2009 Сообщений: 34	выделение ячеек в таблице word из VBA excel добрый день! работаю из vba excel с документом word. Мне требуется в таблице выделить диапазон ячеек и вставить в них значения из excel. пишу: Код: `wa.Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend wa.Selection.MoveDown Unit:=wdLine, Count:=j, Extend:=wdExtend` где j=45. в результате почему то по вертикали выделяется только 4 ячейки, пробовал другие значения j, при j<4 все работает, но при j>4 выделяется почему то все равно только 4 ячейки. Может быть кто то сталкивался с такой проблемой? Не бойся делать то, чего не умеешь. Помни! ковчег был построен любителем, профы построили Титаник...

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
выделение нескольких ячеек в VBA	tohdom	Microsoft Office Excel	22	27.06.2012 05:48
VBA Word,VBA Excel решить 2 задачи	fafolo4ka	Фриланс	6	05.03.2012 01:15
VBA в Excel & Word	vfayans	Помощь студентам	0	21.06.2010 12:25
Связи ячеек в таблице MS Excel	LIEN	Microsoft Office Excel	2	29.09.2009 09:52
Как средствами VBA экспортировать данные из Excel в Word?	Pavel_Ine	Microsoft Office Excel	3	20.04.2009 14:14

11.11.2022, 22:28	#4
Megokelvin Регистрация: 11.01.2017 Сообщений: 7	Дружище, поделись кодом будь добр

11.11.2022, 23:17	#5
macomics Участник клуба Регистрация: 17.04.2022 Сообщений: 1,589	Лет через 12 пришлет свой вариант.

12.11.2022, 00:57	#6
Megokelvin Регистрация: 11.01.2017 Сообщений: 7	хахах, то чувство когда люди приходят на форум, что бы пошутить, а не поделиться опытом если можешь -- скажи, как вставить скопированный диапазон из excel в определённый диапазон Word?