ReSQL.ru
     
powered by simpleCommunicator - 2.0.38     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / что не так с word из EXCEL
12 сообщений из 12, страница 1 из 1
что не так с word из EXCEL
    #39671262
kos20
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kos20
Участник
День добрый! Генерирую файл Ворд из ЕКСЕЛ. Все работает, но почему-то макрос, записанный в макрорекордере не работает в ЕКСЕЛе.

ниже сам код:
Код: vbnet
1.
2.
3.
4.
5.
Dim WA As Object
Set WA = CreateObject("Word.Application")

WA.Selection.Paste
WA.Selection.InsertBreak Type:=wdPageBreak 'при вставке разрыва выскакивает ошибка, хотя в ВОРДЕ работает



может кто сталкивался с такой проблемой?
...
Рейтинг: 0 / 0
08.07.2018, 16:20
| Ответить | Цитировать | Написать  
что не так с word из EXCEL
    #39671311
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
При использовании позднего связывания именованные константы недоступны. Определите их или используйте раннее связывание.
...
Рейтинг: 0 / 0
08.07.2018, 20:46
| Ответить | Цитировать | Написать  
что не так с word из EXCEL
    #39671523
kos20
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kos20
Участник
AkinaПри использовании позднего связывания именованные константы недоступны. Определите их или используйте раннее связывание.

Спасибо, не знал.
...
Рейтинг: 0 / 0
09.07.2018, 11:54
| Ответить | Цитировать | Написать  
что не так с word из EXCEL
    #39671527
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Используйте Option Explicit
...
Рейтинг: 0 / 0
09.07.2018, 11:57
| Ответить | Цитировать | Написать  
что не так с word из EXCEL
    #39672027
kos20
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kos20
Участник
Shocker.Pro Используйте Option Explicit
как это поможет? Нужно же ранее связывание.
...
Рейтинг: 0 / 0
10.07.2018, 12:58
| Ответить | Цитировать | Написать  
что не так с word из EXCEL
    #39672030
kos20
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kos20
Участник
AkinaПри использовании позднего связывания именованные константы недоступны. Определите их или используйте раннее связывание.
А что делать, если нет возможности подключить библиотеку (ранее связывание)? или есть вариант прописать без явного подключения?
...
Рейтинг: 0 / 0
10.07.2018, 12:59
| Ответить | Цитировать | Написать  
что не так с word из EXCEL
    #39672033
kos20
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kos20
Участник
AkinaПри использовании позднего связывания именованные константы недоступны. Определите их или используйте раннее связывание.
Я так понимаю чтобы использовать это

Код: vbnet
1.
2.
Dim oApp As New Word.Application
MsgBox oApp.UserName


Нужно сперва подключить библиотеку
...
Рейтинг: 0 / 0
10.07.2018, 13:03
| Ответить | Цитировать | Написать  
что не так с word из EXCEL
    #39672070
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
The_Prist
Участник
kos20есть вариант прописать без явного подключения?Как бы нет. А без библиотеки - сколько угодно. Вы это и делаете кодом:
kos20Set WA = CreateObject("Word.Application")
только другой вопрос, что при позднем связывании Excel ничего не знает про константу wdPageBreak.
Почитайте, может прояснит ситуацию: Как из Excel обратиться к другому приложению
...
Рейтинг: 0 / 0
10.07.2018, 13:51
| Ответить | Цитировать | Написать  
что не так с word из EXCEL
    #39672088
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
kos20как это поможет?Вы сделайте - и сразу увидите сообщение, что wdPageBreak not defined.
...
Рейтинг: 0 / 0
10.07.2018, 14:13
| Ответить | Цитировать | Написать  
что не так с word из EXCEL
    #39672101
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
kos20Shocker.Pro Используйте Option Explicit
как это поможет? Нужно же ранее связывание.это поможет сейчас и в будущем сразу видеть эту и кучу других проблем


kos20 А что делать, если нет возможности подключить библиотеку (ранее связывание)? или есть вариант прописать без явного подключения?просто указать значение этой константы вместо её имени (про которое эксель ничего не знает при позднем связывании)
...
Рейтинг: 0 / 0
10.07.2018, 14:29
| Ответить | Цитировать | Написать  
что не так с word из EXCEL
    #39672127
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Shocker.Proпросто указать значение этой константы вместо её имениДля сохранения "синтаксической преемственности" лучше определить эту константу и продолжить использовать её по имени. Особенно это удобно в разработке, когда МОЖНО использовать раннее связывание и пользоваться всеми удобствами Intellisence - потом геморрою меньше.
...
Рейтинг: 0 / 0
10.07.2018, 15:10
| Ответить | Цитировать | Написать  
что не так с word из EXCEL
    #39672337
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Akina,

Ты написал это еще в первом ответе, но автор пока не врубился, что надо сделать
...
Рейтинг: 0 / 0
11.07.2018, 04:59
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / что не так с word из EXCEL
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=39671523&tid=2172291]:
 0ms
get settings:
 11ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 31ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 47ms
get tp. blocked users:
 1ms
others: 287ms
total:  412ms
созд. / загр.: 412ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]