StartDownloadsServiceBeispieleWorkshopsKontakt DeutschEnglish
 
Beispiele
Allgemein
Outlook®
 
Awarded by
Microsoft since 2005:
mvp logo
VBOffice Info
Besucher1638244
Aufrufe6203176
Links
Impressum
Datenschutz
Kontakt
E-Mail: Eine Kopie an die eigene Adresse senden
Autor: Michael BauerHomepage
Datum: 17.11.2009Zugriffe: 19558
  
Beschreibung

Dieses Beispiel sendet eine Kopie jeder ausgehenden E-Mail an eine festgelegte Adresse. Die Adresse wird als BCC hinzugefügt, so dass der Empfänger der E-Mail das nicht sehen kann.

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
  Dim R As Outlook.Recipient
  Dim Address$

  Address = "abc@domain.com"

  Set R = Item.Recipients.Add(Address)
  R.Type = olBCC
  R.Resolve
End Sub
 
 

ReplyAll warnt Sie, bevor Sie unbeabsichtigt allen Empfängern einer E-Mail antworten oder wenn Sie ein vertraulicher BCC-Empfänger der E-Mail ... [weiter]

 

Blitzschneller Zugriff auf die Hauptkategorienliste, gemeinsame Kategorien im Netzwerk, eine Erinnerungsfunktion ... [weiter]

 

SAM legt automatisch Absender, Signatur und Speicherort für gesendete Mails fest, z.B. anhand der ... [weiter]

 

OLKeeper verhindert zuverlässig, dass Mitarbeiter Outlook schließen und dadurch Termine oder E-Mails ... [weiter]

So entgeht Ihnen kein Auftrag mehr:
Telefonservice und Sekretariatsservice