OVH Cloud OVH Cloud

[VBA] saisir une fiche...

2 réponses
Avatar
Michel.P
Bonjour à toutes et tous
J'ai ma grille de saisie perso. quand je saisi
une fiche, je voudrai quand je clique sur le
bouton "saisir" qu'une fois la saisie
sur la feuille effectuée, mon UserForm vierge
revienne à l'écran.
Pour l'instant, quand je clique, la saisie se
fait mais la boite disparait, j'ai essayé avec
Goto mais ça boucle en permanence
j'arrive pas à m'en sortir.
Une bonne idée à me soufler...
merci d'avance.

--
Amicalement
Michel . P
(un jour, serai Calife à la place du Calife...)

2 réponses

Avatar
papou
Bonjour
En fonction du type de contrôle contenant les données à saisir, tu peux
imaginer par exemple vider chacun de ces contrôles une fois que la saisie
précédente à été recopiée.
Donc en adpatant au type de contrôle tu ajoutes ceci après avoir recopié tes
données :
For each ctr in me.Controls
If TypeOf ctr is msforms.textbox then ctr.value =""
Next ctr

Cordialement
Pascal


"Michel.P" a écrit dans le message de
news:
Bonjour à toutes et tous
J'ai ma grille de saisie perso. quand je saisi
une fiche, je voudrai quand je clique sur le
bouton "saisir" qu'une fois la saisie
sur la feuille effectuée, mon UserForm vierge
revienne à l'écran.
Pour l'instant, quand je clique, la saisie se
fait mais la boite disparait, j'ai essayé avec
Goto mais ça boucle en permanence
j'arrive pas à m'en sortir.
Une bonne idée à me soufler...
merci d'avance.

--
Amicalement
Michel . P
(un jour, serai Calife à la place du Calife...)



Avatar
Michel.P
Merci Pascal
j'épluche ta solution et l'adapte à ma grille..on
va bien voir si j'y arrive...

Il se trouve que papou a formulé :
Bonjour
En fonction du type de contrôle contenant les données à
saisir, tu peux imaginer par exemple vider chacun de
ces contrôles une fois que la saisie précédente à été
recopiée. Donc en adpatant au type de contrôle tu
ajoutes ceci après avoir recopié tes données :
For each ctr in me.Controls
If TypeOf ctr is msforms.textbox then ctr.value =""
Next ctr

Cordialement
Pascal


"Michel.P" a
écrit dans le message de
news:
Bonjour à toutes et tous
J'ai ma grille de saisie perso. quand je saisi
une fiche, je voudrai quand je clique sur le
bouton "saisir" qu'une fois la saisie
sur la feuille effectuée, mon UserForm vierge
revienne à l'écran.
Pour l'instant, quand je clique, la saisie se
fait mais la boite disparait, j'ai essayé avec
Goto mais ça boucle en permanence
j'arrive pas à m'en sortir.
Une bonne idée à me soufler...
merci d'avance.

--
Amicalement
Michel . P
(un jour, serai Calife à la place du Calife...)



--
Amicalement
Michel . P
(un jour, serai Calife à la place du Calife...)