Hallo,
ich würde gerne ankommende Mails die einen bestimmten Ausdruck im Betraff haben in Unterordner Sortieren.
Dies sind meine ersten Schritte uin VBA, also bitte nicht überrascht sein
der Betreff der Mails sieht wie folgt aus:
[Ticket#123456789123] FEHLERDIAGNOSE_1242342_56734557
Die Zahl hinter [Ticket# ist die TicketID und ich hätte gerne, dass alle Mails mit der selben TicketID in den selben Unterordner des Ordners Tickets kommen. Der Oirdnername soll die TicketID sein. Wenn ein Ordner noch nicht existiert, soll er angelegt werden.
mein Ansatz:
Aber wie kann ich hier Wildcards verwenden, so dass der String zwischen [Ticket# und ] herangezogen wird?
Vielen Dank!
P.S.: von VB bin ich es gewohnt, dass ein Content-Menü aufgeht, wenn ich auf Eigenschaften eines Objekts Zugreifen möchte, so ist es einfacher bestimmte Eigenschaften zu finden. Guibt es eine solche Funktionalität in VBA nicht?
ich würde gerne ankommende Mails die einen bestimmten Ausdruck im Betraff haben in Unterordner Sortieren.
Dies sind meine ersten Schritte uin VBA, also bitte nicht überrascht sein
der Betreff der Mails sieht wie folgt aus:
[Ticket#123456789123] FEHLERDIAGNOSE_1242342_56734557
Die Zahl hinter [Ticket# ist die TicketID und ich hätte gerne, dass alle Mails mit der selben TicketID in den selben Unterordner des Ordners Tickets kommen. Der Oirdnername soll die TicketID sein. Wenn ein Ordner noch nicht existiert, soll er angelegt werden.
mein Ansatz:
Visual Basic-Quellcode
- Public Sub sortMails()
- Dim Mails As Outlook.Items
- Dim Mail As Object
- Dim FolderInbox As MAPIFolder
- Dim FolderDest As MAPIFolder
- 'Outlook als Object erstellen
- Set MyOutlook = CreateObject("Outlook.Application")
- Set myNameSpace = MyOutlook.GetNamespace("MAPI")
- 'Default-Mailbox
- Set FolderInbox = myNameSpace.GetDefaultFolder(olFolderInbox)
- Set FolderDest = FolderInbox.Parent.Folders("Tickets")
- Set Mails = FolderInbox.Items
- Set Mail = Mails.Find("[Subject] = '[Ticket#' ")
- Mail.Move FolderDest
- End Sub
Aber wie kann ich hier Wildcards verwenden, so dass der String zwischen [Ticket# und ] herangezogen wird?
Vielen Dank!
P.S.: von VB bin ich es gewohnt, dass ein Content-Menü aufgeht, wenn ich auf Eigenschaften eines Objekts Zugreifen möchte, so ist es einfacher bestimmte Eigenschaften zu finden. Guibt es eine solche Funktionalität in VBA nicht?