VBA - Dynamically set variable from array

Question

I'm creating a macro for Outlook that processes email items in designated folder that gets triggered by a rule. My Sub routine sets the sub-folder like this:

Set olSub = olMailbox.Folders("Customer").Folders("Requests").Folders("Open")

I would like to be able to use my Sub for many different folders, the only difference being the line above.

My question is how can I pass an array to my Sub that would set olSub with the chained .Folders() statement? Keeping in mind the number of sub-folders and therefore the array could vary in length.

The desired outcome would be something like this:

Sub MainRoutine(olArr)
    ...

    ' Some sort of magic loop that sets olSub from olArr until,
    olSub = olMailbox.Folders("Customer").Folders("Requests").Folders("Open")

    ...
End Sub

Sub OtherRoutine()
    olArr = Array("Customer", "Requests", "Open")
    MainRoutine olArr
End Sub

rory.ap · Accepted Answer · 2014-03-10 16:28:32Z

1

Try this:

Public Function GetFolder(FromFolderPath As String) As MAPIFolder
    Dim arrPaths() As String
    arrPaths = Split(FromFolderPath, "\")

    Dim i As Integer
    Dim objLoopFolder As MAPIFolder
    Dim objNS As NameSpace
    Set objNS = Application.GetNamespace("MAPI")
    Set objLoopFolder = objNS.Folders("My Mailbox Name")

    For i = 0 To UBound(arrPaths)
        Set objLoopFolder = objLoopFolder.Folders.Item(arrPaths(i))
    Next

    Set GetFolder = objLoopFolder
End Function

It takes a folder path, e.g. My Mailbox Name\First Folder\Sub Folder 1\Sub Folder 2, but if you really need it to take an array, you can easily modify it.

answered Mar 10, 2014 at 16:28

rory.ap

35.7k15 gold badges104 silver badges199 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

VBA - Dynamically set variable from array

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related