List the filenames of attachments
In this exam I get the number of "attachment file" for an email in draft data. Is there any way to get the name of this file in a msgbox or combobox or anything? Private Sub CommandButton2_Click() Dim a As Attachments Dim myitem As Folder Dim myitem1 As MailItem Set myitem = Session.GetDefaultFolder(olFolderDrafts) Dim i As Integer For i = 1 To myitem.Items.Count If myitem.Items(i) = test1 Then Set myitem1 = myitem.Items(i) Set a = myitem1.Attachments MsgBox a.Count End If Next End Sub Private Sub CommandButton2_Click() Dim a As Attachments Dim myitem As Folder Dim myitem1 As MailItem Dim j As