VBA effacé

[J.-P.]

Bonjour le forum
Je cherche un code VBA, lorque je tape un nombre dans une plage de cellule ce nombre s'efface dans une autre plage de cellule.
Joint fichier.

Merci de votre aide.

J.-P.

 

[phlaurent55]

Re : VBA effacé

Bonjour JP,

ton fichier en retour

à+
Philippe

 

[kjin]

Re : VBA effacé

Bonjour,
Dans le module de la feuille

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Range("C2:G24"), Target) Is Nothing Or Target.Count > 1 Then Exit Sub
Set c = Range("C26:G26").Find(Target.Value, lookat:=xlWhole)
If Not c Is Nothing Then c.ClearContents
End Sub

A+
kjin

 

[J.-P.]

Re : VBA effacé

Bonjour JP,

ton fichier en retour

à+
Philippe

Alors un grand merci pour ton aide c'est super.

A +

J.-P.

 

[phlaurent55]

Re : VBA effacé

Re,

ça peut aussi fonctionner dans l'autre sens
voir fichier joint

à+
Philippe

 

[J.-P.]

Re : VBA effacé

Bonjour JP,

ton fichier en retour

à+
Philippe

Merci Philippe mais je teste ton fichier et dans la collone G ca ne fonctionne pas!

Merci


J.P

 

[phlaurent55]

Re : VBA effacé

Re,

modifie le code comme ceci:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C2:G24")) Is Nothing Then
[B][COLOR=blue] For i = 3 To 7[/COLOR][/B]
 If Target.Value = Cells(26, i).Value Then
 Cells(26, i).ClearContents
 End If
 Next i
End If
End Sub

c'est la ligne bleue qui posait problème

à+
Philippe

 

[J.-P.]

Re : VBA effacé

Salut,
J'ai mis ton code dans le module ca ne fonctionne pas.
Salut a +

 

[phlaurent55]

Re : VBA effacé

Re,

mets plutôt le code dans la feuille

à+

 

[J.-P.]

Re : VBA effacé

Que veux dire ( For i = 3 To 7 ) dans le code ?

J.-P.

 

[phlaurent55]

Re : VBA effacé

Que veux dire ( For i = 3 To 7 ) dans le code ?

J.-P.

de la colonne 3 à la colonne 7

à+

 

[Staple1600]

Re : VBA effacé

Bonsoir à tous

Juste une piqure de rappel J-P 😉
A l'avenir essaie d'employer des titres plus explicites, stp, pour tes questions.
Cela nous rendra service à tous (et facilitera les recherches à venir dans le forum)

Merci.

Ps: Vba effacé, Code VBA ou anni sont des titres qui sont loin de ceux préconisés dans la charte du forum.