Collage avec liaison de cases vides

Re-,

euh, comment s'appelle ta feuille?

si le nom de ton onglet est par exemple "données", remplace comme ceci :

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
With Sheets("données").Cells
    .Replace What:="0", Replacement:="", LookAt:=xlWhole
    .Replace What:="00/01/00", Replacement:="", LookAt:=xlWhole
End With
End Sub 

Ma feuille s'appelle "Janvier08" (etc. pouir les autres mois)

et quand je met donc "Janvier08" à la place de "Feuil1" dans le code, un mesage s'affiche :

"Microsoft Office Excel ne trouve pas de données correspondantes à remplacer. Aucune cellule ne convient à ce que vous avez tapé ou bien aucun enregistrement ne correspond au critère"

Ci-joint, la page en question

Bonjour,

effectivement, comme c'est le résultat d'une formule, cela ne fonctionnera pas

Cependant, en faisant Outils/Options onglet Affichage, et en décochant "Valeurs zéros", ceux-ci disparaissent (comme te l'avait proposé V_Elbie, dans un des premiers messages)

Si ça a été proposé, alors j'ai mal vu car c'ets exactement le genre de méthode que je cherchais , merci beaucoup, le problème est désormais résolu ^^

Rechercher des sujets similaires à "collage liaison cases vides"