controles de saisi de textbox

bonjour,

je ne comprends pas pourquoi mon code ne fonctionne pas :

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim a As String   TextBox1.Value = a   If a <> 0 Then Worksheets("BM").Range("E1") = a And Worksheets("BM").Range("AY1") = 1 Else MsgBox "il manque des infos"   End If

---

pourriez vous m'indiquer mes erreurs.

merci

Bonjour,

déjà (principe 1er) :
tu définis a comme shaîne de caractères (string) (et en plus vide dans ton code, puisque tu ne lui attribues aucune valeur string)
0 est un numérique

Et cette ligne de code (indépendamment de ce que j'ai dit plus haut) :

Code:

---

Worksheets("BM").Range("E1") = a And Worksheets("BM").Range("AY1") = 1

---

ne correspond à aucune syntaxe VB ....

Bien sûr :
c'était la réponse à ta demande, à savoir :

Citation:

---

pourriez vous m'indiquer mes erreurs.

---

ok mais alors comment écrire ma macro:

je souhaiterai que si ma textbox 1 et 2 ne sont pas remplies alors apparaisse un msgbox.

et si les deux textbox ont été remplies alors inscrire leur valeur dans des cellules bien précises

Code:

---

Worksheets("BM").Range("E1")=textbox1.value

---

Correction à main levée, donc :

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim a As String   a = TextBox1.Value If a <> "" Then Worksheets("BM").Range("E1") = a Worksheets("BM").Range("AY1") = 1 Else MsgBox "il manque des infos"   End If

---

ok merci voila je n'avais pas fait attention que je comparais une chaine de caractere avec du numeric.

Tu crois vraiment que ce n'était QUE celà ? :D

au je vais m'améliorer

aujourd'hui c'est ma journée VBA

revenons à nos moutons une dernière précision, comment faire pour que l'on ne puisse pas fermer un userform. car c'est bien beau je controle la saisi de mes textbox, mais si l'utilisateur ne veux pas les remplir rien ne l'en empeche il lui suffit de cliquer sur la croix et hop pas besoin de les remplir.

(ps je ne suis pas du tout dans l'informatique mais j'aime bien vba)

Je comprends que tu aimes bien VBA...
L'amour et l'estime sont toutefois des choses en général partagées...
Tout ce qui précède montre que tu y vas "à tâtons", sans t'être intéresser au VBA que tu dis aimer.
Il est temps de commencer à le faire.
Tu as maintenant là une NOUVELLE question (et je sens que d'autres vont venir).
Elle a sa réponse dans la lecture de l'évènement QueryUnload (F1 sur ce mot) de ton userform.

EDIT :
QueryClose (pas QueryUnload).

il est vraiment génial ce forum

je met moi même la réponse...

Code:

---

1 2 3

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode = vbFormControlMenu Then Cancel = True End Sub

---

Citation:

---

Envoyé par jbggg

il est vraiment génial ce forum

---

Oui, lorsque l'on utilise (ce que tu viens de faire) son moteur de recherches...
Tu aurais d'ailleurs bien pu communiquer directement le lien où tu viens de trouver ta réponse :
http://www.developpez.net/forums/d75...elle-userform/
et qui est plus complet (en vue de la consultation par d'autres forumeurs) ;)