Hogyan kötegelhetem a fájlcsomagot formátumként az összes Outlook névjegyhez?
Általában a névjegyfájlok vezetéknév keresztnévként jelennek meg az Outlook programban, de hogyan változtathatja meg gyorsan a kapcsolattartó fájlokat formátumban Társaság vagy más sorrendben, az alábbi képernyőképen? Az opció alapértelmezett „Fájl másként” sorrendje csak az új névjegynél működik, a meglévőknél nem. Itt bemutatok egy VBA kódot a fájlcsomag kötegelt formázására az Outlook összes létező névjegyéhez.
Kötegelt változtatási fájl, mint minden VBA-val rendelkező kapcsolat esetén
Kötegelt változtatási fájl, mint minden VBA-val rendelkező kapcsolat esetén
1. Válassza ki azokat a névjegyeket, amelyekkel módosítani szeretné a fájlt, majd nyomja meg az gombot Alt + F11 gombok a Microsoft Visual Basic for Applications ablak.
2. Kattintson duplán a ThisOutlookSession in Project-Project1 ablaktáblán, és másolja és illessze be a kódot az üres parancsfájlba.
VBA: Fájl módosítása
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. nyomja meg F5 gombot a kód futtatásához, akkor az összes kiválasztott névjegy megváltozott a fájl cégként.
Jegyzet:
1. A kódban megváltoztathatja CompanyName más mezőkbe, amelyekben a fájlt szeretné megjeleníteni.
2. Ha nincs céginformáció, akkor megjeleníti a teljes nevet.
A legjobb irodai hatékonyságnövelő eszközök
Kutools az Outlook számára - Több mint 100 hatékony funkció az Outlook feltöltéséhez
???? E-mail automatizálás: Hivatalon kívül (POP és IMAP esetén elérhető) / Ütemezze az e-mailek küldését / Automatikus CC/BCC szabályok szerint e-mail küldésekor / Automatikus továbbítás (Speciális szabályok) / Automatikus üdvözlet hozzáadása / A több címzettnek szóló e-mailek automatikus felosztása egyedi üzenetekre ...
📨 Email Management: Könnyen visszahívhatja az e-maileket / Blokkolja az alanyok és mások átverő e-mailjeit / Törölje az ismétlődő e-maileket / Részletes keresés / Mappák összevonása ...
📁 Attachments Pro: Kötegelt mentés / Batch Detach / Batch tömörítés / Automatikus mentés / Automatikus leválasztás / Automatikus tömörítés ...
🌟 Interface Magic: 😊További szép és menő hangulatjelek / Növelje Outlook termelékenységét a füles nézetekkel / Minimalizálja az Outlookot a bezárás helyett ...
👍 Csodák egy kattintással: Válasz mindenkinek a bejövő mellékletekkel / Adathalászat elleni e-mailek / 🕘A feladó időzónájának megjelenítése ...
👩🏼🤝👩🏻 Névjegyek és naptár: Névjegyek kötegelt hozzáadása a kiválasztott e-mailekből / Egy kapcsolattartó csoport felosztása egyéni csoportokra / Távolítsa el a születésnapi emlékeztetőket ...
Több, mint 100 Jellemzők Várja felfedezését! Kattintson ide, ha többet szeretne megtudni.