affecter un formulaire a une icone

**el_pilacho** · 25/04/2007, 11h50

boujours tout le monde !!!
j'ai du changer ma version d'excel, je suis maintenant en Excel 2003 et mes macros VBA ne fonctionnaient plus. il y avait un probleme avec la commande : begin dialog ect ...
n'arrivant pas à resoudre le probleme, j'ai recréer ma boite de dialogue avec l'editeur de formulaire. aprés quelques bidouillages, tout fonctionne de nouveau mais je n'arrive plus à affecter ma macro à une icone sur Excel.
comment que je fait? merci d'avance !!!

**ouskel'n'or** · 25/04/2007, 12h00

Pour créer un bouton, regarde là
Dans ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
            With MonBouton
                .Caption = "Recettes" ' Nom que tu veux afficher
                .OnAction = "NomMacroAssociée" 'la macro que tu veux lancer
            End With

A+

**el_pilacho** · 25/04/2007, 12h46

n'est il pas plus simple de recréer un formulaire dans un module et d'affecter ensuite le module à une icone.
mon probleme est que je n'ai pas trouver la commande qui remplace begin dialog.

**ouskel'n'or** · 25/04/2007, 12h57

Nous, d'où on est, on ne sais rien de toi...

Tu peux nous montrer ce que tu faisais et qui fonctionnait et qui ne fonctionne plus ? Sans le contexte, difficile de t'aider

**el_pilacho** · 25/04/2007, 13h08

alors mon code (dans un module) commançait comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
sub main()
     Begin Dialog UserDialog 400, 240, "..."
           GroupBox 10, 7 , 380, 105, "...."
                   Checkbox 20, 28,350,14, "......", .CheckBox1
                   Checkbox 20, 42,350,14, "......", .CheckBox2
                   Checkbox 20, 56,350,14, "......", .CheckBox3
                   Checkbox 20, 84,350,14, "......", .CheckBox4
           OKButton 30,210,110,21
           CancelButton 250,210,120,21
      End dialog
      Dim dlg as UserDialog
      Dialog dlg