Preprosto natisnite poslano e-poštno sporočilo s prejemniki Bcc v Outlooku

Sledite spodnjim korakom, da uporabite VBA za tiskanje izbranega e-poštnega sporočila, pri čemer ignorirate njegove prejemnike v programu Outlook.

1. Izberite e-poštno sporočilo, ki ga boste natisnili brez prejemnikov, in pritisnite druga + F11 za odpiranje okna Microsoft Visual Basic for Applications.

2. klik Vstavi > Moduliin nato prilepite pod kodo VBA v odpiralno okno modula.

VBA: natisnite e-poštno sporočilo brez prejemnikov

Public Sub PrintWithoutRecipient()
Dim oItem As Outlook.MailItem
Dim i As Long

For i = 1 To Application.ActiveExplorer.Selection.Count
Set oItem = Application.ActiveExplorer.Selection.Item(i)
oItem.To = ""
oItem.CC = ""
oItem.PrintOut
oItem.Close olDiscard
Set oItem = Nothing
Next
End Sub

3. Pritisnite F5 ali kliknite Run za zagon tega VBA.

Zdaj se izbrano e-poštno sporočilo natisne brez prejemnikov.

Opomba: Ta VBA bo natisnil e-pošto s privzetim tiskalnikom in nastavitvami tiskanja, ki jih konfigurirate v Outlooku.

Iščite po e-pošti po imenih prejemnikov v Outlooku

Štejte število prejemnikov v poljih Za, Kp in Skp v Outlooku

Natisnite prejemnike skp v poslano e-poštno sporočilo v Outlooku