Přejít k hlavnímu obsahu

Jak přejmenovat přílohy v okně aplikace Outlook bez uložení na disk?

U příloh přijatých e-mailových zpráv možná budete chtít tyto přílohy přejmenovat, aby je bylo možné v budoucnu snadno rozpoznat. Ve skutečnosti neexistuje žádná vestavěná funkce aplikace Outlook, která by umožňovala přímé přejmenování příloh v okně aplikace Outlook bez jejich uložení na disk. V tomto článku vám ukážeme způsoby přejmenování příloh v Outlooku.

Automaticky ukládat a přejmenovávat přílohy pomocí kódu VBA v aplikaci Outlook
Snadno přejmenujte přílohy v e-mailu bez uložení na disk pomocí programu Kutools pro aplikaci Outlook


Uložte a přejmenujte přílohy pomocí kódu VBA v aplikaci Outlook

V této části poskytneme kód VBA, který automaticky uloží přílohy vybraného e-mailu. Po uložení můžete vidět, že datum poslední úpravy příloh bylo přidáno jako předpona k původním názvům příloh. Postupujte prosím následovně.

1. V Dokumenty složku, vytvořte novou složku s názvem Přílohy uložit a přejmenovat přílohy vybraného e-mailu.

2. Vyberte e-mail s přílohami, které chcete uložit, a přejmenujte jej s upravenými daty.

3. lis Další + F11 současně otevřete klávesy Microsoft Visual Basic pro aplikaci okno. V Microsoft Visual Basic pro aplikaci okno, klepněte na tlačítko Vložit > Modula poté vložte pod kód VBA do okna modulu.

Kód VBA: Uložte přílohy a přidejte upravené datum před název souboru

Public Sub saveattachmentsadddate()
	Dim itm As Outlook.MailItem
	Dim currentExplorer As Explorer
	Dim Selection As Selection
	Dim objAtt As Outlook.Attachment
	Dim saveFolder As String
	Dim fso As Object
	Dim oldName
	Dim file As String
	Dim DateFormat As String
	Dim newName As String
	Dim enviro As String
	enviro              = CStr(Environ("USERPROFILE"))
	saveFolder          = enviro & "\Documents\Attachments\"
	Set currentExplorer = Application.ActiveExplorer
	Set Selection       = currentExplorer.Selection
	Set fso             = CreateObject("Scripting.FileSystemObject")
	On Error Resume Next
	For Each itm In Selection
		For Each objAtt In itm.Attachments
			file = saveFolder & objAtt.DisplayName
			objAtt.SaveAsFile file
			'Get the file name
			Set oldName  = fso.GetFile(file)
			DateFormat   = Format(oldName.DateLastModified, "yyyy-mm-dd ")
			newName      = DateFormat & objAtt.DisplayName
			oldName.Name = newName
			Set objAtt   = Nothing
		Next
	Next
	Set fso = Nothing
End Sub

4. zmáčkni F5 klíč ke spuštění kódu a přílohy ve vybraném e-mailu se uloží do složky "\ Documents \ Attachments \" a datum poslední úpravy příloh bylo přidáno jako předpona k původním názvům příloh automaticky.

Poznámky:

1. Pokud chcete přejmenovat některou z příloh ve vybraném e-mailu místo hromadně, tato metoda nemůže fungovat.
2. Tento kód také uloží a přejmenuje další objekty, jako jsou obrázky, grafy, tvary atd. V těle e-mailu.

Snadno přejmenujte přílohy v e-mailu bez uložení na disk pomocí programu Kutools pro aplikaci Outlook

Zde velmi doporučujeme Přejmenovat přílohy vlastnost Kutools pro aplikaci Outlook. Díky této funkci můžete přímo přejmenovat přílohy v okně aplikace Outlook bez uložení na disk.

Kutools pro aplikaci Outlook : s více než 100 užitečnými doplňky aplikace Outlook, zdarma vyzkoušet bez omezení do 60 dnů.

1. Po instalaci Kutools pro aplikaci Outlook, vyberte prosím e-mail, jehož přílohy přejmenujete, a poté klikněte na Kutools > Nástroje pro připojení > Přejmenovat vše.

2. V Přejmenování příloh V dialogovém okně můžete vidět název všech příloh vybraného e-mailu v seznamu Příjmení sloupec. Poklepejte na název přílohy, který chcete upravit, a poté klikněte na ikonu OK pro uložení změn.
Tipy: Můžete upravit všechny názvy příloh nebo upravit libovolný název přílohy podle potřeby v dialogovém okně.

