Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Сообщений [ 4 ]
- Kreol2013
- лейтенант
- Неактивен
- Зарегистрирован: 18.02.2013
- Сообщений: 59
- Поблагодарили: 2
Тема: из excel сохранить в word и запустить в word макрос
Доброго времени суток.
Форумчане.
Есть вопрос следующего характера.
Возможно ли из excel сохранить нужный текст в word документе (например файл.dotm). При этом запустить макрос в word на выполнение.
Скорее всего раздел фантастики, но на всякий случай.
И да, если это вопрос относится сугубо к excel форумам? просьба не особо ругать.
Если возможно, буду признателен за код.
- aap77
- генерал-полковник
- Неактивен
- Зарегистрирован: 12.09.2011
- Сообщений: 925
- Поблагодарили: 243
- За сообщение: 1
Re: из excel сохранить в word и запустить в word макрос
Уважаемый Kreol2013!
Нет ничего невозможного! Нужно знать только параметры сохраняемого текста.
А по общему доступу к Excel код в приложенном файле Word.
Post's attachmentsДоступ к Excel.doc 34.5 Кб, 9 скачиваний с 2013-09-03
You don't have the permssions to download the attachments of this post.
- Kreol2013
- лейтенант
- Неактивен
- Зарегистрирован: 18.02.2013
- Сообщений: 59
- Поблагодарили: 2
Re: из excel сохранить в word и запустить в word макрос
Странно, ничего я не увидел в вашем файле, просто пустой файл с обрывом конца документа.
Проблема на самом деле была в не подключённых References, после включения все заработало.
- Kreol2013
- лейтенант
- Неактивен
- Зарегистрирован: 18.02.2013
- Сообщений: 59
- Поблагодарили: 2
Re: из excel сохранить в word и запустить в word макрос
Чтоб не плодить тем.
А как быть при копировании диапазона в новый лист worda?
Оригинал статьи внешняя ссылка
Dim t As Word.Range
Set t = wdDoc.Content 'set the range in Word
t.Paste 'paste in the table
Если я правильно понимаю тут опять используется буфер?
Возможно ли применить
Public Sub www()
With Workbooks("Книга1.xlsx").Worksheets(Sheets.Count)
.Range("a1:a" & .Cells(.Rows.Count, 1).End(xlUp).Row).Copy _
t.Paste 'paste in the table
End With
End Sub
Сообщений [ 4 ]
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
из excel сохранить в word и запустить в word макрос
При обработке текстов очень часто человеку приходится делать много механической работы. Нередки ситуации, когда для редактирования предоставляют многостраничные тексты, в которых требуется убрать лишние пробелы, изменить или назначить стили, добавить оглавление, чтобы оно было оформлено в соответствии с ГОСТами. На портале о Microsoft Office Word вы узнаете про: как сделать 2см с каждой стороны в ворде.
К счастью, Microsoft Word содержит много инструментов и возможностей для этого. Познакомиться с редко используемыми функциями, тонкими настройками, секретами написания шаблонов и назначения макросов для различных задач можно на форуме сайта Ворд Эксперт. На портале о Microsoft Office Word вы узнаете про: почему в тексте выделяется красным.
Форум содержит наработки по наиболее часто встречающимся ситуациям. Стандартные вопросы и ответы на них вынесены в отдельный подраздел. Наш сайт о Microsoft Office Word даст ответ про: как сохранять doc в pdf.
В других подразделах обсуждаются разные способы форматирования текстов и отличия версий Ворда. Свой подфорум для автоматизации, здесь вы найдете макросы, шаблоны, требуемые сочетания горячих клавиш и многое другое. На портале о Microsoft Office Word вы узнаете про: как поставить полукруг над буквой в word.
В отдельных подразделах можно познакомиться с готовыми решениями или выложить свои, а также оставить заявку на решение возникшей у вас задачи. На портале о Microsoft Office Word вы узнаете про: все физические знаки вword.
Вопросы, касающиеся других офисных программ и тем, напрямую не связанных с Вордом, обсуждаются в подразделе «Общение». На портале о Microsoft Office Word вы узнаете про: файл word не редактируеться.