Jak przedmiot w VBA? - vba, folder, jak, mapi, outlook-vba

Zastanawiam się, czy istnieje coś takiego jak "Like" w VBA dla programu Outlook 2003/2007, podobnie jak LIKE w SQL ...

Na przykład masz wielu użytkowników w sieci i każdy ma inną nazwę skrzynki pocztowej.

Więc myślałem o czymś takim:

Set olApp = New Outlook.Application
Set olNs = olApp.GetNamespace("MAPI")
Set TopFolder = olNs.Folders.Item("Mailbox - *") "<----- here i was thinking of something like a LIKE
Set SubFolder = TopFolder.Folders.Item("Projekte")
Set Folder = SubFolder.Folders

Dzięki za pomoc

Odpowiedzi:

Tam jest LIKE w VBA do dopasowywania ciągów znaków, ale aby użyć w swoim scenariuszu, musisz powtórzyć nazwy elementów w olNs.Folders zbierać i porównywać je ze swoim wzorem;

if sFolderName like "Mailbox - *" then
Set TopFolder = olNs.Folders.Item(sFolderName)
exit for
...