N° de ligne

Bonsoir

j'utilise la macro suivante

Dans cette configuration pas de souci.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Range("c45") = 32 Then

If Target.Column = 15 And Target.Cells.Count = 1 Then Range("c46").Value = Target.Row

End If

End Sub

Si j'appelle une Macro

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Range("c45") = 32 Then

If Target.Column = 15 And Target.Cells.Count = 1 Then Range("c46").Value = Target.Row

Call equi_attente_3

End If

End Sub

une fois Range ("46") renseigné si je fais un double clic sur n'importe quelle colonne la Macro equi_attente_3 se lance.

Pouvez vous m'aider à corriger cette anomalie

et faire en sorte que la macro se lance en cliquant uniquement dans la colonne 15

D'avance merci

Pierre_br

Salut pierre_br,

essaie comme ca

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Range("c45") = 32 Then
        If Target.Column = 15 And Target.Cells.Count = 1 Then 
        Range("c46").Value = Target.Row
        Call equi_attente_3
        End If
    End If
End Sub

Salut Pierre,

Salut m3ellem1,

ou ainsi,

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'
Cancel = True
If Not Intersect(Target, Columns(15)) Is Nothing Then
    If [C45] = 32 Then
        [C46] = Target.Row
        Call equi_attente_3
    End If
End If
'
End Sub

A+

Bonsoir

merci pour tes réponses.

les 2 macros répondent à ma demande.

je retiens la 2ème

cdt

Pierre

Rechercher des sujets similaires à "ligne"