Thema Datum  Von Nutzer Rating
Antwort
03.02.2017 18:35:08 gringo
NotSolved
Blau Termin aus Excel per VBA an mehrere Mail Adressen senden
 03.02.2017 18:41:25 Gast21246
NotSolved

Ansicht des Beitrags:
Von:
Gast21246		 Datum:
03.02.2017 18:41:25		 Views:
522		 Rating:
     
Antwort:
  Ja
Thema:
Termin aus Excel per VBA an mehrere Mail Adressen senden		 
Public Function lvOutlook(outDate As String, outDauer As Long, outSubject As String, outBody As String, outlocation As String) As Boolean 
 
'Hier beginnen die Termine 
    Set OutApp = CreateObject("Outlook.Application") 
    Set apptOutApp = OutApp.CreateItem(1) 'olAppointmentItem) 
    With apptOutApp 
        'Datum und Uhrzeit - als Start-Uhrzeit 00:00
        .Start = Format(outDate, "dd.mm.yyyy") & " 00:00" ' Es kann auch eine andere Uhrzeit festgelegt werden. 
         
        'Termininfo 
        .Subject = outSubject 
        'oder der Betreff steht in der Spalte rechts von den Terminen 
        
        .Location = outlocation '         'Ort
         
        .Duration = outDauer   ' 1 Std. = "60" Dauer in Minuten 
        'Erinnerung setzen in Outlook (hier inaktiv)
      '       
        .ReminderPlaySound = True 
         
        'Erinnerung wiederholen 
        .ReminderSet = True 
         
        'Termin speichern 
        .Save 
    End With 
     
    Set apptOutApp = Nothing 
    Set OutApp = Nothing 
 
    lvOutlook = True 
    MsgBox "Termin an Outlook übertragen." 
      
Exit Function 
 
ErrOutLook: 
Set apptOutApp = Nothing 
Set OutApp = Nothing 
lvOutlook = False 
MsgBox "Termin konnte in Outlook nicht eingetragen werden.  Fehler:" & Err.Description 
 
End Function

hier nochmal der Code

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
03.02.2017 18:35:08 gringo
NotSolved
Blau Termin aus Excel per VBA an mehrere Mail Adressen senden
 03.02.2017 18:41:25 Gast21246
NotSolved