Format bouton commande active X

Résolu
Nico -  
Bonjour,

Je souhaiterais changer le format de mes boutons de commandes (formulaires activeX) j'ai réussis à changer la police et la couleur de fond.
Par défault ils sont rectangle sur fond gris, je voudrais changer leur forme (rond, bord arrondis,..)

Comment procéder ?

6 réponses

  • Votes
  • Date
  • Date décroissante
  3. pijaku Modérateur
    Bonjour,

    vous dites :
    Je souhaiterais changer le format de mes boutons de commandes (formulaires activeX)

    Formulaires ou Activex? Il faut savoir...

    Formulaires : utilisez des formes à la place de vos boutons. Les formes sont disponibles dans le menu Insertion :


    Dessinez par exemple un rectangle, clic droit dessus / Affecter une macro...

    Activex, il faudra ruser davantage.

    J'attends donc votre retour
    3. pijaku Modérateur
      Tu as plusieurs solutions, mais aucune ne sera optimale.
      La meilleure est encore d'utiliser les formes comme des contrôles de formulaire.

      Solution 1 :
      Utilise un contrôle Image au lieu d'un CommandButton

      Solution 2 :
      Utilise un Frame avec la propriété Caption = "" à l'intérieur duquel tu places une image de fond avec le texte du bouton etc...

      Solution 3 :
      Place une image de fond dans ton CommandButton, image de fond créée avec les coins arrondis en transparence et enregistrée en .gif.

      Voici un exemple des "bricolages" possibles : https://www.cjoint.com/c/DHik5vis47B
      1. Nico
        Merci , c'est vrai que le mieux est de passer en formulaires mais je vais devoir changer mes codes..
        1. pijaku Modérateur
          Pas forcément...

          Supposons :
          Tu as dans ta Feuil1 1 Commandbutton (pas beau) que tu souhaites remplacer par une forme (jolie).
          - Tu règles la propriété visible de ton CommandButton sur False => il n'est donc plus visible mais toujours présent.
          - Tu enlèves le mot Private de Private Sub CommandButton1_Click
          - Dessines ta forme (jolie)
          - Clic droit dessus/Affecter une macro => clic sur Nouvelle
          - Copie/Colle ce code : 
          Sub Rectangleàcoinsarrondis1_Cliquer()
CallByName Worksheets("Feuil1"), "CommandButton1_Click", VbMethod
End Sub


          Un fichier exemple ICI
        2. Nico
          Yes ca marche cependant faut pas que j'oublie de changer le nom de la feuille si je le change plus tard ;)

          Merci
        3. pijaku Modérateur
          Tu peux, peut être, essayer avec le CodeName de la feuille qui lui ne changera jamais. 
          Sub Rectangleàcoinsarrondis1_Cliquer()
          CallByName Worksheets(Feuil1), "CommandButton1_Click", VbMethod
          End Sub
        4. Nico
          Cela ne fonctionne aps, dommage

      Discussions similaires

      Bouton ON/OFF : O ou I, quel côté est allumé
      Stargirlfr

      12 réponses
      Où est la touche SHIFT sur mon clavier d'ordi ?
      joe!

      18 réponses
      Arrêt/démarrage via Bouton ON/OFF de l'alim
      kekliard

      15 réponses
      Quel est la touche shift sur le clavier
      paoade

      8 réponses
      Comment écrire le symbole On/Off
      strumpfi

      3 réponses