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

Mehr Tipps: Outlook Express - Hinweis: OE removed Access to the following unsafe attachments in your mail

Sponsoren und Investoren

Sponsoren und Investoren sind jederzeit herzlich willkommen!
Wenn Sie die Information(en) auf dieser Seite interessant fanden, freuen wir uns über eine kleine Spende. Empfehlen Sie uns bitte auch in Ihren Netzwerken (z. B. Twitter, Facebook oder Google+). Herzlichen Dank!

Nach oben Sitemap
Impressum & Kontakt