Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

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

 

= Мир MS Excel/Перевести код, который действует в word - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Перевести код, который действует в word (Макросы/Sub)
Перевести код, который действует в word
gizon Дата: Понедельник, 20.09.2021, 19:11 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 16
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
Всем доброго времени суток, подскажите, пожалуйста, как перевести этот макрос, который действует в word так, чтобы он действовал из excel и применялся к активному документу word
[vba]
Код
Selection.MoveDown Unit:=wdParagraph, Count:=3, Extend:=wdExtend
[/vba]
Макрос расширяет выделение от заданной точки.


Сообщение отредактировал gizon - Понедельник, 20.09.2021, 19:12
 
Ответить
СообщениеВсем доброго времени суток, подскажите, пожалуйста, как перевести этот макрос, который действует в word так, чтобы он действовал из excel и применялся к активному документу word
[vba]
Код
Selection.MoveDown Unit:=wdParagraph, Count:=3, Extend:=wdExtend
[/vba]
Макрос расширяет выделение от заданной точки.
Автор - gizon
Дата добавления - 20.09.2021 в 19:11
Pelena Дата: Понедельник, 20.09.2021, 19:56 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19403
Репутация: 4555 ±
Замечаний: ±

Excel 365 & Mac Excel
Цитата gizon, 20.09.2021 в 19:11, в сообщении № 1 ()
чтобы он действовал из excel

примерно так
[vba]
Код
Dim wdApp As Object
Set wdApp = CreateObject("Word.Application")
wdApp.Selection.MoveDown Unit:=4, Count:=3, Extend:=1
[/vba]

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение
Цитата gizon, 20.09.2021 в 19:11, в сообщении № 1 ()
чтобы он действовал из excel

примерно так
[vba]
Код
Dim wdApp As Object
Set wdApp = CreateObject("Word.Application")
wdApp.Selection.MoveDown Unit:=4, Count:=3, Extend:=1
[/vba]
Автор - Pelena
Дата добавления - 20.09.2021 в 19:56
gizon Дата: Понедельник, 20.09.2021, 21:37 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 16
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
Pelena, спасибо
 
Ответить
СообщениеPelena, спасибо
Автор - gizon
Дата добавления - 20.09.2021 в 21:37
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Перевести код, который действует в word (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!