私がやりたいことは、次のコードで VBA に日付変数を設定するだけです。ただし、mydate = date を使用しようとすると、機能しません。
Public Sub saveAttachtoDisk(itm As Outlook.MailItem)
Dim objAtt As Outlook.Attachment
Dim saveFolder As String
Dim mydate As String
mydate = date
saveFolder = "T:\EC Portfolio Reports\CCA Credit Europe\ctpty"
For Each objAtt In itm.Attachments
objAtt.SaveAsFile saveFolder & "\" & mydate & objAtt.FileName
Set objAtt = Nothing
Next
End Sub