OutlookBarGroups.GroupAdd-Ereignis (Outlook)

Tritt auf, wenn eine neue Gruppe im Verknüpfungsbereich hinzugefügt wurde.

Syntax

Ausdruck. GroupAdd( _NewGroup_ )

Ausdruck Eine Variable, die ein OutlookBarGroups-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
NewGroup	Erforderlich	OutlookBarGroup	Die OutlookBarGroup, die hinzugefügt wurde.

HinwBemerkungeneise

Dieses Ereignis ist in Microsoft Visual Basic Scripting Edition (VBScript) nicht verfügbar.

Beispiel

In diesem Beispiel für Microsoft Visual Basic für Applikationen (VBA) wird beim Erstellen einer Gruppe eine Verknüpfung zum Kalender hinzugefügt. Der Beispielcode muss sich in einem Klassenmodul befinden, und die Initialize_handler-Routine muss aufgerufen werden, bevor Microsoft Outlook die Ereignisprozedur aufrufen kann.

Dim WithEvents myOlGroups As Outlook.OutlookBarGroups 
Dim myOlBar As Outlook.OutlookBarPane 
 
Sub Initialize_handler() 
 Set myOlBar = Application.ActiveExplorer.Panes.Item("OutlookBar") 
 Set myOlGroups = myOlBar.Contents.Groups 
End Sub 
 
Private Sub myOlGroups_GroupAdd(ByVal NewGroup As Outlook.OutlookBarGroup) 
 Dim myFolder As Outlook.Folder 
 Set myFolder = myOlApp.GetNamespace("MAPI").GetDefaultFolder(olFolderCalendar) 
 NewGroup.Shortcuts.Add myFolder, "Calendar" 
End Sub

Siehe auch

OutlookBarGroups-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.