double clic inscrit date et "oui dans autre cellules de la même ligne

pascal21

XLDnaute Barbatruc
bonjour le forum
je ne trouve pas comment écrire en VBA la chose suivante
un double clic dans les cellules (b7:b450) inscrit "oui" dans la colonne Q et la date du jour dans la colonne R de la même ligne
merci de votre aide
 

Pierrot93

XLDnaute Barbatruc
Re : double clic inscrit date et "oui dans autre cellules de la même ligne

Bonjour Pascal

essaye ceci, dans le module de la feuille concernée :
Code:
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("B7:B450")) Is Nothing Then
    Cells(Target.Row, 17).Value = "oui"
    Cells(Target.Row, 18).Value = Date
    Cancel = True
End If
End Sub

bonne journée
@+
 

Discussions similaires

Statistiques des forums

Discussions
312 523
Messages
2 089 306
Membres
104 119
dernier inscrit
karbone57