Poté jsou přílohy ve vybraném e-mailovém okně přejmenovány. 

Poznámka: Určitou přílohu můžete přejmenovat tak, že ji vyberete v podokně čtení a kliknete na Kutools > Přejmenovat, v dialogovém okně přejmenování zadejte nový název do Příjmení a poté klikněte na OK tlačítko pro uložení. Viz snímek obrazovky:

Chcete-li mít bezplatnou zkušební verzi tohoto nástroje, přejděte na software si stáhněte zdarma nejprve a poté přejděte k použití operace podle výše uvedených kroků.


Související články:


Nejlepší nástroje pro produktivitu v kanceláři

Kutools pro aplikaci Outlook - Více než 100 výkonných funkcí, které doplní váš Outlook

???? Automatizace e-mailu: Mimo kancelář (k dispozici pro POP a IMAP)  /  Naplánujte odesílání e-mailů  /  Automatická kopie/skrytá kopie podle pravidel při odesílání e-mailu  /  Automatické přeposílání (pokročilá pravidla)   /  Automatické přidání pozdravu   /  Automaticky rozdělte e-maily pro více příjemců na jednotlivé zprávy ...

📨 Email management: Snadné vyvolání e-mailů  /  Blokujte podvodné e-maily podle předmětů a dalších  /  Odstranit duplicitní e-maily  /  pokročilé vyhledávání  /  Konsolidovat složky ...

📁 Přílohy ProDávkové uložení  /  Dávkové odpojení  /  Dávková komprese  /  Automaticky uložit   /  Automatické odpojení  /  Automatické komprimování ...

???? Rozhraní Magic: 😊 Více pěkných a skvělých emotikonů   /  Zvyšte produktivitu své aplikace Outlook pomocí zobrazení s kartami  /  Minimalizujte aplikaci Outlook namísto zavírání ...

???? Zázraky na jedno kliknutí: Odpovědět všem s příchozími přílohami  /   E-maily proti phishingu  /  🕘Zobrazit časové pásmo odesílatele ...

👩🏼‍🤝‍👩🏻 Kontakty a kalendář: Dávkové přidání kontaktů z vybraných e-mailů  /  Rozdělit skupinu kontaktů na jednotlivé skupiny  /  Odeberte připomenutí narozenin ...

Přes 100 Vlastnosti Očekávejte svůj průzkum! Kliknutím sem zobrazíte další informace.

Více       Stažení zdarma      Nákup
 

 

Comments (9)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Well, that didn't work. Thanks for nothing.
This comment was minimized by the moderator on the site
Dear Mike,
Any problem with the method, please don't hesitate to let me know. Thank you for your comment.
This comment was minimized by the moderator on the site
I can only echo previous comments: I would like to be able to re-name the file when I forward it. I wouldn't want to re-name the original that I received from a client. I need to be able to re-name when I'm passing on files internally and they need to comply with internal naming conventions. It's a shame that this is not available.
This comment was minimized by the moderator on the site
Dear SG,
The suggestion was adopted. We are trying to enhance the function to be more useful. We really appreciate your advice.
This comment was minimized by the moderator on the site
I think it is essential that you can re-name files in message that you want to forward. I need to keep the original name of a file in the original e-mail, but re-name to comply with internal naming conventions before I pass it on internally. So, I need to be able to see both entries.
This comment was minimized by the moderator on the site
Nice tool with the Kutools add on. There is a condition I think is confusing people. You can't rename it in the message if you pop the message out of the main Outlook Window. You have to be in the main Outlook interface, highlight the attachment, then the ATTACHMENT TOOLS tab turns on. There, appears a second KUTOOLS tab with the rename option in the original email.
This comment was minimized by the moderator on the site
Nice tool with Kutools! I find that the rename option is available on the original email only if you haven't popped the email out of the Outlook Interface. The Attachment Tools tab is highlighted and you have to switch to the Kutools tab under the Attachment Tools tab. I think that is where people are getting confused.
This comment was minimized by the moderator on the site
Nice software, but it sucks that you can only change the name of the file AFTER an email has been sent. That defeats the purpose. Want to change the name when creating a new email just after having attached the file BEFORE sending out.
This comment was minimized by the moderator on the site
yes, want to change name before send out, the feature is very important to us.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations