Récupérer une variable saisie ds un TextBox

[Francis]

bonjour le forum,

c'est encore moi qui ouvre 'les hostilités', il est vrai que je suis un peu noctanbule.
j'ai un soucis de récupération de variable,à savoir:

j'ai une procédure dans laquelle je déclare deux variables A et B 'Public'. Cette procédure appelle un UserForm qui possède deux TextBox(1-2). Dans le UserForm, j'affecte respectivement les valeurs de TextBox1 et TextBox2 à A et B. Mais comme je sors par End Sub, il semblerait que les variables A et B soient réinitialisées quand je retourne dans la procédure appelante. Y a t-il une solution pour contourner ce petit Pb et lequel merci. Voici le code du UserForm.

Sub UserForm()
Lieu = TextBox1.Value
dept = TextBox2.Value
End Sub
Sub commandButton1_Click()
Unload Me
End Sub

 

[Francis]

Re bonjour à tous,

en fin de compte j'ai changé mon fusil d'épaule et je pa par InputBox, mais là le compilateur n'est pas d'accord avec moi et je ne vois pas ce qu'il veut:

Nombre d'arguments incorrect ou affectation de propriété incorrect

dim A as Integer
Do Until A <> ""
A = InputBox("XX :", "YY", "", 9000, 6900, , , 1)
Loop

Quelqu'un voit il ce qui cloche?
Merci pour vos lumiéres.

 

[michel]

bonsoir Francis

j'espere que ce lien pourra t'aider
il y a un chapitre qui traite des InputBox

Lien supprimé


bonne soiree
MichelXld