begin process at 2008 08 20 16:03:28
1 228 921 membres
286 nouveaux aujourd'hui
14 259 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Contrôle créé dynamiquement dans Excel à l'aide de macro en VB [ Algorithme / Divers ] (bny)

Contrôle créé dynamiquement dans Excel à l'aide de macro en VB le 06/08/2008 20:17:28

bny
Bonjour, mon problème est le suivant: J'essaie de créer une liste de OptionButton dépendant du nombre d'entrée dans une feuille Excel.  Cependant, je ne sais pas comment créer un controle dynamique à l'aide de Macro VB en Excel...j'ai essayé

Dim optbtn As OptionButton
Set optbtn = Form1.Controls.Add("VB.OptionButton", "Option")

j'ai également essayé de remplacer la seconde ligne par

Set optbtn = Form1.Controls.Add("Forms.OptionButton.1", "Option")

mais cela ne fonctionne pas...L'erreur écrite est la suivante: "Membre de donnée ou de méthode introuvable".  Si quelqu'un connait une façon de faire ce serait grandement apprécié...Et tant qu'à y être, je voudrais seulement savoir s'il est possible de générer un nouveau fichier Excel et d'inscrire des données dedans à l'aide de macro. 

Merci !

Re : Contrôle créé dynamiquement dans Excel à l'aide de macro en VB le 19/08/2008 18:31:14

youpiyoyo
Salut,
le language que utilises est le vba? ou le vb6 ou vb.net? en fonction de ton set... cela doit etre soit vba ou vb6.
ta form appartient a ton prog et non pas une form exel n'est ce pas.
si c'est le cas, c'est pas comme cela que l'on créé un boutton.
voici un exemple simple  en .net:
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim btn As New Button
        btn.Size = New Point(100, 30)
        btn.Text = "option"
        btn.Location = New Point(10, 10)
        Me.Controls.Add(btn)
        AddHandler btn.Click, AddressOf CustomBtn_click
    End Sub
    Private Sub CustomBtn_click()
        MsgBox("click")
    End Sub


@+
youpi :)


Classé sous : aide, vb, macro, excel, optionbutton

Participer à cet échange

Pub



Appels d'offres

CalendriCode

Août 2008
LMMJVSD
    123
45678910
11121314151617
18192021222324
25262728293031

VS Express FR Gratuit !

VS Express en français et 100% gratuit !

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS