Mit Visual Basic Ordner in Outlook erstellen

Die Überschrift sagt wohl schon alles :smile:
Brauche unbedingt Hilfe.
Muss mit VB einen Unterordner im Posteingang von Outlook erstellen und löschen können.
also: Posteingang/Test1

Also, danke schonmal

cu@all
Marco

Guckst Du hier
Hallo!

Unter Project/References Den Eintrag „Microsoft Outlook X.0 Object Library“ hinzufügen.

option explicit 

Dim myolAPP As Outlook.Application
Dim mynamespace As Outlook.NameSpace
Dim mynewfolder As Object

Set myolAPP = CreateObject("Outlook.Application")
Set mynamespace = myolAPP.GetNamespace("MAPI")
Set myFolder = mynamespace.GetDefaultFolder(olFolderContacts) 'ol-xxx sind Outlook-Konstante
Set mynewfolder = myFolder.Folders.Add("Hugo")

Grüße

Gollum