|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
03.07.2008, 15:53 | #1 |
Пользователь
Регистрация: 06.02.2008
Сообщений: 42
|
Как создать новый файл Word из макроса Excel?
Всем привет!
Подскажите пожалуйста команду чтобы из макроса Excel создать новый файл Word. Спасибо! |
03.07.2008, 19:03 | #2 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
Dim appWD As Word.Application
Set appWD = CreateObject("Word.Application") appWD.Documents.Add
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
07.07.2008, 12:57 | #3 |
Пользователь
Регистрация: 06.02.2008
Сообщений: 42
|
Вот и я так же написала, а VBA выдало ошибку "User-defined type not defined" (у меня Excel-2003).
Чтобы это значило? ((( |
07.07.2008, 13:05 | #4 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Пробуй Word.Application заменить на Variant.
I'm learning to live...
|
07.07.2008, 13:13 | #5 |
Пользователь
Регистрация: 06.02.2008
Сообщений: 42
|
Про ошибку уже не пишет, но и ничего не происходит (новый вордовский файл не создается).
|
07.07.2008, 13:24 | #6 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Не создается, или его не видно?
После Вашего кода, попробуйте добавить Код:
Чем шире угол зрения, тем он тупее.
|
07.07.2008, 13:49 | #7 |
Пользователь
Регистрация: 06.02.2008
Сообщений: 42
|
Добавила строчку про видимость и он действительно появился!
СПАСИБО! А все таки интересно почему строчка Dim appWD As Word.Application вызывала ошибку... во всех книгах про VBA именно так и написано... Прочитала про ссылку на библиотеку внешних приложений Tools-Referens (Сервис-Ссылки), но у меня стоит галочка на Microsoft Office 11.0 Object Library... почему интересно ссылка на Word не сработала...((( |
07.07.2008, 13:51 | #8 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Как-то тоже с этим сталкивался. С тех пор использую
Код:
Чем шире угол зрения, тем он тупее.
|
07.07.2008, 14:34 | #9 |
Пользователь
Регистрация: 06.02.2008
Сообщений: 42
|
В итоге получился такой код:
Dim wdApp As Object Set wdApp = CreateObject("Word.Application") wdApp.Documents.Add wdApp.Visible = True Создается файл Word Как теперь задать Сохранить Как под каким нибудь именем и в определенной папке? |
07.07.2008, 14:35 | #10 |
Пользователь
Регистрация: 06.02.2008
Сообщений: 42
|
С экселевскими файлами это у меня получается... а вот Word упрямится что-то...)))
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Перенос данных из MS Word в MS Excel ? | Nickd5 | Помощь студентам | 2 | 28.06.2008 20:40 |
Delphi c SQL и выгрузка в Excel или word | girl23 | БД в Delphi | 7 | 24.10.2007 17:56 |
Как вытащить данные из Excel в бд dephi, а потом (после работы с данными) сформировать новый файл excel. | Геля | БД в Delphi | 1 | 10.04.2007 15:11 |
Из word в Excel | Biosasha | Microsoft Office Word | 0 | 15.02.2007 22:32 |