Condition avec une plage de cellule

Bonjour ,

j ai récupéré ce bout de code pour mettre la date automatique quand je double clique dans une cellule, mais je voudrais que cela s applique dans une plage de cellule définie , je ne parviens pas a trouver la solution :(

Si quelqu un a une idée pour moi :P

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   Target = Date
   Target.Value = Target.Value
   Cancel = True
End Sub

exemple :

Si la target est entre A1 et B3 alors la date s applique dans la cellule ciblée

Par avance merci :)

Bonjour Cbirou043, le forum,

Essaie ainsi:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   If Not Application.Intersect(Target, Range("A1:B3")) Is Nothing Then
    Cancel = True
    Target.Value = Date
   End If
End Sub

Cordialement,

Re !

Super ca fonctionne , par contre je n ai rien compris a la façon de faire xD

Re,

Merci pour ton retour,

je n ai rien compris a la façon de faire

Pense à jeter un coup d’œil aux cours du site,

méthode Intersect

Cordialement,

Re ,

Merci beaucoup !

Je vais aller lire :P

Edit : Ahhh oui , y a toutes les solutions dont j avais besoin en plus !!!