1

SQLのLIKEのように、Outlook2003/2007のVBAに「Like」のようなものがあるかどうか疑問に思いました...

たとえば、ネットワークに複数のユーザーがいて、全員が別のメールボックス名を持っているとします。

だから私はこのようなことを考えていました：

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

手伝ってくれてありがとう

4

1 に答える 1

4

VBAには文字列パターンマッチング用のがありLIKEますが、シナリオで使用するには、コレクション内のアイテムの名前を繰り返し処理してolNs.Folders、パターンと比較する必要があります。

if sFolderName like "Mailbox - *" then 
   Set TopFolder = olNs.Folders.Item(sFolderName) 
   exit for
   ...
于 2011-08-05T10:36:19.280 に答える