Sélection automatique en appuyant sur une case ou bouton

Bonjour ,

Pour gagner du temps, je souhaiterai cliquer sur une case afin de sélectionner une zone définie (200 cases qui sont en dessous par exemples), afin d'éviter de devoir le faire manuellement à chaque fois.

Comment attribuer le clic d'une case à l'action de sélectionner une plage de données ?

Merci par avance

Bonsoir

Code à copier dans le module de la feuille

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Count > 1 Then Exit Sub
  Target.Resize(200, 1).Select
End Sub

Merci pour la rapidité de la réponse.

Et si la zone a sélectionner est plus complexe :

Par exemple une plage de 5 cases en horizontal sur 100 cases en verticale (500 cellules) ?

Bonsoir

Modifies le Resize

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Count > 1 Then Exit Sub
  Target.Resize(100, 5).Select
End Sub

Bonjour Banzai64,

Désolé mais je n'arrive pas à faire marcher tes codes ...

Je le colle dans le module de la fueille mais rien ne se passe ... Peut-être il faudrait une étape pour l'activer et attribuer le clic d'une cellule à la copie de la zone ?

Merci

Bonjour

Il suffit que les macros soient activées

Mais je ne connais pas assez le Mac pour t'indiquer la démarche à suivre

Banzai64,

voici un onglet exemple, pourrais-tu voir si la formule est bien intégré déjà ?

Merci...

Bonjour

A tester

Merci c'est résolu