G
Goutedo
Guest
bonjour à vous.
je suis un grand débutant en VBA. Donc, devant un problème je me suis tourné vers l'aide VBA, et le forum mais je n'ai pas trouvé de réponse à ma question.
* Contexte:
J'ai une macro qui doit créer une texte box.
Pas de problème pour la créer.
* Mon souci:
Mais je souhaite que cette texte box est un nom et une valeur par défaut.
Et ça je n'y arrive pas.
Quelqu'un pourrait-il m'aider à faire ce bout de code ou m'orienter vers un site qui expliquerait clairement le concept et les propriétés d'un OLEOBJECT?
Merci pour l'attention que vous porterez à cette question
Goutedo
PS:
voici mon code
Dim Num as Integer
Dim haut As Integer
haut = 30
Dim gauche As Integer
gauche = 100
Do while num<5
ActiveSheet.OLEObjects.Add(ClassType:="Forms.TextBox.1", Link:=False, DisplayAsIcon:=False, Left:=(gauche * 3 + 40), Top:=haut, Width:=35, Height:=15.75).Select
num=num +1
Loop
je suis un grand débutant en VBA. Donc, devant un problème je me suis tourné vers l'aide VBA, et le forum mais je n'ai pas trouvé de réponse à ma question.
* Contexte:
J'ai une macro qui doit créer une texte box.
Pas de problème pour la créer.
* Mon souci:
Mais je souhaite que cette texte box est un nom et une valeur par défaut.
Et ça je n'y arrive pas.
Quelqu'un pourrait-il m'aider à faire ce bout de code ou m'orienter vers un site qui expliquerait clairement le concept et les propriétés d'un OLEOBJECT?
Merci pour l'attention que vous porterez à cette question
Goutedo
PS:
voici mon code
Dim Num as Integer
Dim haut As Integer
haut = 30
Dim gauche As Integer
gauche = 100
Do while num<5
ActiveSheet.OLEObjects.Add(ClassType:="Forms.TextBox.1", Link:=False, DisplayAsIcon:=False, Left:=(gauche * 3 + 40), Top:=haut, Width:=35, Height:=15.75).Select
num=num +1
Loop