Sub SupprValeur()
cells.select
Application.CutCopyMode = False
Selection.Replace What:='#VALEUR!', Replacement:='', LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
end sub
A défaut de joindre ton fichier, ne peux-tu nous mettre ta formule qui te pose problème, ce sera plus facile pour la compréhension.
Il est évident que si tu obtiens #VALEUR! c'est que ta formule se réfère à une où des cellules qui justement n'ont pas de valeur.