Dobrý den, měl bych prosbu o úpravu makra na odeslání emailu našel jsem toto makro a potřeboval bych ho upravit následovně pokud to půjde.
Aby při odeslání mě to k předmětu zprávy vložilo obsah buňky B5 a do buňky B6 se vypsala zpráva o odeslání.
Děkuji všem za ochotu.
Sub ExcelSendMail()
'aktivní sešit jako příloha
Dim aKomu()
'adresáti
aKomu = Array("nekdo@aaa.cz")
'odeslání s uvedením předmětu zprávy
ActiveWorkbook.SendMail aKomu, "Dodací list"
End Sub
Makro na odeslaní emailu Vyřešeno
Re: Makro na odeslaní emailu
Děkuji z této stránky to makro mám ale přiznám se nedokážu v těch ostatních kódech najít proceduru,(pokud tam je) kterou jsem popsal v úvodu. Vím, že jsu otravný.
-
- Pohlaví:
Re: Makro na odeslaní emailu
a) objekt Range
b) jediné, co by mělo smysl, je zpráva o doručení
b) jediné, co by mělo smysl, je zpráva o doručení
Re: Makro na odeslaní emailu
Jsem si to myslel, že s tím oznámením bude asi problém. Každopádně děkuji za první radu to je pro mě důležitější. Ještě jednou děkuji.
Dodatečně přidáno po 25 minutách 28 vteřinách:
Myslel jsem, že to dám dohromady ale zřejmě jsu úplný trotl. Můžu poprosit napíšete mě to makro? Já vím je to ode mě neustálý otravování ale předem děkuji za ochotu
Dodatečně přidáno po 25 minutách 28 vteřinách:
Myslel jsem, že to dám dohromady ale zřejmě jsu úplný trotl. Můžu poprosit napíšete mě to makro? Já vím je to ode mě neustálý otravování ale předem děkuji za ochotu
-
- Pohlaví:
Re: Makro na odeslaní emailu
Takhle od boku nenapíšu. Osobně bych použil CDO, nevím jestli máte Outlook, každopádně jste si nevybral nejlepší způsob.
Re: Makro na odeslaní emailu
Ano mam outlook, ono to makro funguje perfektně ja bych tam potřeboval jenom ke zprávě v předmětu vložit udaje z buňky B5
-
- Pohlaví:
Re: Makro na odeslaní emailu
No je to jedna z nejhorších variant, ale jak myslíte.
ActiveWorkbook.SendMail aKomu, ActiveSheet.Range("B5")
ActiveWorkbook.SendMail aKomu, ActiveSheet.Range("B5")
Re: Makro na odeslaní emailu
No ja tomu nerozumim, tak nevim proč je to ta nejhorší varianta ale pokud bude fungovat jak potřebuju tak moc děkuji.
Re: Makro na odeslaní emailu Vyřešeno
Jsem si to myslel ale to je pro mě to nejmenší. Díky moc
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 11
- 1816
-
od Myerina
Zobrazit poslední příspěvek
28 dub 2023 21:09
-
- 1
- 1541
-
od mmmartin
Zobrazit poslední příspěvek
20 led 2024 19:21
-
- 9
- 1124
-
od mmmartin
Zobrazit poslední příspěvek
29 srp 2023 16:47
Kdo je online
Uživatelé prohlížející si toto fórum: Seznam[Bot] a 3 hosti