Selection de plage au click

Bonsoir,

je cherche via une macro à faire en sorte que lorsque je selectionne une case, les 3 cases sur sa droite se sélectionnes automatiquement.

quelqu'un aurai une petite idée parce j'ai plus beaucoup de cheveux sur ma tête...

merci

Bonsoir

Code à mettre dans un module Feuille

Clic droit sur l'onglet ---> Visualiser le code

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

Clic droit sur l'onglet ---> Visualiser le code

ha ba j'était pas près de trouver! merci