Discussion :

[electrosat03]

Bonjour,

Dans un Form qui affiche des données issue de Requête, j'ai un bouton qui permet d'ouvrir un Form pour choisir une date, suite à cela, la requête est redéfinie par VBA.
Quand je ferme ce Form, j'aimerais que mon Form d'appel affiche les données qui résultent de la requête modifiée.

J'ai essayé avec un Refresh, Requery mais rien ne se passe sauf si par ex ; je fais un tri ascendant ou autre.

Où faudrait-il mettre le code et quel code afin de rafraichir les datas

Merci

[hyperion13]

Salut
Peut-être un début de piste
Dans le frm où tu sélectionnes ta date via une combobox tu places sur AfterUpdate() de la combobox ou Click() d'un btn de commande

Code :

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

1
2
3
If Not IsNull(Me.cboDate.Value) And CurrentProject.AllForms("frmAppel").IsLoaded = True Then
    Call Forms.frmAppel.MaJformAppel
End If

Dans le frmAppel tu crées une Public Sub()

Code :

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

1
2
3
4
5
6
7
8
9
10
Public Sub MaJformAppel()
Dim strSql As String
If CurrentProject.AllForms("frmDate").IsLoaded = True Then
    strSql = "SELECT *" _
    & " FROM maTable" _
    & " WHERE champDate = Forms!frmDate!cboDate"
    Me.RecordSource = strSql
    Me.Requery
End If
End Sub

[electrosat03]

Salut Hyperion13,

9a fonctionne Nickel, j'avais essayé avec requery et refresh mais ça ne fonctionnait pas.

Ton code fonctionne, merci