Répérer l'événement : cellule sélectionnée

[marmotte18]

Bonjour,

J'aimerais savoir comment repérer le fait que l'on clique sur au moins l'une des cellules de la plage : Range("B11:I23,L3:S15,V11:AC23,L20:S32")

Merci par avance

 

[ROGER2327]

Re : Répérer l'événement : cellule sélectionnée

Bonjour marmotte18

Quelque chose de ce genre dans le module de la feuille concernée :

[B][COLOR=DarkSlateGray]Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim oPlg
  With Application
    Set oPlg = Intersect(Target, Range("B11:I23,L3:S15,V11:AC23,L20:S32"))
    If Not oPlg Is Nothing Then .EnableEvents = False: oPlg.Select: .EnableEvents = True: MsgBox oPlg.Address(0, 0)
  End With
End Sub[/COLOR][/B]

Voyez le classeur joint pour un exemple.
​

ROGER2327
#4435

Dimanche 1er As 138 (Nativité de Pantagruel, ST)
13 Brumaire An CCXIX
2010-W44-3T09:33:02Z

 

[marmotte18]

Re : Répérer l'événement : cellule sélectionnée

Bonjour ROGER2327,

Ta solution est impeccable ! C'est tout-à-fait cela que je souhaitais obtenir. Un GRAND merci !!!