Bonjour à tous

Dans une procédure événementielle, comment récupérer la valeur d’une variable lors d’une réexécution.
Exemple
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Private Sub Worksheet_SelectionChange()
Dim sw_row, sw_col as integer
If sw_row = 0
Call test_row (sw_row)
End if
If sw_col = 0
Call test_col (sw_col)
End if
If sw_row = 1 and sw_col = 1 then
Msgbox “bonne ligne et bonne colonne”
End if
End sub
 
Sub Test_row(sw_row)
If activecell.row = 4 then
Msgbox “c’est la bonne ligne”
Sw_row = 1
End if
End sub
 
Sub Test_col(sw_col)
If activecell.col = 10 then
Msgbox “c’est la bonne colonne”
Sw_col = 1
End if
End sub
Je souhaiterais éviter l’appel de la routine « test_row » lors de la réexécution de l’événement si la ligne sur laquelle je clique est toujours la ligne 4.
Est-ce possible ? Quelqu’un a-t-il une expérience qui pourrait m’éclairer ?

D’avance merci

Harry