Remplacement d'un symbole par une cellule vierge

[keurma]

Bonjour,

Pouvez vous m'indiquer la macro ou formule qui remplace automatiquement le symbole "x" par une cellule vierge et ce, quelquesoit son emplacement.

D'avance merci

 

[tototiti2008]

Re : Remplacement d'un symbole par une cellule vierge

Bonjour keurma,

Peut-être avec un Edition-Remplacer ?

 

[keurma]

Re : Remplacement d'un symbole par une cellule vierge

Salut TOTO

Le probleme c'est que ce n'est pas automatique.

Merci de ton aide.

 

[keurma]

Re : Remplacement d'un symbole par une cellule vierge

de plus il faudrait en fait que ce soit une macro, parce que dans les cellules j'aurais déjà des formules.

 

[keurma]

Re : Remplacement d'un symbole par une cellule vierge

Nickel j'ai trouvé a l'aide d'une vieille macro :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim X As Range
For Each X In Range("C4:Q34")

If X.Value = "CA" Then X.Value = ""

Next X
End Sub

 

[Staple1600]

Re : Remplacement d'un symbole par une cellule vierge

Bonjour à tous


Une autre approche

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("C4:Q34")) Is Nothing Then
If Target.Count = 1 Then
Target = IIf(Target = "CA", vbNullString, Target)
End If
End If
End Sub