MS Office Word

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела

MS Word В документе есть поле со списком, вариант использования? https://www.cyberforum.ru/ ms-word/ thread2498613.html
Здравсвуйте, есть поля со списками с одинаковыми данными и с одинаковым названием в документе, можно ли сделать так, чтобы изменив данные в одном из полей, они автоматически изменились и во всех других полях с тем же названием. Конкретный пример (прикреплен): карта стоматологического пациента, в ней несколько раз нужно указать номер причинного зуба, для выбора номера сделано...

Удалить все китайские иероглифы из документа MS Word
Здравствуйте! Подскажите, пожалуйста, как можно удалить все китайские символы (иероглифы) из документа, не теряя при этом форматирование? Сначала я думал это можно реализовать путем замены (Ctrl+H), но плохо разбираюсь в этом. Пробовал , но теряется форматирование. Потом думал просто изменить кодировку текста, но опять же - теряется форматирование при конвертации в .txt, что очевидно. ...

MS Word После копирования файлы Word отображаются "квадратиками" https://www.cyberforum.ru/ ms-word/ thread2498125.html
Добрый день, после копирования с одного диска на другой файлы MS Word (которые раньше открывались без проблем) стали отображаться "квадратиками". Кодировки менять пробовал, также пробовал открывать через Avtocad, но все безрезультатно. Подскажите, пожалуйста, есть ли шанс востановить документы? P.S. битый файл прилагается

MS Word Вставить дату в ячейку таблицы в Word 2013 Подскажите, пож, как в Microsoft Word 2013 в одну из ячеек готовой таблицы вставить возможность изменения и выбора даты типа выпадающего календаря на месяц, чтоб просто выбрать день и в ячейке вставилась дата форма дд. мм. гггг? Получилось через "вставка - экспресс блоки - свойство документа - дата публикации", но дата изменятся во всех ячейка на одну и ту же. https://www.cyberforum.ru/ ms-word/ thread2497612.html

MS Word Создание закладки по части названия файла
Добрый день. Есть файл шаблона. Из него сохраняют файл, вставляя Название и Код. Эти же название и код вставляют в заголовок в самом файле. Подскажите, как макросом создать закладку в месте, где начинается название транзакции при сохранении файла. Название закладки должно соответствовать добавленным в имя файла Названию и Коду (только без квадратных скобок) Файлы шаблона и Сохраненного...

MS Word Создать автоматически изменяемое поле, связанное с Range Необходимо создать в документе автоматически обновляемом поле (закладку или просто текст), которые будут содержать дату и время обновления (изменения) пользователем определённого фрагмента (привязанного к полю параграфа или произвольной Range). То есть, поле (закладка) должны быть связаны с Range и автоматически отображать дату и время обновления Range. https://www.cyberforum.ru/ ms-word/ thread2496580.html

MS Word Ограничение редактирования https://www.cyberforum.ru/ ms-word/ thread2495749.html
Есть документ, в котором отдельные области отмечены как исключения для запрета редактирования. Каждая область документа закреплена за отдельным пользователем. Каким образом программно получить список всех областей и снять их (аннулировать)?

MS Word Не ставить разделитель в конце последнего файла при объединении
Уважаемые форумчане, доброго времени суток! Для объединения файлов word использую макрос следующего вида: Sub Объединение_файлов() Dim avFiles, lr As Long Dim docAct As Document, docNow As Document With Application.FileDialog(msoFileDialogFilePicker) .InitialFileName = "*.doc*"

