Discussion :

[AidezMoiSvp]

Bonjour,

Via un bouton sur une feuille, j'appelle un userform.
J'aimerai que dans ce dernier soit reporté les valeurs de certaines cellules.

Voici mon code :

Code :

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

1
2
3
4
5
6
7
 
USFDetails.Show 1
With USFDetails
        .txtNom.Value = Cells(i, 3)
        .txtPrenom.Value = Cells(i, 4)
        .cboSexe.Value = Cells(i, 5)
    End With

Mon formulaire s'ouvre mais mes données ne sont pas mises à jour. Je m'explique : quand je clique sur le bouton, mon formulaire s'ouvre affiche les données mais quand je ferme mon formulaire et que je veux voir le détail d'une autre personne, mon formulaire s'ouvre mais il a gardé en mémoire les valeurs précédente. Je dois le refermer puis l'ouvrir de nouveau pour qu'il prenne bien en compte les valeurs nouvelles.

Une idée ?

Merci

[Invité]

comment refermes tu ton formulaire:

Code :

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

unload me '?

[AidezMoiSvp]

Je le ferme avec la croix.
J'ai mis "unload me" dans la procédure queryclose mais ça ne change rien.

[Invité]

rajoute ça dans ton USF:

Code :

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

1
2
3
4
5
6
Public Sub chagement(Nom As String, Prenom As String, Sexe As String)
txtNom.Value = Nom
txtPrenom.Value = Prenom
cboSexe.Value = Sexe
Me.Show vbModal
End Sub

et tu l'appel comme ça dans ton code:

Code :

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

USFDetails.chagement Cells(I, 3), Cells(I, 4), Cells(I, 5)

[AidezMoiSvp]

J'ai essayé le code.
le formulaire s'ouvre mais les txtbox sont vides. Je dois cliquer sur la croix, le formulaire se ferme et se relance tout seul en affichant les bonnes données.

Bizarre...

[Invité]

oublis fais seulement ça:

Code :

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

1
2
3
4
5
6
With USFDetails
        .txtNom.Value = Cells(i, 3)
        .txtPrenom.Value = Cells(i, 4)
        .cboSexe.Value = Cells(i, 5)
End With
USFDetails.Show 1

[AidezMoiSvp]

Nikel !

J'avais même pas pensé à donner les valeurs aux textbox avant d'afficher le formulaire...

Merci !