Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Termin per VBA an eigenen Outlook-Kalender senden.

833 views
Skip to first unread message

Holger Kuik

unread,
Dec 4, 2008, 8:00:07 AM12/4/08
to
Hallo zusammen,
ich möchte aus einer Excel per Command Button die Daten aus einem Datensatz
in einen Outlook Termin in meinen Kalender eintragen lassen. Ich weiß aber
nicht wie ich die Objekte in Outlook ansprechen muß. damit es funktioniert.
Kann mir jemand helfen?
Vielen Dank im Voraus.

Gruß
Holger Kuik

stefan onken

unread,
Dec 5, 2008, 4:26:07 AM12/5/08
to
On 4 Dez., 14:00, Holger Kuik <HolgerK...@discussions.microsoft.com>
wrote:

hallo Holger,
hier ein Bsp zum ausprobieren:

Sub KalenderEintragErstellen()
Set objOL = CreateObject("Outlook.Application")
Set apptOL = objOL.CreateItem(1)
With apptOL
.Start = "06.12.08 11:10"
.Duration = 15
.Subject = "neuer Eintrag zur Erinnerung"
'.AllDayEvent = True
'.Categories = "Dienst"
.Save
End With
Set apptOL = Nothing
Set objOL = Nothing
End Sub

oder auch http://www.office.gmxhome.de/_excel_outlook.htm#Termin_an_Outlook

für das ansprechen der Outlook-Objekte (bzw generell in einer anderen
Anwendung) gibt es 2 Möglichkeiten, early und late binding.
http://www.online-excel.de/excel/singsel_vba.php?f=85

Gruß
stefan

Holger Kuik

unread,
Dec 5, 2008, 5:41:01 AM12/5/08
to
Hallo Stefan,
vielen Dank für die Hilfe, hat super funktioniert.
Gruß
Holger

Stefan Engler

unread,
Dec 7, 2008, 5:57:40 PM12/7/08
to
> Sub KalenderEintragErstellen()
> Set objOL = CreateObject("Outlook.Application")
> Set apptOL = objOL.CreateItem(1)
> With apptOL
>  .Start = "06.12.08 11:10"
>  .Duration = 15
>  .Subject = "neuer Eintrag zur Erinnerung"
>  '.AllDayEvent = True
>  '.Categories = "Dienst"
>  .Save
> End With
> Set apptOL = Nothing
> Set objOL = Nothing
> End Sub

Da du dich so gut auskennst habe ich gleich noch eine Frage zur
Zusammenarbeit mit
Outlook: Kann ich irgendwie auf Exchange Ordern direkt zugreifen. (sie
werden ja erst
mit Outlook 2007 in das ObjectModell exportiert, deswegen dachte ich
dass die EntryID
als Zugriff ausreicht aber die EntryID reicht nur für den Zugriff auf
lokal eingerichtete Ordner
aus. Kann ich über das Tupel EntryID,StoreID irgendwie direkt auf
Elemente zugreifen ohne mich
mit Outlook selbst rumschlagen zu müssen.
(CDO gibt es nur bis Outlook 2002, SMAPI auch nur bis 2000
(eingeschränkt bis Ver. 2002),
MAPI soll nicht ganz einfach sein, Revocation DLL soll nicht
installiert werden müssen)

Ich habe momentan an das MAPIX und MAPIDEFS OLE Interface gedacht aber
hier habe ich
viele "riskante" Operationen mit denen ich hantieren müsste und muss
riesiege mehere MB
(rund 100 MB insgesamt) große Tabellen im Speicher verwalten.

0 new messages