Здравствуйте, вопрос не по Excel а по VBA.
Необходимо чтобы при получении письма файл который приходил, сохранялся под одним именем, и перезаписывал старый файл.
Файл сохраняет, но при переходе нового файла, он его не перезаписывает. Подскажите в чем проблема. Доступ к папке разрешен всем в сети.
Необходимо чтобы при получении письма файл который приходил, сохранялся под одним именем, и перезаписывал старый файл.
Файл сохраняет, но при переходе нового файла, он его не перезаписывает. Подскажите в чем проблема. Доступ к папке разрешен всем в сети.
Код |
---|
Public Sub saveAtt(itm As Outlook.MailItem) Dim objAtt As Outlook.Attachment Dim saveFolder As String Dim sDateMail As String sDateMail = Format(itm.CreationTime, "hh-mm-ss_dd.mm.yyyy") saveFolder = "C:\Files\" For Each objAtt In itm.Attachments objAtt.SaveAsFile saveFolder & "PrintStatus" & ".csv" Set objAtt = Nothing Next objAtt End Sub |