Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

je bloque sur un code à faire en vba

  • Initiateur de la discussion Initiateur de la discussion flight7218
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

F

flight7218

Guest
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
 

Pièces jointes

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.

Code:
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+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
3
Affichages
645
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…