je bloque sur un code à faire en vba

[flight7218]

bonjour ,
(je joint à ma demande d'aide mon fichier excel )
je souhaiterai pouvoir en cliquant sur n'importe quel bouton de chaque ligne de renvoyer les informations de : marque , couleur et genre vers la feuille 2 de ce meme classeur ou dans laquelle se trouve aussi des champs marque , couleur et genre disposés autrement (voir feuille 1)
Est ce qu'il y aurait un code VBA permettant de le faire ?

Merci par avance

 

[Grand Chaman Excel]

Re : je bloque sur un code à faire en vba

Bonjour,

Personnellement, je n'aime pas utiliser un bouton par ligne pour ce genre d'opérations. Je trouve ça trop lourd à gérer. Je préfère la méthode du "double-clic" dans la cellule.

Alors voici, un code qui tu dois placer dans ta "FEUIL 1". Lorsque tu double clique dans une cellule de la colonne A de la feuille1, ça envoie les données dans la feuille 2.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Application.ScreenUpdating = False
    With Target
        If .Column = 1 And .Count = 1 Then
            Sheets("Feuil2").Range("D5") = .Offset(0, 1)
            Sheets("Feuil2").Range("D8") = .Offset(0, 2)
            Sheets("Feuil2").Range("D11") = .Offset(0, 3)
        End If
    End With
    Application.SendKeys ("{ESC}")
    Application.ScreenUpdating = True
End Sub

À adapter à tes besoins.
A+