помогите!!!

Дмитрий

Гость

09.01.2008 11:07:43

Народ здравствуйте!
Помогите пожалуйста, есть такая проблема: в Прайс-листе нашей фирмы
ссылка "Отправить Письмо" там стоит ссылка mailto:адрес@почты, но мне нужно чтоб при нажатии на ссылку можно было через Outlook еше прикрепить этот же Прайс-лист автоматически чтобы отправить.
p.s.: так нужно потому-что в прайсе есть колонка заказ там клиент заполняет кол-во заказываемого товара. Мне нужно чтоб не сохранить лист потом прикрепить к письму а сразу же нажать на сслыку и все прикреплялось!
Если нужно могу дать сам прайс-лист.
Заранее блогадарен!!!

Лузер

Гость

09.01.2008 12:02:03

Макрос в этом деле поможет. Надо только, чтобы у клиентов не было запрета на макросы.
сам макрос такого типа:
Dim OL As New Outlook.Application
Dim SM As Outlook.MailItem
ActiveWorkbook.SaveAs Filename:="C:\temp.xls"
Set SM = OL.CreateItem(olMailItem)
SM.Attachments.Add ("C:\temp.xls")
SM.To = "адрес@почты"
SM.Subject = "Заказ товара"
'SM.Display
SM.Send
Set SM = Nothing
Set OL = Nothing
ActiveWorkbook.Close
Сохранять промежуточную копию все-таки нужно. И работает только с аутлуком.

Guest Гость	#3 09.01.2008 12:22:41 Лузер спасибо за помощь! Скажи а как проше макрос записать? просто в макросах я не понимаю ни фига! Заранее блогадарен!!!

Лузер

Гость

09.01.2008 14:21:27

Тогда, боюсь, я в двух словах не объясню.
Мне будет проще налепить на лист кнопку, которая будет отправлять почту.
Аутлук, кстати, всегда будет ругаться на такую отправку почты и отправлять только после подтверждения юзера.

Snoop@ Гость	#5 09.01.2008 14:27:28 Лузер вставь пожулуйста кнопку в самый низ данной книги. rimex@inbox.ru Прикрепленные файлы post_6548.xls (1.3 МБ)

Лузер Гость	#6 09.01.2008 14:55:05 примерно так. только файл сохраняется в текущем его расположениии соответственно он должен быть открыт для записи. Прикрепленные файлы post_6550.xls (1.31 МБ)

Guest

Гость

09.01.2008 15:10:20

ЛУЗЕР ВСЕ ОТЛИЧНО РАБОТАЕТ!!!
ОГРОМНОЕ СПАСИБО!!!
и еше вопрос (последный:) ) через конструктор я создаю кнопку потом через пункт исходный текст вставляю твой код но к сожеления не работает моя кнопка или может нужно отдельно модуль сделать?!

Barracuda

Пользователь

Сообщений: 274 Регистрация: 01.01.1970

09.01.2008 15:27:53

{quote}{login=}{date=09.01.2008 03:10}{thema=}{post}ЛУЗЕР ВСЕ ОТЛИЧНО РАБОТАЕТ!!!
ОГРОМНОЕ СПАСИБО!!!
и еше вопрос (последный:) ) через конструктор я создаю кнопку потом через пункт исходный текст вставляю твой код но к сожеления не работает моя кнопка или может нужно отдельно модуль сделать?!{/post}{/quote}
Присвой своей кнопке этот макрос! Нажми на кнопке на правую клавишу и выбери "Назначить макрос"

Guest Гость	#9 09.01.2008 15:58:42 Блин там только пункты свойства и Исходный текст! Я тоже самое как сделал Лузер делаю но кнопка НЕ РАБОТАЕТ!!!

Лузер

Гость

#10

09.01.2008 16:18:41

{quote}{login=}{date=09.01.2008 03:10}{thema=}{post}ЛУЗЕР ВСЕ ОТЛИЧНО РАБОТАЕТ!!!
ОГРОМНОЕ СПАСИБО!!!
и еше вопрос (последный:) ) через конструктор я создаю кнопку потом через пункт исходный текст вставляю твой код но к сожеления не работает моя кнопка или может нужно отдельно модуль сделать?!{/post}{/quote}Исходный код для кнопки лежит в модуле листа, а мой код в "модуле1".
В этом разница. Я из модуля листа вызываю макрос в "модуле1".
А-а! Забыл сказать главное: Надо подключить в vba две библиотеки: меню - tools - references
см. картинку

Лузер Гость	#11 09.01.2008 16:22:27 картинка :) Прикрепленные файлы post_6565.JPG (38.29 КБ)

Лузер Гость	#12 09.01.2008 17:13:28 В том файле, который я прикрепил, библиотеки уже не нужно подключать

Лузер Гость	#13 09.01.2008 17:29:46 Нашел как можно без сохранения файла одной строкой Application.Dialogs(xlDialogSendMail).Show "rimex@inbox.ru", "Заказ товара" и библиотеки не нужны нашел с помощью макрорекордера, который рулит!

Сергей Гость	#14 09.01.2008 17:35:30 {quote}{login=Лузер}{date=09.01.2008 05:29}{thema=}{post} нашел с помощью макрорекордера, который рулит!{/post}{/quote} Подскажите как искать в макрорекордере?

Лузер Гость	#15 09.01.2008 17:43:19 А что там можно искать? Им только записывать свои действия можно Вот я и записал: Файл - отправить - сообщение как вложение

Guest Гость	#16 09.01.2008 18:53:49 Лузер я так понял просто вставляеш эту строку как модуль и все работает?

Guest Гость	#17 10.01.2008 00:07:48 Лузер СПАСИБО БОЛЬШОЕ и тем кто помогал! Благодаря Вам сейчас клиенты не будут жаловатся на отправку Почты!!! И сам узнал кое-что нового! Модераторам:Можете закрыть, все уже помогли и все понятно!!!!

Читают тему