Erreur de syntaxe

Bonjour,
J'ai un petit problème sur une macro excel. Je ne comprends pas pourquoi le debuggeur me dit qu'il y a une erreur au niveau de la syntaxe !!

Voici mon code.
Sub Dread()
'
' Dread Macro
'
'Variable pour la date de J-1
Dim Datehier As Date
'Variable pour le chemin a suivre pour touver le doc
Dim sFichier, ChDir As String
'Ouvrir et fermer un document.
Dim fic As String, monclasseur As String
fic = "C:\Users\my_pc\Desktop\New_CR_ICP"&Datehier=TEXTE(AUJOURDHUI()-1&"j-mm-aaaa")
Workbooks.Open (fic)
monclasseur = ActiveWorkbook.Name
Workbooks(monclasseur).Close
'
End Sub

Quelqu'un pourrait m'aider!!