Comment attribuer un code VBA au clic sur une forme ?

Bonjour à tous et toutes.

Qui peut m'expliquer comment je peux utiliser une illustration comme un bouton de commande ?

Je m'explique !

Sur mon fichier, j'ai 4 boutons de commande, je clique dessus, le code se lance avec par exemple " Private Sub BTN1_Click() "

Si je veux remplacer ce bouton par une illustration que j'appelle " Btn_1 ", comment je peux avoir le même résultat ?

Je précise que je ne lance pas une macro mais une partie du code.

Merci d'avance !!!!!

Bonjour,

Peut etre que je n'ai pas compris le probleme ?
Sinon tu peux mettre une image sur un bouton.

A+

Bonjour, sur une "forme" ou une image ; le clic droit affiche l'option "Affecter une macro".

Vous n'avez pas d'autre choix que de réécrire votre partie de code dans une macro pour l'utiliser avec votre forme.

Nota une partie de code est une macro c'est juste quelle se trouve actuellement dans votre bouton VBA et pas dans un module.

@Xmenpl,

sur la version de base, mon code démarre comme cela :

Private Sub Btn_1_Cliquer()

    Dim CheminFichier As String
    Dim nomFichier As String
    Dim nomFichierSansExtension As String
    Dim caracteres As String
    Dim FeuilleSource As Worksheet
    Dim TableauDestination As ListObject
    Dim DerniereLigneSource As Long

Si je comprend bien, je dois créer un module par " forme " ?

Non dans un seul module vous pouvez avoir plusieurs Macro les une aprés les autres.

Excel ne lira que celle que vous aurez attribuée à l'image en question.

exemple

Sub Macro_image1()
'......

End Sub

Sub Macro_image2()
'......

End Sub

Sub Macro_image3()
'......

End Sub

Je vois pas la

Si je te donnes le fichier, peux tu me le faire pour une image afin que je comprenne ?

Bonsoir,

Rendez vos procédures publiques (suppression des "Private") et vous pourrez les affecter à vos quatre formes.

Merci beaucoup Thev !!!!

Je vais me renseigner sur la différence entre sub et private sub du coup pour ne pas reproduire la même erreur.

Bon dimanche à tous et toutes

Je vois que d'autres ont heureusement pris la suite pendant mon absence.

Merci. ThEV