Wie kann man in Outlook einen Termin in eine Besprechung und umgekehrt ändern?

Einen Termin in eine Besprechung in Outlook ändern

Besprechungen in Termine in Outlook ändern

Diese Methode führt Sie durch das Einladen von Besprechungsteilnehmern für einen Termin und die Umwandlung des Termins in eine Besprechung in Outlook.

1. Wechseln Sie zur Kalenderansicht, klicken Sie mit der rechten Maustaste auf den Termin, den Sie in eine Besprechung im Kalender umwandeln möchten, und wählen Sie dann „Teilnehmer einladen“ aus dem Kontextmenü aus. Siehe Screenshot:

2. Nun öffnet sich ein Besprechungsfenster mit dem Inhalt des ausgewählten Termins. Klicken Sie bitte auf die Schaltfläche „An“. Siehe Screenshot:

3. Wählen Sie im aufgehenden Dialogfeld „Teilnehmer und Ressourcen auswählen“ die Kontakte aus, die Sie als Teilnehmer einladen möchten, klicken Sie je nach Bedarf auf die Schaltfläche „Erforderlich“/„Optional“/„Ressourcen“ und klicken Sie dann auf die Schaltfläche „OK“. Siehe obigen Screenshot:

Hinweis: Halten Sie die Taste „Strg“, können Sie mehrere nicht angrenzende Kontakte auswählen, indem Sie jedes Kontakt anklicken; halten Sie die Taste „Umschalt“, können Sie mehrere angrenzende Kontakte auswählen, indem Sie auf den ersten und letzten Kontakt klicken.

4. Nun kehren Sie zum Besprechungsfenster zurück, bearbeiten Sie den Besprechungsinhalt und klicken Sie auf die Schaltfläche „Senden“.

Bisher haben wir den ausgewählten Termin in eine Besprechung umgewandelt und an bestimmte Teilnehmer gesendet.

Diese Methode stellt ein VBA vor, um ausgewählte Besprechungen in Termine in Outlook umzuwandeln. Bitte gehen Sie wie folgt vor:

1. Wechseln Sie zur Kalenderansicht und klicken Sie auf die Besprechungen, die Sie in einen Termin im Kalender umwandeln möchten.

2. Drücken Sie gleichzeitig die Tasten „Alt“ + „F11“, um das Microsoft Visual Basic for Applications-Fenster zu öffnen.

3. Klicken Sie auf „Einfügen“ > „Modul“ und fügen Sie dann den folgenden VBA-Code in das neue Modulfenster ein.

VBA: Besprechung in Termine in Outlook umwandeln

Sub Meetings2Appointments()
Dim sWindowType As String
Dim oItem As Object

sWindowType = TypeName(Application.ActiveWindow)
Select Case sWindowType
Case "Explorer"
If Application.ActiveExplorer.Selection.Count > 0 Then
For Each oItem In Application.ActiveExplorer.Selection
Debug.Print oItem.Class
If oItem.Class = olAppointment Then
If oItem.MeetingStatus <> olNonMeeting Then
Call Meeting2Appointment(oItem)
End If
End If
Next
End If
Case "Inspector"
Set oItem = Application.ActiveInspector.CurrentItem
If oItem.Class = olAppointment Then
If oItem.MeetingStatus <> olNonMeeting Then
Call Meeting2Appointment(oItem)
End If
End If
End Select
Set oItem = Nothing
End Sub

Sub Meeting2Appointment(oMeeting As Outlook.AppointmentItem)
With oMeeting
' remove all recipients
Do Until .Recipients.Count = 0
.Recipients.Remove 1
Loop
' reset meeting status
.MeetingStatus = olNonMeeting
.Save
End With
End Sub

4. Drücken Sie die Taste „F5“ oder klicken Sie auf die Schaltfläche „Ausführen“, um dieses VBA auszuführen.

Und jetzt sind alle ausgewählten Besprechungen in Termine in Outlook umgewandelt.

Alle Termine im Kalender in Outlook ausblenden

Geburtstagstermine im Kalender in Outlook ausblenden