Discussion :

[iliesss]

Bonjour
SVP j’aimerais bien savoir comment faire une macro qui me permettre de sélectionner la range (« a20 ») lorsque je quitte range (« C4 »).
J’ai essayé avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub

Mais ça ne marche pas
Merci

[alsimbad]

tu peux essayer ça
c'est pas très élégant mais ça fonctionne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Public u2
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not u2 = "" Then Range(u2).Select
u1 = Target.Address
If u1 = Range("c4").Address Then u2 = Range("A20").Address Else u2 = ""
End Sub

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static CelC4 As String
 
If CelC4 = "$C$4" Then
      CelC4 = ""
      Range("A20").Select
ElseIf Target.Address = "$C$4" Then
      CelC4 = Target.Address
End If
End Sub

[iliesss]

Merci messieurs ça marche pour les deux prépositions
Merci beaucoup