GetNext Method

The GetNext method returns the next object in the specified collection. It returns Nothing if no next object exists, for example, if already positioned at the end of the collection.

Note  To ensure correct operation of the GetFirst , GetLast , GetNext, and GetPrevious methods in a large collection, call GetFirst before calling GetNext on that collection, and call GetLast before calling GetPrevious. To ensure that you are always making the calls on the same collection, create an explicit variable that refers to that collection before entering the loop.


*expression   * Required. An expression that returns one of the objects in the Applies To list.


The following Visual Basic for Applications example searches the subfolders of Inbox for a folder called MyPersonalEmails and displays a message to the user. If you do not have a subfolder called MyPersonalEmails in your Inbox folder, the example will display nothing.

Sub TestGetNext()
    Dim outApp As New Outlook.Application
    Dim nsp As Outlook.NameSpace
    Dim mpf As Outlook.MAPIFolder
    Dim mpfSubFolder As Outlook.MAPIFolder
    Dim flds As Outlook.Folders
    Dim idx As Integer

    Set nsp = outApp.GetNamespace("MAPI")
    Set mpf = nsp.GetDefaultFolder(olFolderInbox)
    Set flds = mpf.Folders
    Set mpfSubFolder = flds.GetFirst
    Do While Not mpfSubFolder Is Nothing
        If mpfSubFolder.Name = "MyPersonalEmails" Then
            MsgBox "The folder was found."
            Exit Do
        End If
        Set mpfSubFolder = flds.GetNext

End Sub

Applies to | AddressEntries Object | Conflicts Object | Folders Object | Items Object | Results Collection

See Also | GetFirst Method | GetLast Method | GetPrevious Method