Forums Applications Microsoft Office Excel

Déclenchement d'une action

Le vendredi 19 Janvier 2018 à 19:53

Jacquouille

Bonjour,

Comment puis-je déclencher la mise en route d'une action ou d'une macro
lorsque je valide le contenu d'une cellule qui se trouve dans la colonne A,
mais qui ne sera pas toujours sur la même ligne.
( une fois, ce sera A5, une autre, ce sera A19 .)

Déjà merci

Jacques
" Le vin est au repas ce que le parfum est à la femme."
.

Partager ce contenu :

Vos réponses

Trier par : date / pertinence

JièL

Le 19/01/2018 à 22:36 #26460236

Hello Jacqouille
Le 19/01/2018 à 19:53, Jacquouille a écrit :

Comment puis-je déclencher la mise en route d'une action ou d'une macro
lorsque je valide le contenu d'une cellule qui se trouve dans la colonne
A, mais qui ne sera pas toujours sur la même ligne.
( une fois, ce sera A5, une autre, ce sera A19 ....)

Clic droit sur l'onglet de la feuille, Visualiser le code.
Colle ceci
------------------------ >8 -----------------
Private Sub Worksheet_Change(ByVal Target As Range)
If InStr(Target.Address, "$A$") > 0 Then
<ton action ou ta macro>
End If
End Sub
------------------------ >8 -----------------
--
JièL

-1 Répondre en citant

isabelle

Le 20/01/2018 à 19:36 #26460452

salutatous,
ou bien,
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
'action
End If
End Sub
isabelle
Le 2018-01-19 à 16:36, JièL a écrit :

Hello Jacqouille
Le 19/01/2018 à 19:53, Jacquouille a écrit :

Comment puis-je déclencher la mise en route d'une action ou d'une macro
lorsque je valide le contenu d'une cellule qui se trouve dans la colonne A,
mais qui ne sera pas toujours sur la même ligne.
( une fois, ce sera A5, une autre, ce sera A19 ....)

Clic droit sur l'onglet de la feuille, Visualiser le code.
Colle ceci
------------------------ >8 -----------------
Private Sub Worksheet_Change(ByVal Target As Range)
    If InStr(Target.Address, "$A$") > 0 Then
        <ton action ou ta macro>
    End If
End Sub
------------------------ >8 -----------------

-1 Répondre en citant

Jacquouille

Le 20/01/2018 à 20:48 #26460462

Merci Isabelle (dont je salue le retour victorieux) et Jièl.
Isabelle gagne la manche par 15 car en moins. -))
Jacques
" Le vin est au repas ce que le parfum est à la femme."
.
"JièL" a écrit dans le message de groupe de discussion :
5a6264e7$0$4827$
Hello Jacqouille
Le 19/01/2018 à 19:53, Jacquouille a écrit :

Comment puis-je déclencher la mise en route d'une action ou d'une macro
lorsque je valide le contenu d'une cellule qui se trouve dans la colonne
A, mais qui ne sera pas toujours sur la même ligne.
( une fois, ce sera A5, une autre, ce sera A19 ....)

-1 Répondre en citant

JièL

Le 20/01/2018 à 22:37 #26460480

Bien vue Isabelle de la Geolière, j'aime bien ton approche
--
JièL
Le 20/01/2018 à 19:36, isabelle a écrit :

salutatous,
ou bien,
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 Then
        'action
    End If
End Sub
isabelle
Le 2018-01-19 à 16:36, JièL a écrit :

Hello Jacqouille
Le 19/01/2018 à 19:53, Jacquouille a écrit :

Comment puis-je déclencher la mise en route d'une action ou d'une
macro lorsque je valide le contenu d'une cellule qui se trouve dans
la colonne A, mais qui ne sera pas toujours sur la même ligne.
( une fois, ce sera A5, une autre, ce sera A19 ....)

Clic droit sur l'onglet de la feuille, Visualiser le code.
Colle ceci
------------------------ >8 -----------------
Private Sub Worksheet_Change(ByVal Target As Range)
     If InStr(Target.Address, "$A$") > 0 Then
         <ton action ou ta macro>
     End If
End Sub
------------------------ >8 -----------------

-1 Répondre en citant

Poster une réponse