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.