Discussion :

[Aeltith]

Bonjour

Presque tout est dans le titre.


Alors voilà, j'ai un programme qui affiche un userform. Dans ce userform je rentre des informations, ces informations doivent être copier par la suite dans un tableau excel.


Et c'est sur ce dernier point que mon programme bug.


Voilà le code que mon programme qui se trouve dans un module de mon tableau Excel, celui qui doit recevoir les informations.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub creation_code()
Dim a As Range
Set a = Workbooks("bd_code.xls").Worksheets("liste_codes").Range("a2")

While a <> ""
Set a = a.Offset(1, 0)
Wend

a.Value = textbox1.Value
a.Offset(0, 1).Value = textbox2.Value

ThisWorkbook.Save

End Sub

Je l'ai testé il marche bien, mais le debugger s'arrête sur la ligne en rouge. La seconde ligne en rouge elle aussi bug donc.

En fait j'ai besoin d'une information technique, sur comment écrire dans le tableau excel les informations des textboxs de mon userform.

Merci pour les informations et le temps prit pour me répondre.

[Aeltith]

Mon problème s'affine.

En fait j'arrive à copier les informations de mon userform2. Mais j'ai un deuxèime userform (appellé userform1) et ses informations à lui ne s'enregistre pas sur la feuille Excel.

En quelques points voilà ce que je fais :

1)clic sur un bouton qui déclenche l'userform 1
2)je rentre mes infos dans l'userform 1
3)clic sur un bouton dans l'userform 1 qui déclenche:

userform2.show
unload me

4) je rentre mes infos dans l'userform2
5)clic sur un bouton qui déclenche une macro qui copie les informations de mon userform 2 dans un tableau Excel mais il ne copie pas les infos de mon userform1.

Tout se passe donc bien sauf que les informations de mon userform1 se sont pas copier dans mon tableau.

[fring]

Bonjour,

Ton problème vient du fait que tu Unload le UserForm1, c'est à dire que tu le sors de la mémoire et réinitialise tous ses contrôles.

Essaye ceci dans ton UserForm1

Code :

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

1
2
UserForm2.show
Me.Hide

[Aeltith]

Merci pour les infos.

J'essaierai demain au bureau et je ferai un retour ici.

Merci en tout cas.

[Aeltith]

Ca marche pas !

Peut être une erreur de ma part quelque part. Est ce que d'autres informations osnt nécessaires ??

[fring]

Peut être une erreur de ma part quelque part.

Je dirais...probablement que oui

Est ce que d'autres informations osnt nécessaires ??

Oui, sans le code complet impossible de deviner où ça coince