Помогите с написанием макроса на VBA под Outlook 2000

Программирование на Visual Basic for Applications
Blasted
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 24.09.2008 (Ср) 21:12

Помогите с написанием макроса на VBA под Outlook 2000

Сообщение Blasted » 24.09.2008 (Ср) 21:22

Товарищи, помогите с написанием кода для макроса под Outlook, т.к. очень мало работал с VBA, а вопрос встал ребром. Стоит следующая задача - макрос должен залезать в Excel файлик, сохраненный локально и проходить по одному столбцу (около 500 значений), беря каждая значение и осуществляя поиск по subject в письмах в outlook в определенной папке (каждому такому значению должно соответствовать одно письмо; возможно, не inbox'e, а в папке в public folders). Найдя соответствующее письмо, надо взять из него аттачмент и прикрепить его к новому письму и добавить туда стандартный текст (заранее написанный), а потом отправить его на адрес найденного пиьсма (т.е., грубо говоря ответить (reply) на письмо, но заменить весь текст другим заранее написанным и не потерять аттачмент). Итак с каждым значением этого столбца.

Заранее спасибо

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Re: Помогите с написанием макроса на VBA под Outlook 2000

Сообщение Viper » 25.09.2008 (Чт) 7:08

Blasted, это предложение работы? Или все-таки какие-то усилия приложены, но что-то не получается? Если второе, то что сделано, и что не получилось, если первое, то это в другой подфорум.
Весь мир матрица, а мы в нем потоки байтов!

Blasted
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 24.09.2008 (Ср) 21:12

Re: Помогите с написанием макроса на VBA под Outlook 2000

Сообщение Blasted » 25.09.2008 (Чт) 10:33

Да, на самом деле есть пара вопросов. Может быть еще посоветуете с какой стороны подступаться к этому вопросу - т.е. делать модуль для Outlook или для Excel.

Например, такой вопрос - создаю подключение к базе данных Excel (файл, локально сохраненный на жестком диске):

'Создаем объект Connection
Dim cn As ADODB.Connection
cn.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=Excel Files;" _
& "Data Source=Debtors"
cn.Open

Предварительно добавив этот файл в ODBC как источник данных System DSN, путь должен быть верный (я его скопировал из созданного udl файла для подключения к этой базе данных).

В итоге получаю ошибку Run-time error '91'.

Второй вопрос, это как лучше цикл сравнения значения из таблицы Excel и Subject'а в Outlook. Насколько я понял единственный способ поиска в Outlook это объект AdvancedSearch?

Blasted
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 24.09.2008 (Ср) 21:12

Re: Помогите с написанием макроса на VBA под Outlook 2000

Сообщение Blasted » 25.09.2008 (Чт) 18:07

Разобрался с этим моментом. Теперь возник следующий вопрос - неужели outlook 2000 не поддерживает объект AdvancedSearch?


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 66

    TopList