Jak wsadowo zmienić plik jako format dla wszystkich kontaktów w Outlooku?
Ogólnie rzecz biorąc, pliki kontaktów są wyświetlane jako Nazwisko i imię w Outlooku, ale jak możesz szybko zbiorczo zmienić pliki kontaktów jako format na Firmę lub inną kolejność, jak pokazano na zrzucie ekranu? Opcja Domyślna kolejność „Zapisz jako” może działać tylko dla nowego kontaktu, ale nie dla już istniejących. Tutaj wprowadzam kod VBA do pliku zmian wsadowych jako format dla wszystkich istniejących kontaktów w Outlooku.
Plik zmian wsadowych jak dla wszystkich kontaktów z VBA
Plik zmian wsadowych jak dla wszystkich kontaktów z VBA
1. Wybierz kontakty, dla których chcesz zmienić plik, naciśnij Alt + F11 klawisze, aby włączyć Microsoft Visual Basic for Applications okno.
2. Kliknij dwukrotnie ThisOutlookSession in Project-Project1 okienko i skopiuj i wklej poniższy kod do pustego skryptu.
VBA: Zmień plik na
Sub ChangeFileAsforContracts()
'UpdatebyExtendoffice20180404
Dim xSelItems As Object
Dim xItem As Object
Dim xContact As ContactItem
Dim xFileAs As String
On Error Resume Next
If Outlook.Application.ActiveExplorer.CurrentFolder.DefaultItemType <> olContactItem Then
MsgBox "Please select the contact folder first", vbInformation + vbOKOnly, "Kutools for Outlook"
Exit Sub
End If
Set xSelItem = Outlook.ActiveExplorer.Selection
For Each xItem In xSelItem
If xItem.Class = olContact Then
Set xContact = xItem
With xContact
If .CompanyName = "" Then
xFileAs = .FullName
Else
xFileAs = .CompanyName
End If
.FileAs = xFileAs
.Save
End With
End If
Next
End Sub
3. naciśnij F5 klawisz, aby uruchomić kod, wówczas wszystkie wybrane kontakty zostały zmienione w pliku jako firma.
Uwaga:
1. W kodzie możesz zmienić CompanyName do innych pól, jako które chcesz wyświetlić plik.
2. Jeśli nie ma informacji o firmie, wyświetli się pełna nazwa.
Najlepsze narzędzia biurowe
Kutools dla programu Outlook - Ponad 100 zaawansowanych funkcji, które usprawnią Twoje perspektywy
🤖 Asystent poczty AI: Natychmiastowe profesjonalne e-maile z magią AI — genialne odpowiedzi jednym kliknięciem, doskonały ton, biegła znajomość wielu języków. Zmień e-mailing bez wysiłku! ...
📧 Automatyzacja poczty e-mail: Poza biurem (dostępne dla POP i IMAP) / Zaplanuj wysyłanie wiadomości e-mail / Automatyczne CC/BCC według reguł podczas wysyłania wiadomości e-mail / Automatyczne przewijanie (Zasady zaawansowane) / Automatyczne dodawanie powitania / Automatycznie dziel wiadomości e-mail od wielu odbiorców na pojedyncze wiadomości ...
📨 Zarządzanie e-mail: Łatwe przywoływanie e-maili / Blokuj oszukańcze wiadomości e-mail według tematów i innych / Usuń zduplikowane wiadomości e-mail / Wiecej opcji / Konsoliduj foldery ...
📁 Załączniki Pro: Zapisz zbiorczo / Odłącz partię / Kompresuj wsadowo / Automatyczne zapisywanie / Automatyczne odłączanie / Automatyczna kompresja ...
🌟 Magia interfejsu: 😊Więcej ładnych i fajnych emotikonów / Zwiększ produktywność programu Outlook dzięki widokom na kartach / Zminimalizuj program Outlook zamiast go zamykać ...
>> Cuda jednym kliknięciem: Odpowiedz wszystkim, dodając przychodzące załączniki / E-maile chroniące przed phishingiem / 🕘Pokaż strefę czasową nadawcy ...
👩🏼🤝👩🏻 Kontakty i kalendarz: Grupowe dodawanie kontaktów z wybranych e-maili / Podziel grupę kontaktów na pojedyncze grupy / Usuń przypomnienia o urodzinach ...
O Cechy 100 Poczekaj na eksplorację! Kliknij tutaj, aby dowiedzieć się więcej.
