Personnaliser des boutons avec Excel

Personnaliser des boutons avec Excel - VB/VBA/VBS - Programmation

Marsh Posté le 01-06-2006 à 08:36:52    

Bonjour,
 
J'utilise Excel et je voudrais personnaliser des boutons (couleurs, taille, forme ...) et les insérer par la suite dans ma feuille de calcul.
J'ai crée plsr Macro et je voudrais pouvoir les appeler via ces boutons.
Quelle est la méthode a utiliser ?
Existe il des exemples ?
 
Merci

Reply

Marsh Posté le 01-06-2006 à 08:36:52   

Reply

Marsh Posté le 01-06-2006 à 12:15:34    

Personne n'a d'idées !!

Reply

Marsh Posté le 01-06-2006 à 14:01:26    

Précise ta question. Tu as des boutons et tu veux les personnaliser ou bien tu n'as rien et tu veux créer tes boutons à toi ?
Pour l'insertion de contrôles dans un formulaire, le sujet a déja été traité sur ce forum.

Reply

Marsh Posté le 01-06-2006 à 16:34:24    

En fait je n'ai rien mais je veux créer mes propres boutons en pouvant modifier leur taille, couleur, police, forme ...  et affecter à ces boutons une macro.

Reply

Marsh Posté le 02-06-2006 à 22:22:41    

Est ce qu'il existe une focntion ds Excel pour faire cela ?

Reply

Marsh Posté le 03-06-2006 à 04:00:32    

Il faut utiliser les boutons de la boite d'outils contrôle.


---------------
roger
Reply

Marsh Posté le 03-06-2006 à 10:35:30    

Après avoir crée ton bouton, tu fais un clic droit dessus>propriétés et là tu changes les valeurs bkground, font, size etc.
 
JM


---------------
OtObOxBlOg - - - Etre seul à avoir tort  c'est plus difficile, mais c'est bien plus beau que d'avoir raison avec une bande de cons
Reply

Marsh Posté le 05-06-2006 à 09:01:52    

D'accord maintenant j'arrive trés bien à créer un bouton en le personnalisant, via la fonction "boite à outil controle", mais je n'arrive toujours pas à affecter une MACRO à ce nouveau bouton !

Reply

Marsh Posté le 05-06-2006 à 11:46:35    

Il faut être en mode création (barre d'outil Visual basic), ensuite sélectionner le bouton et cliquer sur "Visualiser le code" (icone représentant une loupe avec un feuille dessous) de la barre d'outil "Boite à outils contrôle). Tu peux aussi double cliquer sur le bouton (tjs en mode création !)
Tu vas arriver dans l'éditeur visual basic avec quelque chose d'écrit:

Code :
  1. Private Sub CommandButton1_Click()
  2. End Sub


 
avec: CommandButton1 = au nom du bouton (nom que tu as donné dans les propriétés du bouton, si tu ne l'as pas nommé il porte un nom par défaut: CommandButtonX)
 
Ensuite, dans la ligne vide entre private sub et end sub, tu écris ton code pour lancer ta macro. Si par exemple, ta macro est écrite dans le module1 de ton classeur, tu mets:
 

Code :
  1. Private Sub CommandButton1_Click()
  2.      Macro1
  3. End Sub


 
kenavo,
 
JM


Message édité par otobox le 05-06-2006 à 11:47:03

---------------
OtObOxBlOg - - - Etre seul à avoir tort  c'est plus difficile, mais c'est bien plus beau que d'avoir raison avec une bande de cons
Reply

Marsh Posté le 06-06-2006 à 08:44:07    

En tapant le code j'ai le message d'erreur suivant : "Sub ou Fonction non définie" !
Voici le code que j'ai tapé :
 
Private Sub CommandButton1_Click()
        MacroDilatos
End Sub

Reply

Marsh Posté le 06-06-2006 à 08:44:07   

Reply

Marsh Posté le 06-06-2006 à 08:59:44    

Et ta MacroDilatos elle est ou ?
il faut qu'elle soit dans le même module que Private Sub CommandButton1_Click()  
ou dans un module Standart (Module1) et non pas dans un module de feuille.
A+


---------------
roger
Reply

Marsh Posté le 06-06-2006 à 09:59:58    

galopin01 a écrit :

Et ta MacroDilatos elle est ou ?
il faut qu'elle soit dans le même module que Private Sub CommandButton1_Click()  
ou dans un module Standart (Module1) et non pas dans un module de feuille.
A+


Je crée mon bouton dans une feuille de calcul, et le code :
 
"Private Sub Test_Click()
MacroDilatos
End Sub"
 
est automatiquement placé dans module de feuille (là où j'ai crée le bouton), alors que ma macro est dans le module8 !

Reply

Marsh Posté le 06-06-2006 à 20:51:17    

Ta macro MacroDilatos est-elle bien orthographiée ?
Sinon, comment as tu déclaré cette macro ?
 
Sub MacroDilatos()
 
ou
 
Private Sub MacroDilatos() ?
 
Si c'est le 2e cas, enlève le Private...  
 
kenavo,
 
JM


---------------
OtObOxBlOg - - - Etre seul à avoir tort  c'est plus difficile, mais c'est bien plus beau que d'avoir raison avec une bande de cons
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed