Foutmelding bij opslaan van e-mail

[keb]

Ik krijg een foutmelding bij het opslaan van e-mails (VBA in Outlook 2024)

'Store each selected e-mail in a specified map
 Debug.Print strPath & strDate & sName & ".msg"
 olMail.SaveAs strPath & strDate & sName & ".msg", olMSG

Dezelfde code functioneerde in Outlook 2013 goed.
strPath bestaat echt.
Bestandsnaam luidt D\Test\E-mail\20251201-0847 «Vakblad Warmtepompen» _Waarom verdwijnen s.msg (geen gekke karakters)