Folders.GetFirst メソッド (Outlook)

Folders コレクションの先頭のオブジェクトを返します。

構文

GetFirst

expressionFolders オブジェクトを表す変数です。

戻り値

コレクションに格納されている先頭のオブジェクトを表す Folder オブジェクト。

注釈

最初のオブジェクトが存在しない場合 (たとえば、コレクションにオブジェクトがない場合) は Nothing を返します。大規模なコレクション内の GetFirstGetLastGetNextおよび GetPrevious メソッドの正しい操作を保証するには、そのコレクションで GetNext を呼び出す前に GetFirst を呼び出し、GetPrevious を呼び出す前に GetLast を呼び出します。 コレクションの呼び出しを常に行っていることを確認するには、ループに入る前に、そのコレクションを参照する明示的な変数を作成します。

この Visual Basic for Applications (VBA) の例は、 GetFirst メソッドを使用して、 連絡先フォルダー内の最初のフォルダーを検索して、テスト フォルダーにフォルダーをコピーします。 次の使用例を実行する前に必要なフォルダーでは、フォルダーを既定の連絡先、受信トレイ内に存在かどうかを確認する必要があります。

Sub CopyItems() 
 
 Dim myNameSpace As Outlook.NameSpace 
 
 Dim myDestFolder As Outlook.Folder 
 
 Dim mySourceFolder As Outlook.Folder 
 
 Dim myNewFolder As Outlook.Folder 
 
 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 
 Set myDestFolder = myNameSpace.GetDefaultFolder(olFolderInbox).Folders("Test") 
 
 Set mySourceFolder = myNameSpace.GetDefaultFolder(olFolderContacts).Folders.GetFirst 
 
 Set myNewFolder = mySourceFolder.CopyTo(myDestFolder) 
 
End Sub

関連項目

Folders オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。