[VBA Excel] Ecrire dans une cellule

Résolu
Et_Ben Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
Et_Ben Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je souhaiterais qu'une macro puisse écrire automatiquement quelque chose dans une cellule si on modifie une cellule d'une plage de cellule de la même ligne :
Si je modifie A2, B2, C2 ou D2 la macro écrira automatiquement TOTO dans la cellule H2. Cela devrait aussi fonctionner avec les autres lignes du classeur. Si je modifie A3, j'aurai TOTO en H3, pour B6, TOTO en H6...
Pouvez vous m'aider ?
Merci


1 réponse

Réponse 1 / 1
Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
Bonjour,

Tu peux placer la procédure suivante dans le module de la feuille concernée 
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Not Application.Intersect(Target, Range("A" & Target.Row).Resize(, 4)) Is Nothing Then
        Range("H" & Target.Row) = "TOTO"
    End If
End Sub


A+
0
Et_Ben Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
Nickel, ça marche exactement comme je voulais.
Merci beaucoup,
et bonne soiree
0

Discussions similaires

Excel VBA : Récupérer la valeur d'une cellule
la pioche -
mikebzh -

3 réponses