Excel-Daten in Outlook übertragen?!?

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox


Excel-Version: 8.0 (Office 97)
nach unten

Betrifft: Excel-Daten in Outlook übertragen?!?
von: Alex
Geschrieben am: 14.06.2002 - 10:46:21

Ich möchte in Excel eine Terminliste führen (Datum, Termingrund, Ort). Gibt es eine (möglichst unkomplizierte) Möglichkeit, diese Termine per Makro aus Excel in den Outlook-Kalender eintragen zu lassen?

nach oben   nach unten

Re: Excel-Daten in Outlook übertragen?!?
von: guenter
Geschrieben am: 14.06.2002 - 11:05:52

hallo,beispiel kannst dir auch die mappe laden
http://www.internetwelt-web.de

Sub TermineVonExcelNachOutlookÜbernehmen()
Dim objOutlook As Outlook.Application
Dim apptOutlook As Outlook.AppointmentItem
   Set objOutlook = CreateObject("Outlook.Application")
    Range("A2").Select
    Do Until ActiveCell.Value = ""
     Set apptOutlook = objOutlook.CreateItem(olAppointmentItem)
     With apptOutlook
        .Subject = ActiveCell.Value
        .Body = ActiveCell.Offset(0, 1).Value
        .Location = ActiveCell.Offset(0, 2).Value
        .Start = ActiveCell.Offset(0, 3).Value
        .Duration = ActiveCell.Offset(0, 4).Value
        .RequiredAttendees = ActiveCell.Offset(0, 5).Value
        .ReminderMinutesBeforeStart = 10
        .ReminderPlaySound = True
        .ReminderSet = True
        .Save
     End With
     ActiveCell.Offset(1, 0).Select
    Loop
    MsgBox "Termine an Outlook übertragen!"
    Set apptOutlook = Nothing
    Set objOutlook = Nothing
End Sub

mfg
nach oben   nach unten

HILFE!!! Geht so nicht!!!
von: Alex
Geschrieben am: 14.06.2002 - 13:37:57

Das Listing sieht gut aus. Vielen Dank dafür!!!
Aber bei der Ausführung in Excel bekomme ich eine Fehlermeldung "Fehler beim Kompilieren: Benutzerdefinierter Typ nicht definiert" in Zeile 2 ("Dim objOutlook As Outlook.Application")

Was muß ich tun???

nach oben   nach unten

Geht doch,,,
von: Alex
Geschrieben am: 14.06.2002 - 13:48:28

Sorry, eigene Dummheit.

Jetzt funzt es.


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Excel-Daten in Outlook übertragen?!?"