![]() Set OpenOutlookFolder = OpenOutlookFolder.Folders(varFolder)įunction GetSMTPAddress(Item As Outlook.MailItem, intOutlookVersion As Integer) As String StrFolderPath = Right(strFolderPath, Len(strFolderPath) - 1) Public Function OpenOutlookFolder(strFolderPath As String) As Outlook.MAPIFolder ![]() MsgBox "The filename was empty.", vbCritical vbOKOnly, MACRO_NAME MsgBox "The folder path was empty.", vbCritical vbOKOnly, MACRO_NAME MsgBox "The folder '"
0 Comments
Leave a Reply. |