Wielu użytkowników ma nadzieję, że program Outlook może automatycznie wyszukiwać określone słowa w nazwach załączników, a następnie zapisywać określone załączniki w lokalnym folderze na ich komputerach. W tym artykule dowiesz się, jak to osiągnąć za pomocą programu Outlook VBA.
W mojej codziennej pracy, jeśli załączniki w otrzymanych e-mailach nie są bardzo ważne, wolę nie zapisywać ich na lokalnym dysku, tylko czytać je bezpośrednio w Outlooku. Ale jeśli załączniki są ważne, takie jak regulamin personalny, miesięczny raport z pracy, zapiszę je w określonym folderze na moim komputerze. W takim przypadku chcę skonfigurować Outlooka, aby automatycznie zapisywał załączniki wiadomości e-mail, których nazwy zawierają określone słowa, w określonym folderze. Więc znajduję szybką metodę realizacji tego za pomocą Outlook VBA. Oto rozbudowane kody i kroki VBA:
Automatyczne zapisywanie określonych załączników wiadomości e-mail
- Najpierw należy uruchomić program Outlook i przejść do zakładki „Programista”.
- Następnie kliknij przycisk „Visual Basic” w grupie „Code”.
- Następnie w oknie „Visual Basic” należy otworzyć projekt „ThisOutlookSession” i skopiować do niego poniższe kody.
Public WithEvents olItems As Outlook.Items
Private Sub Application_Startup()
Set olItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub olItems_ItemAdd(ByVal Item As Object)
Dim NewMail As Outlook.MailItem
Dim Atts As Attachments
Dim Att As Attachment
Dim strPath As String
Dim strName As String
If Item.Class = olMail Then
Set NewMail = Item
End If
Set Atts = Item.Attachments
If Atts.Count > 0 Then
For Each Att In Atts
'Replace "test" with what you want to look for in attachment name
If InStr(LCase(Att.FileName), "test") > 0 Then
'Use your wanted destination folder path to save the attachments
strPath = "C:\Attachments\"
strName = NewMail.Subject & " " & Chr(45) & " " & Att.FileName
Att.SaveAsFile strPath & strName
End If
Next
End If
End Sub
- Następnie należy podpisać ten kod.
- Po pierwsze, użyj Certyfikatu cyfrowego dla projektów VBA, aby utworzyć certyfikat.
- Następnie przypisz certyfikat do tego kodu, jak pokazano na poniższym obrazku:
- Następnie możesz wyjść z bieżącego okna „Visual Basic” i kliknąć przycisk „Ustawienia makr” w grupie „Kod” w zakładce „Programista”.
- Od teraz Outlook automatycznie zapisuje załączniki, których nazwy zawierają określone słowa, w określonym folderze lokalnym.
Odzyskaj po poważnej korupcji programu Outlook
Pomimo wielu funkcji Outlook jest nadal podatny na korupcję. Dlatego powinieneś mieć oko na wszystkie problemy, które mogą wystąpić w twoim Outlooku, takie jak Błąd poczty PST, Outlook nie odpowiada i tak dalej. W obliczu błędów możesz skorzystać z wbudowanego narzędzia do naprawy programu Outlook, ScanPST.exe, aby je naprawić. Jeśli to się nie powiedzie, skorzystaj z potężniejszego narzędzia.
Wprowadzenie autora:
Shirley Zhang jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym naprawa SQL Server Problem z plikiem mdf i oprogramowanie do naprawy programu Outlook. po więcej informacji odwiedź www.datanumen.com