Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
zics
0 / 0 / 0
Регистрация: 15.11.2018
Сообщений: 32
1

Взаимопонимание Word и Excel

12.10.2019, 01:25. Просмотров 862. Ответов 3
Метки нет (Все метки)

Работа с документом Word при запуске кода из Excel затруднений не вызывает. Но тут появилась обратная задача: код запускается в документе Word и идет обращение к файлу Excel, однако он реагирует. Локальная задача заключается в том, чтобы обратиться к области Excel, которая выделена до запуска кода. Вот часть кода:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
sub Word_to_Excel()
    Dim objExlApp As Object, myExcelWorkbook As Excel.Workbook
    Set objExlApp = GetObject(, "Excel.Application")
    objExlApp.Visible = True        
 
    Application.FileDialog(msoFileDialogOpen).AllowMultiSelect = False
    Application.FileDialog(msoFileDialogOpen).Show
    myFileName = Application.FileDialog(msoFileDialogOpen).SelectedItems(1)    'выбор файла, где выделена область
 
    Set myExcelWorkbook = objExlApp.Workbooks.Open(myFileName)
    Set myRange = myExcelWorkbook.ActiveSheet.Selection.Cells                'а вот тут начинает ругаться
End Sub
Где я не прав? Спасибо!

Добавлено через 1 минуту
Цитата Сообщение от zics Посмотреть сообщение
однако он реагирует
он не реагирует!
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
12.10.2019, 01:25
Ответы с готовыми решениями:

Из Excel в Word, как добавить или сохранить закладку в Word
Добрый день, уважаемые форумчане, надеюсь на вашу помощь. Переношу данные из Excel в шаблон...

Из Excel в Word / Задать количество листов для печати в Word
Добрый день многоуважаемые, надеюсь на ваш совет. Есть задание из Excel таблицы переносить...

Добавление срок в таблицу Word при заполнении документа Word из данных Excel
Всем привет! Я новичок в этом деле и нужна помощь. Есть таблица Excel с данными на основании...

Из Excel в Word, как добавить/сохранить закладку в Word
Добрый день, уважаемые форумчане. Работаю над файлом по переносу данных из Excel в Word и по пути...

Перенос данных из Excel в Word (на основе Word шаблона)
Пожалуйста помогите, приведите какой-то пример как организовать этот процесс нужно из...

3
SoftIce
es geht mir gut
11121 / 4532 / 1144
Регистрация: 27.07.2011
Сообщений: 11,132
Завершенные тесты: 1
12.10.2019, 07:55 2
Цитата Сообщение от zics Посмотреть сообщение
он не реагирует!
А почему "он" должен реагировать ?
Как Вы вообще можете что-то выделить, мне интересно ?
Цитата Сообщение от zics Посмотреть сообщение
которая выделена до запуска кода
Файл закрыт ....
1
pashulka
3225 / 1725 / 725
Регистрация: 01.12.2010
Сообщений: 3,448
12.10.2019, 09:09 3
Лучший ответ Сообщение было отмечено zics как решение

Решение

У об'екта Selection родитель это Application/Window, а не лист

Visual Basic
1
Set myRange = objExlApp.Selection
1
zics
0 / 0 / 0
Регистрация: 15.11.2018
Сообщений: 32
12.10.2019, 10:25  [ТС] 4
Цитата Сообщение от SoftIce Посмотреть сообщение
Как Вы вообще можете что-то выделить, мне интересно ?
Область листа в Excel выделяется пользователем до запуска макроса из Word

Добавлено через 13 минут
Цитата Сообщение от pashulka Посмотреть сообщение
У об'екта Selection родитель это Application/Window, а не лист
Сработало, спасибо! Иду дальше
0
12.10.2019, 10:25
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
12.10.2019, 10:25

Копирование содержимого word в word из Excel с макросом
Ребят, добрый вечер! Подскажите,. пожалуйста, мне надо по сути создать копию документа WORD из...

Передача данных из Excel в Word (через Закладки) из нескольких страниц Excel
Товарищи прошу помощи! В книге есть 3 закладки: Org - данные об организации (только 1 строчка...

Excel + Word
Помогите кто может! В ячейках рабочего листа приведены полные имена файлов Word (до 5 файлов)....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.