Double click Relance VBA

Bonjour tout le monde

J'ai un tableau avec deux feuilles une (TABLEAU) qui contient les données et l'autre (RELANCE) où les données seront exportées.

par double click sur A2 par exemple je veux avoir la ligne A2 exportées sur la feuille RELANCE mais seulement les colonnes A2+B2+C2 & W2.

Merci pour votre aide.

voici mon fichier :

9relance.xlsx (87.17 Ko)

Bonjour

Vous pouvez essayer avec ce code

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim dlg As Integer
If Not Intersect(Target, Range("A2:A" & UsedRange.Rows.Count)) Is Nothing Then
    With Sheets("Relance")
        dlg = .Range("A" & Rows.Count).End(xlUp).Row
        .Range("A" & dlg) = Range("A" & Target.Row).Value
        .Range("B" & dlg) = Range("B" & Target.Row).Value
        .Range("C" & dlg) = Range("C" & Target.Row).Value
        .Range("D" & dlg) = Range("W" & Target.Row).Value
    End With
    Cancel = True
End If
End Sub

Code à placer dans la feuille Tableau puis enregistrer votre fichier au format XLSM pour accepter les macros

si ok -->

Cordialement

Merci DAN

mais il y a un problème quand je clique sur une deuxième ligne il me donne toujours un seul résultat.

Je veux avoir les lignes dont j'ai cliqué.

Ah oui juste... désolé

Dans la ligne dlg = .... derrière ROW rajouter --> +1

Crdlt

Parfait.

Merci 1 million de fois

Reste un truc. comment éviter les doublons ?

Rechercher des sujets similaires à "double click relance vba"