gourdin
XLDnaute Impliqué
Bonjour,
Voici un exemple de code macro que j'utilise ou la cellule double cliquée contenant "clic" est en A1 :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Count > 1 Then Exit Sub
If Target.Value = "clic" And Range("A2").Value < 10 Then
Range("A3")="OK"
End If
End Sub
Je souhaite remplacer Range("A2") par une référence relative.
J'ai essayé un code du type : Range(Target.Offset(0,1).value <10
mais celà n'est pas correct.
Merci de l'aide
Voici un exemple de code macro que j'utilise ou la cellule double cliquée contenant "clic" est en A1 :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Count > 1 Then Exit Sub
If Target.Value = "clic" And Range("A2").Value < 10 Then
Range("A3")="OK"
End If
End Sub
Je souhaite remplacer Range("A2") par une référence relative.
J'ai essayé un code du type : Range(Target.Offset(0,1).value <10
mais celà n'est pas correct.
Merci de l'aide