Гость
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / кнопка в панели outlook, вывод содержимого письма в msgbox / 6 сообщений из 6, страница 1 из 1
18.06.2015, 16:58
    #38987163
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
кнопка в панели outlook, вывод содержимого письма в msgbox
Коллеги, добрый день!
Возникла небольшая проблема с освоением VBA outlook.
Подскажите пожалуйста по следующему вопросу:

В аутлуке, в общей панели есть кнопка, которая запускает макрос VBA.

Подскажите пожалуйста с текстом макроса. К примеру в общем списке писем я выделяю мышкой нужное письмо (оно выделено и находиться в фокусе).
В теле письма есть к примеру сообщение типа "Привет!"

Какой макрос нужно повесить на кнопку находящуюся в общей панели, чтобы VBA считало содержимое письма и вывело в msgbox сообщение из тела письма "Привет!"
...
Рейтинг: 0 / 0
18.06.2015, 17:48
    #38987236
An12
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
кнопка в панели outlook, вывод содержимого письма в msgbox
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
Sub GetBobyText()
Dim myOlExp As Outlook.Explorer
Dim myOlSel As Outlook.Selection
Dim Item As Outlook.MailItem
Set myOlExp = Application.ActiveExplorer
Set myOlSel = myOlExp.Selection
k = myOlSel.Item(1).Body
MsgBox k
End Sub
...
Рейтинг: 0 / 0
19.06.2015, 11:51
    #38987693
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
кнопка в панели outlook, вывод содержимого письма в msgbox
An12
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
Sub GetBobyText()
Dim myOlExp As Outlook.Explorer
Dim myOlSel As Outlook.Selection
Dim Item As Outlook.MailItem
Set myOlExp = Application.ActiveExplorer
Set myOlSel = myOlExp.Selection
k = myOlSel.Item(1).Body
MsgBox k
End Sub



Категорически вас благодарю! Именно то, что нужно, спасибо!
...
Рейтинг: 0 / 0
19.06.2015, 13:48
    #38987970
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
кнопка в панели outlook, вывод содержимого письма в msgbox
An12,

Большое спасибо за ответ. Если не сложно , можете подсказать еще по одному вопросу?

Предположим, что в теле письма находится таблица HTML в удобном для обработки формате:

Код: html
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
<HTML DIR=LTR>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=windows-1251">
<TITLE>просчеты</TITLE>
</HEAD>
<BODY>
<TABLE DIR=LTR BORDER>
<CAPTION>просчеты</CAPTION>
<TR>
<TD DIR=LTR ALIGN=RIGHT>67</TD>
<TD DIR=LTR ALIGN=RIGHT>10,69</TD>
<TD DIR=LTR ALIGN=RIGHT>10,45</TD>
<TD DIR=LTR ALIGN=RIGHT>6</TD>
<TD DIR=LTR ALIGN=RIGHT>0,04</TD>
<TD DIR=LTR ALIGN=RIGHT>406</TD>
<TD DIR=LTR ALIGN=RIGHT>4343,38</TD>
<TD DIR=LTR ALIGN=RIGHT>4245,94</TD>
<TD DIR=LTR ALIGN=RIGHT>16,24</TD>
</TR>
<TR>
<TD DIR=LTR ALIGN=RIGHT>68</TD>
<TD DIR=LTR ALIGN=RIGHT>9,65</TD>
<TD DIR=LTR ALIGN=RIGHT>9,50</TD>
<TD DIR=LTR ALIGN=RIGHT>78</TD>
<TD DIR=LTR ALIGN=RIGHT>0,50</TD>
<TD DIR=LTR ALIGN=RIGHT>32</TD>
<TD DIR=LTR ALIGN=RIGHT>309,05</TD>
<TD DIR=LTR ALIGN=RIGHT>304,00</TD>
<TD DIR=LTR ALIGN=RIGHT>16,00</TD>
</TR>


</TABLE>
</BODY>
</HTML>



Подскажите пожалуйста, как можно экспортировать данную таблицу к примеру в excel либо аксесс. Циклом гнать муторно. Есть ли
возможность в теле письма зацепиться за имя либо подпись <caption> таблицы и загнать ее куда либо?
...
Рейтинг: 0 / 0
19.06.2015, 16:30
    #38988312
An12
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
кнопка в панели outlook, вывод содержимого письма в msgbox
Сергей Лалов,

я в отпуск. беглый просмотр в нете дал ссылки
тут
тут1
...
Рейтинг: 0 / 0
19.06.2015, 17:14
    #38988365
Сергей Лалов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
кнопка в панели outlook, вывод содержимого письма в msgbox
An12Сергей Лалов,

я в отпуск. беглый просмотр в нете дал ссылки
тут
тут1

Спасибо, буду ковырять, хорошо отдохнуть! Самое главное в гугл.поиске правильно набрать формулировку вопроса))
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / кнопка в панели outlook, вывод содержимого письма в msgbox / 6 сообщений из 6, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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