Folders.GetLast Method (Outlook)
Returns the last object in the Folders collection.
Syntax
expression .GetLast
expression A variable that represents a Folders object.
Return Value
A Folder object that represents the last object contained by the collection.
Remarks
It returns Nothing if no last object exists, for example, if the collection is empty.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.
Example
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 TestGetLast()
Dim nsp As Outlook.NameSpace
Dim mpf As Outlook.Folder
Dim mpfSubFolder As Outlook.Folder
Dim flds As Outlook.Folders
Dim idx As Integer
Set nsp = Application.GetNamespace("MAPI")
Set mpf = nsp.GetDefaultFolder(olFolderInbox)
Set flds = mpf.Folders
Set mpfSubFolder = flds.GetLast
Do While Not mpfSubFolder Is Nothing
If mpfSubFolder.Name = "MyPersonalEmails" Then
MsgBox "The folder was found."
Exit Do
End If
Set mpfSubFolder = flds.GetPrevious
Loop
End Sub