MS Word Вставка текущей даты в документы Добрый день! Проблема такая: не вставляется текущая дата (TIME \@ "dd.MM.yyyy) в документах, открытых из почтовых вложений (Outlook 2013, видимо почта на серваке) . Если файл документа на сохранен на локальном диске, то все норм. Подскажите, как настроить Word или Outlook, чтобы текущая дата вставлялась (например по Alt+Shift+D) в документы без их сохранения на диск. ЗЫ Поясняю - это... https://www.cyberforum.ru/ ms-word/ thread2493038.html

MS Word Теряется размер страницы при повторном открытии документа Word теряется размер страницы, т.е. стандартная страница А; ширины 19 см отображается как альбомная ширины 32-33 см.Другое форматирование не пострадало, но печать такого документа видимо приведет к искажению пропорций. MS Word 2013 https://www.cyberforum.ru/ ms-word/ thread2491810.html

MS Word Не работают ссылки в оглавлении!
Обычное оглавление работает. Но, когда создала общее оглавление для нескольких документов, ссылки перестали открываться. Компьютер, вообще, никак на них не реагирует: не меняет вид курсора при наведении, не выдаёт никаких сообщений... Прочла всё, что написано по этой теме в Интернете: * в реестре в HKEY_LOCAL_MACHINE\SOFTWARE\Classes\htmlfile\shell\open\command изменяла значение вместо Default...

MS Word Почему межстрочный интервал стал больше, хотя тексты с одного и того же сайта [Word 2016] https://www.cyberforum.ru/ ms-word/ thread2490993.html
В Word скопировал 3 абзаца, все с разных web-страниц, но сай

doORdie

0 / 0 / 0

Регистрация: 11.09.2019

Сообщений: 17

Копирование из Word в Outlook VBA - MS Word - Ответ 13821009

11.09.2019, 13:56. Показов 2940. Ответов 26

Метки (Все метки)

Author24 — интернет-сервис помощи студентам

Всем привет, я дилетант, от слова совсем. Первый раз столкнулся с макросами в целом.
На данный момент есть определенная, личная задача - необходимо автоматизировать перенос информации из Word в outlook.

Смотрите пример во вложении "ПримерWord" - Есть определнная таблица в Word (Активный документ, к статике не привязываюсь, т.к всегда будут разные документы Word), в ней есть поля (обозначено на скриншт: поле2, поле3, поле4 и т.д).
Необходимо информацию из этих полей, автоматически переносить в Outlook, смотрите вложения"ПримерOutlook" - в соотв. поля.

Т.е поле3 из таблицы Word идет в таблицу в Outlook, в такое же поле3 (но уже в outlook).
Поле2 из Word идет в Outlook Поле2
Поле4 из Word в поле Outlook Поле4 и так далее.
Надеюсь суть удалось донести.

Что есть на данный момент.

Visual Basic

Sub SendOutlookMessages()
 
 'Dimension variables.
 Dim OL As Object, MailSendItem As Object
 Dim W As Object
 Dim MsgTxt As String
 
 'Starts Word session
 Set W = GetObject(Application.ActiveDocument)
 
 
 'Pulls text from file for message body
 MsgTxt = W.Range(Start:=W.Paragraphs(1).Range.Start, _
    End:=W.Paragraphs(W.Paragraphs.Count).Range.End)
 
 'Starts Outlook session
 Set OL = CreateObject("Outlook.Application")
 Set MailSendItem = OL.CreateItem(olMailItem)
 
 With MailSendItem
     .Subject = "Example"
     .Body = MsgTxt
     .To = "Example"
     MailSendItem.Display
 End With
 
End Sub

Range стоит как пример, просто смотрел как он работает. Через Range, кажется тяжелее, чем копировать. Если письмо создать я могу, но заставится перенестить то что мне нужно из Word в Outlook - никак.

Прошу помочь, заранее Всем спасибо!!!

Вернуться к обсуждению:
Копирование из Word в Outlook VBA MS Word

Следующий ответ

Миниатюры

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

11.09.2019, 13:56

Готовые ответы и решения:

Копирование данных из Word в Outlook
Такая задача: необходимо в документе Word найти Email человека и передать его в строку "Кому" в...

Шаблон письма из Word в Outlook через Excel VBA
Здравствуйте! Подскажите, пожалуйста, можно ли решить следующую задачу и как? Есть файл Excel, в...

Копирование изображений Word VBA
Здравствуйте. Есть проблема при копировании картинок из одного документа word в другой. Суть задачи...

VBA Outlook: Как открыть сообщение для редактирования через объектную модель Word?
Добрый день! Подскажите, плиз, как открыть сообщение (MailItem) для редактирования через...

	11.09.2019, 13:56

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

11.09.2019, 13:56

Помогаю со студенческими работами здесь

Копирование построчно из Word в Exel через VBA
Доброго времени суток. Задача состоит в следующем - есть файл Word и файл Excel. В ворде написан...

Копирование таблицы из Excel в Word средствами VBA
Добрый день! Прошу помощь зала. Вставляю в Word таблицу из Excel методом PasteExcelTable. Задача:...

Обрезается "checkbox" при копирование из Word в Outlook
Всем еще раз привет. Есть такой код из соседней темы - Option Explicit ...

Outlook word-wrap & word-break в таблице
Суть проблемы: есть таблица и в её ячейке есть однословный длинный текст, который своей чистой...

Наверх