Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
956to960
956to960
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Excel- Outlook Besprechungsanfrage

Forumthread: Excel- Outlook Besprechungsanfrage

Excel- Outlook Besprechungsanfrage
05.03.2008 16:06:00
Thomas
Hallo,
kann ich aus Excel heraus einen Termin in Outlook einstellen und gleichzeitig Teilnehmer einladen und eine Anlage mit der Einladung versenden (Besprechungsanfrage).
mfg Thomas

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel- Outlook Besprechungsanfrage
05.03.2008 16:34:00
Tino
Hallo,
hier mal ein Anfang um Termine an Outlook zu übergeben.
Für Besprechungsanfrage, müsste ich auch erst mal schauen wie das geht.

'Start des Termins hier, A1 Datum und B1 Uhrzeit
Sub Term_Outlook()
Dim myOLApp As Object
Dim myItem As Object
Set myOLApp = CreateObject("Outlook.Application")
Set myItem = myOLApp.CreateItem(1)
With myItem
.Subject = "Datei: " & ActiveWorkbook.Name 'Betreff
.Body = "Was ich schon immer mal sagen wollte..." 'Text
.Attachments.Add "C:\DBS.TXT" 'für Anlagen
.Location = "Schule" 'Ort
.Start = Format(Range("A1").Value, "dd.mm.yyyy") & " " & _
Format(Range("B1").Value, "hh:mm")
.Duration = "10" 'tauer
.ReminderMinutesBeforeStart = 10
.ReminderPlaySound = True
.ReminderSet = True
.Save
End With
MsgBox "Termine an Outlook übertragen!"
Set myOLApp = Nothing
Set myItem = Nothing
End Sub


Gruß
Tino

Anzeige
AW: Excel- Outlook Besprechungsanfrage
05.03.2008 18:16:00
Tino
Hallo,
durch hinzufügen von
.OptionalAttendees = "Test1@EmailTest.de; Test2@EmailTest.de" 'Teilnehmer
wird eine Teilnehmerliste hinzugefügt.
Gruß
Tino
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige