A voir également:
- VBA: Récupération d'un bouton cliqué
- Excel compter cellule couleur sans vba - Guide
- Incompatibilité de type vba ✓ - Forum VB / VBA
- Erreur 13 incompatibilité de type VBA excel ✓ - Forum Excel
- Mkdir vba ✓ - Forum VB / VBA
- Vba range avec variable ✓ - Forum VB / VBA
1 réponse
Ajout: Exemple...
Ce code servirait juste à tester, des fonctions pourraient, par exemple être appelées à la place des MsgBox.
Cordialement.
Private Sub bout_Click() Select Case bout Case btnAbout MsgBox ("a propos") Case btnAcc MsgBox ("Accueil") Case btnAdm MsgBox ("Administrateur") Case btnCopy MsgBox ("Copier") Case btnDeco MsgBox ("Deconnection") Case btnManu MsgBox ("Manuel") Case btnOp MsgBox ("Opérateur") Case btnPaste MsgBox ("Coller") Case btnQuit MsgBox ("Quitter") Case btnSav MsgBox ("Enregistrer") Case btnSeek MsgBox ("Chercher") Case btnView MsgBox ("Visualiser") Case Else MsgBox ("Erreur") End Select End Sub
Ce code servirait juste à tester, des fonctions pourraient, par exemple être appelées à la place des MsgBox.
Cordialement.