Erreur dans macro envoi pdf par mail

Bonjour à tous,

J'utilise Excel 2013 et je rencontre un problème avec une macro pour l'envoi des pdf par mail.
Mon pdf est bien créé avec cette macro, mais il me met un message d'erreur lorsqu'il veut l'ajouter dans le mail.

La ligne en erreur est : Attachments.Add CurFile

Cette erreur apparait avec ma ligne CurFile comme cela : CurFile = ThisWorkbook.Path & "\" & "Convoyage - " & Sheets("Convoyage").Range("B11").Value

J'ai essayé de changer ma ligne CurFile comme cela : CurFile = ThisWorkbook.Path & "\" & "Convoyage.pdf"

et dans ce cas cela fonctionne.

Je ne comprend pas le problème sur le premier exemple.

Voici ma macro complète :

Sub envoi_pdf_mail()
Dim olApp As Outlook.Application
Dim olMail As MailItem
Dim CurFile As String
Set olApp = New Outlook.Application
Set olMail = olApp.CreateItem(olMailItem)
CurFile = ThisWorkbook.Path & "\" & "Convoyage - " & Sheets("Convoyage").Range("B11").Value

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=CurFile, _
Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas:=False, _
OpenAfterPublish:=False
With olMail
.To = ""
.CC = ""
.Subject = "Demande de Convoyage"
.Body = ""
.Attachments.Add CurFile
.Display '.Send
End With
MsgBox "mail généré."

' Effacer les variables objets
Set olMail = Nothing
Set olApp = Nothing
End Sub

Merci à vous pour votre aide.