Outlook - Termin von Outlook an Handy senden

Termin von Outlook an Handy senden

Ein Handy muss für SMS-Empfang freigeschaltet sein. Im Outlook-VBA legt man ein neues Projekt an, klickt auf "Microsoft Outlook Objekte" und "DieseOutlookSitzung".

Quellcode:

Sub Application_Reminder(ByVal Item As Object)
Dim strTerminInfo As String
Dim olRemindMail As MailItem

If TypeName(Item) = "AppointmentItem" And Item.Importance = olImportanceHigh Then
  strTerminInfo = "Termin(" & Format(Item.Star, "ddd dd.mm. hh.nn") & _
    "-" & Format(Item.End, "hh:nn") & "): " & Item.Subject
  Set olRemindMail = Outlook.CreateItem(olMailItem)
  With olRemindMail
    .Subject = strTerminInfo
    .Recipients.Add "0123456789@dein_provider.de"
  .Send
 End With
End If

End Sub
           
Sponsoren und Investoren

Sponsoren und Investoren sind jederzeit herzlich willkommen! Wenn Sie die Information(en) auf diesen Seiten interessant fanden, freuen wir uns über Ihren Förderbeitrag. Empfehlen Sie uns auch gerne in Ihren Netzwerken. Herzlichen Dank!

Nutzen Sie unsere Suchfunktion:

Nach oben Sitemap
Impressum Datenschutz

Hinweis: Diese Webseite kann Werbeanzeigen und Werbeeinblendungen oder eingebundene Links von Diensten und Inhalten Dritter enthalten. Beachten Sie dazu unsere Datenschutzerklärung.