Salut
J'ai eu un souci équivalent sur des feuilles de calcul.
J'ai ceci qui fonctionne bien :
Sheets("Sheets1").Activate
Columns("ta_colonne_de_résultat").Select
Selection.Replace What:="#VALEUR", Replacement:="/", LookAt:=xlPart, _
SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Après je ne sais pas comment fonctionne l'ensemble de ton code donc impossible d'être certain que cela corresponde à ton besoin. : /