BTN_ValiderRésolu

Question

Bonjour, apres avoir rempli les champs de mon formulaire, je valide pour envoyer mes donnees dans une feuille excel, mais avec mon code mon formulaire se ferme alors que je voudrai qu il se remette a zero une fois les donnees envoyees...

Private Sub BTN_Valider_Click()
   X instructions
Call Unload(Me) 


End Sub

Merci

jrivet · Accepted Answer

Salut,
Et bien tu les vide avec VbNUllstring. je vois pas le problème.

'Dans un Module

Public Sub EffaceTextBox(ByRef UForm As UserForm)
    Dim Ctrl As Control
    'Boucle pour tout les contrôle de UForm
    For Each Ctrl In UForm.Controls
        If TypeOf Ctrl Is MSForms.TextBox Then Ctrl.Value = VbNullString
    Next
    Set Ctrl = Nothing
End Sub
<hr style="width: 100%; height: 2px;" />
'N'importe ou dans un USerForm
Call EffaceTextBox(Me)

regarde ce snippet présent sur codyx.org (comme quoi quand on dit de rechercher un peu avant de poser une question c'est pas pour rien)

@+: Ju£i?n
Pensez: Réponse acceptée

jrivet · Answer

Salut,
Si tu e veux pas qu'il se ferme, commence déjà par enlever le code qui lui dit de se fermer  (Unload(me)

Ensuite c'est à TOI de le réinitialiser.

qu'entends par "remettre à zero"?

Pense à bien expliquer ton problème. 

@+: Ju£i?n
Pensez: Réponse acceptée

Gil369 · Answer

Salut, je voudrai qu'apres validation, le formulaire reste actif pour entrer d autres saisies

jrivet · Answer

Salut,
Si je me souviens bien tu travailles avec VBA Excel non?
"formulaire reste actif " et qu'est ce qui t'en empêche?

@+: Ju£i?n
Pensez: Réponse acceptée

Gil369 · Answer

re, oui tu as bonne memoire !




qu il reste affiché a l ecran apres avoir vidé les txtbox afin que je puisse effectuer d autre saisies




PS mon projet evoluant, la premiere solution me convenai, mais j ai depuis ajouté un BTN_Fermer
Merci
Gil

jrivet · Answer

Salut,
Dans ce cas pourquoi poster dans une section ([infomsgf_VB-NET-VB-2005_40.aspx VB.NET et VB 2005]) différente de celle consacr à VBA?

Pour ne plus décharger  commence par dégager Call Unload(Me) 

Ensuite vide tout les textbox et si cela ne suffit pas explqiue encore mieux (j'aimerais ne pas attendre 3 pages pour avoir toutes les indications nécessaire.)

Tu sais pourtant vider les text box alors je ne vois pas du tout ou se trouve ton problème.
@+: Ju£i?n
Pensez: Réponse acceptée

Gil369 · Answer

re, ok j essaie et poste sur vba ( ce que je pensai avoir fait !)
Salut et merci

jrivet · Answer

Non mais ne reposte pas un admin déplacera. sinon cela fera deux post pour le meme problème

@+: Ju£i?n
Pensez: Réponse acceptée

Gil369 · Answer

re, en virant Call Unload (Me), et en validant par BTN_Valider, les valeurs saisies dans les textbox vont bien sur ma feuille excel, mais restent affichees sur mon formulaire, alors que je voudrai "vider" les textbox pour effectuer les saisies suivantes
merci

Gil369 · Answer

re, j essaie tout ça et vais regarder le snippet.
Ca a l air tellement evident pour toi, mais je debute avec l aide en ligne et qq bouquins
Merci

BTN_Valider

10 réponses

Votre réponse