< návrat zpět

MS Excel


Téma: Odesílání sešitu rss

Zaslal/a 13.1.2011 9:54

Dobrý den
V přiloženém souboru jsem si vytvořil makro, které nejsem schopen dotáhnout do konce a které by mělo:
1)odeslat sešit definovaným příjemcům (zatím se mi pouze objeví list před odesláním a příjemce musím zadávat ručně)
2)po odeslání vymazat určitá data např."B4:H13"
3)sešit uložit a zavřít

Asi je to banální, ale nemohu na to přijít - takže předem dík za radu. 28

Příloha: zip3743_test.zip (7kB, staženo 17x)
Zaslat odpověď >

icon #003744
Poki
co takhle:
Sub Odeslat_ulozit_zavrit()
Application.Dialogs(xlDialogSendMail).Show "nekdo@nekde.cz", "Předmět"
Range("B4:H13").ClearContents
ActiveWorkbook.Close (True)
End Sub
citovat
#003750
avatar
Děkuji za radu která mi pomohla v tom, že nemusím zadávat příjemce zprávy a předmět. Při zpuštění makra mi však zůstane rozpracovaná zpráva v Outlook okně kde musím potvrdit "odeslat" což jsem si myslel že také proběhne automaticky. Na konci se sešit zavře jen napůl, jak kdybych ho zavřel prvním křížkem a zůstane šedá obrazovka. Jinak moc dík, budu také laborovat.citovat
#003751
Stalker
Když chceš excel "úplně" zavřít použij příkaz:
Application.Quitcitovat
#003752
avatar
Tak zavření celého sešitu je OK - díky.citovat
icon #003760
Poki
Pokud byste chtel zpravu rovnou odeslat, musela by vypadat procedura uplne jinak (bez pouziti app.dialogs().show).
Velky problem je vsak pri odeslani vzdy, protoze pokud chce jina aplikace (Excel) odeslat z Outlooku zpravu, bude se Outlook branit - musel byste vzdy potvrdit, ze chcete zpravu odeslat, je tedy jedno, jestli kliknete na 'Odeslat' nebo na 'OK'.
Cesta, jak toto potvrzeni odeslani odstranit existuje, ale osobne bych ji nedoporucoval, protoze jak ze zkusenosti vim, vzdy je dobre si prohlednout to, co chci odeslat...mnoho krat se mi stalo, ze jsem jeste nektere veci menil...citovat
#003761
avatar
Taky jsem na to myslel, že asi bude lepší před odesláním vše zkontrolovat - příjemce atd.
Jinak musím pochválit super fórum, dobré a rychlé rady a hodně zde člověk z předchozích diskuzí pochytí - fokt dobrý - díky (všem) 4citovat
#003766
avatar
Ještě se snažím odeslat místo celého sešitu pouze část tabulky např."B2:H12" která bude vidět ve zprávě. Jinak vše chci zanechat. Ač nechci pořád otravovat, tak po celodením snažení se nemohu dopracovat k výsledku. Pokud někdo může - byl bych rád.
Dnes jsem na netu koukal po nějaké knížce o VBA od začátečníka po pokročilé. Je tam celkem toho dost, tak bych se chtěl zeptat, jakou by jste doporučili.citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Vynásobit hodnoty kurzem - Power Query

Alfan • 26.4. 7:56

Relativní cesta - zdroje Power Query

Alfan • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

elninoslov • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

lubo • 25.4. 19:18

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 15:12

Relativní cesta - zdroje Power Query

Alfan • 25.4. 15:08

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 14:21