Excel Downloads
Forum

Précédent   Excel Downloads Forums > Archives > Forum Excel Downloads - Archives

Advertisement

 
 
LinkBack Outils de la discussion
Vieux 21/01/2005, 19h16   #1 (permalink)
zab
Guest
 
Messages: n/a
Par défaut créer un textbox en cliquant sur un bouton

bonsoir à tous,

je souhaiterais que, à chaque clic sur un bouton (dans un userform), un textbox se crée, et si plusieurs clics, alors plusieurs textbox les uns sous les autres.

j'arrive à faire le premier, mais pas le suivant... en fait le premier se place tout seul sur le userform, je ne sais pas imposer un emplacement précis.

merci de m'éclairer!
Fichiers attachés
Type de fichier : zip Book1.zip (8,4 Ko, 7 affichages)
 
ANNONCES
Vieux 21/01/2005, 21h53   #2 (permalink)
zab
Guest
 
Messages: n/a
Par défaut Re: créer un textbox en cliquant sur un bouton

re-bonsoir,

j'essaie de me dépatouiller mais j'ai besoin d'un coup de pouce...

dans mon fichier ci-joint vous verrez qu'en cliquant sur le bouton j'ai 10 textbox qui s'affichent... moi je voudrais qu'au premier clic un textbox s'affiche, au deuxième clic un autre s'affiche sous le premier, etc.

quelqu'un pourrait-il m'aider?
d'avance merci.
Fichiers attachés
Type de fichier : zip Book2.zip (9,9 Ko, 4 affichages)
 
Vieux 22/01/2005, 20h19   #3 (permalink)
zab
Guest
 
Messages: n/a
Par défaut Re: créer un textbox en cliquant sur un bouton

bonsoir,
je ne voudrais pas avoir l'air d'insister m'enfin... si quelqu'un pouvait m'aider...
merci, zab.
 
Vieux 22/01/2005, 20h38   #4 (permalink)
galopin01
Guest
 
Messages: n/a
Par défaut Re: créer un textbox en cliquant sur un bouton

Bonsoir,
En modifiant la macro de la manière suivante dans ton Book1 tu verras que chaque clic crée bien un TextBox

Private Sub CommandButton1_Click()
Set TextBox1 = UserForm1.Controls.Add("Forms.Textbox.1", "TB1", True)
MsgBox UserForm1.Controls.Count
End Sub

... ce qui cloche c'est qu'il les crée les uns sur les autres.
Je te laisse méditer la dessus.
Bonne soirée !
A+
 
Vieux 22/01/2005, 20h43   #5 (permalink)
michel
Guest
 
Messages: n/a
Par défaut Re: créer un textbox en cliquant sur un bouton

bonsoir Zab

j'espere que cette adaptation pourra t'aider

Private Sub CommandButton1_Click()
Dim TxBox As Control
Dim i As Byte

i = Me.Controls.Count - 1

Set TxBox = UserForm1.Controls.Add("Forms.Textbox.1", "TB" & i, True)
With TxBox
.Tag = "TB" & i
.Top = (20 * i) + 40
.Left = 10
End With

End Sub


bonne soiree
MichelXld
 
Vieux 22/01/2005, 20h45   #6 (permalink)
michel
Guest
 
Messages: n/a
Par défaut Re: créer un textbox en cliquant sur un bouton

bonsoir Galopin

excuses moi de ne pas t'avoir salué
...nos messages se sont croisés ...


tres bonne soirée
MichelXld
 
Vieux 22/01/2005, 21h07   #7 (permalink)
zab
Guest
 
Messages: n/a
Par défaut Re: créer un textbox en cliquant sur un bouton

merci mille fois Michel et Galopin pour ce duo de réponses!
@+ zab
 
ANNONCES
 

Liens sociaux

Outils de la discussion

Règles de messages
Vous ne pouvez pas créer de nouvelles discussions
Vous ne pouvez pas envoyer des réponses
Vous ne pouvez pas envoyer des pièces jointes
Vous ne pouvez pas modifier vos messages

Les balises BB sont activées : oui
Les smileys sont activés : oui
La balise [IMG] est activée : oui
Le code HTML peut être employé : non
Trackbacks are oui
Pingbacks are oui
Refbacks are oui


Fuseau horaire GMT +2. Il est actuellement 08h33.


(C) 2006 Excel Downloads