erreur avec "Worksheet_Change"

gawella38

XLDnaute Nouveau
bonjour à tous,

je me suis fais une petite macro pour mettre à jour un formulaire mais, apparemment, je n'utilise pas "Worksheet_Change" correctement puisque j'ai un message d'erreur quand je veux supprimer une ligne, par exemple.

quelqu'un peut m'aider ?
 

Pièces jointes

  • test.xls
    21.5 KB · Affichages: 36
  • test.xls
    21.5 KB · Affichages: 34
  • test.xls
    21.5 KB · Affichages: 36

tototiti2008

XLDnaute Barbatruc
Re : erreur avec "Worksheet_Change"

Bonjour gawella,

je pense que tu devrais modifier ton code comme suit :

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells.Count = 1 Then
        If Target.Address = Range("nom").Address Then
            Range("prenom").ClearContents
        End If
    End If
End Sub
 

wilfried_42

XLDnaute Barbatruc
Re : erreur avec "Worksheet_Change"

Bonjour

Quand tu modifies ton nom, target et nom a toujours la meme valeur, pour savoir si on se trouve sur la bonne cellule, il faut utiliser la propriete adresse

Code:
If Target.Address = Range("nom").Address Then
     Range("prenom").ClearContents
End If

si j'ai compris ta demande

Edit : re: tototiti
 

Statistiques des forums

Discussions
312 321
Messages
2 087 266
Membres
103 501
dernier inscrit
talebafia