Nacházíte se: WALL.czNástěnka › Outlooku – automatické ukládání přílohy
Kategorie: Nástěnka

Outlooku – automatické ukládání přílohy

OutlookPravidelně dostávám najednou 10 e-mailů s podklady pro reporty. Protože v e-mailech má příloha vždy stejný název, pokaždé musím kliknout na přílohu, provést Uložit jako a zadat název. Název přílohy zadávám stejný jako předmět e-mailu.

Naprosto otravná práce a tedy ideální případ pro automatizaci, která by uvedené e-maily přesunula do vlastní složky a uložila přílohy pod názvem předmětu e-mailu. Přesun e-mailu do vlastní složky zajistí pravidlo a uložení příloh provede makro, které se také bude spouštět v rámci pravidla.

Makro (skript), které bude spouštěné pravidlem se v editoru VBA zapisuje do ThisOutlookSession.

Outlooku – automatické ukládání přílohy

Kód pro uložení přílohy:

Public Sub SaveAtt(Item As Outlook.MailItem) 'Skript pro pravidlo Dim objAtt As Outlook.Attachment Dim saveFolder As String Dim fso As Object Dim file As String Dim enviro As String enviro = CStr(Environ("USERPROFILE")) saveFolder = enviro & "\Dokumenty\" Set fso = CreateObject("Scripting.FileSystemObject") On Error Resume Next For Each objAtt In Item.Attachments 'složka & název souboru/přílohy (předmět) & koncovka (z původní přílohy) file = saveFolder & Item.Subject & Right(objAtt.DisplayName, 4) objAtt.SaveAsFile file Set objAtt = Nothing Next Set fso = Nothing End Sub

Nastavení pravidla:

Outlooku – automatické ukládání přílohy

  • Klikněte na Upřesnit nastavení.
  • Na stránce Vyberte akce zaškrtněte spustit: skript.
  • Klikněte na skript a vyberte skript ze seznamu.
  • Pak potvrďte OK a dokončete průvodce nastavením pravidla.

Outlooku – automatické ukládání přílohy

Nyní je vše připraveno. Od této chvíle budou všechny nové e-maily, které splňují podmínku v pravidlu, přesunuty do vlastní složky a současně příloha bude automaticky uložena do složky Dokumenty.

print Formát pro tisk

Sdílet článek:

Komentáře rss

Zasílate odpověď ke stávajícímu příspěvku (zrušit).

Nemáte oprávnění přidávat příspěvky.

Uživatelské jméno
Heslo
     

Registrace >
Ztracené heslo >


, - odpovědět
avatar
Skript funguje bezvadně ale ukládá i obrázek v podpisu se stejným názvem, jako je předmět emailu.
Jde odebrat ukládání obrázku z podpisu?

Předem díkycitovat
icon odpověděl(a)
admin
Šlo by to asi ošetřit tak, že byste do cyklu přidal kontrolu na obrázek (*.jpg; *.gif;..) a uložení obrázku přeskočil.citovat
, spustit: skript odpovědět
avatar
Chtěl jsem toto využít, ale bohužel nemám na dané kartě možnost:
spustit: skript
6

Mám Outlook 2010. Tak netuším, kde je chybacitovat
icon odpověděl(a)
admin
V MS Office zmizel checkbox pro Spusti: skrip. Lze vrátit novým zápisem do registru:
[HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Outlook\Security]
"EnableUnsafeClientMailRules"=dword:00000001citovat
odpověděl(a)
avatar
Zdravím šel by sem dát screenshot jak přesně to má vypadat? Nerad bych si zničil registry v pracovním pc. Předem děkuji :-)citovat

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura III

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

Aktivní diskuse

Spuštění makra, když buňka větší než...

slavekskeeve • 17.10. 9:44

Spuštění makra, když buňka větší než...

elninoslov • 17.10. 8:58

Odeslání listu na e-mail

elninoslov • 17.10. 8:46

Spuštění makra, když buňka větší než...

slavekskeeve • 17.10. 8:38

Odeslání listu na e-mail

lubo1 • 17.10. 8:26

Odeslání listu na e-mail

elninoslov • 16.10. 20:55

Odeslání listu na e-mail

Pavel-Krivanek • 16.10. 10:44