Discussion :

[revemane]

bonjour

dans un userform je doit introduire des données à plusieurs moments de la journée
j'aimerai faire un bouton qui me permette de mémoriser les donnée incrite dans les txtbox et une fois que je re ouvre mon userform que les données soit toujours dans les txtbox et ensuite quand je clic sur enregistrer les données sont rapatrier vers ma feuil et puis le formulaire vidé

merci ( pas besoin d'aide pour le bouton enregistrer juste la memorisation des données

[patricktoulon]

rajoute un bouton"memo"
rajoute un text box nommé "titros" pour inscrire un titre
a suposer que ton textbox s'apelle tartanpion
et dans le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
private sub memo_click()
add.sheet
namo =Date & titros
sheet.count.name=namo
c=Range("A1").End(xlDown).Offset(1, 0).Select 'ca te trouve la premiere ligne vide
 
sheet(namo).range("a"&c).value=tartanpion 'si tu veux que ca soit memorisé dan la collonne A

jusque la tu a ecris ce que tu veux dans ton textbox"tartanpion" et en cliquant sur memo tu l'inscris sur une nouvelle feuille nommée "ce qui corespond a namo"
pour enregistrer c'est pas un probleme puisque tu a dit que tu avais trouvé

rajoute un combobox nome le "recap"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
private sub recap_click()
recap.list()=("a1;a100")

dorenavant tans ton combobox tu aura la liste de toute les fois que tu auras cliquer sur "memo"
tartanpion=combobox
voila en choisissant un nom dans ton combobox ca le retranscrira sur ton textbox nommé tartanpion

tu peux repéter autant de fois la formule dans ton code que tu a de textbox
si ca peut t'aider

[LeForestier]

Bonjour,
Un code compacte si tu a plusieurs TextBox à traiter...
A+