J'ai trouvé dans les Faqs un code génial permettant d'ouvrir un état access depuis VB.
Mon problème reste maintenant de savoir s'il est possible de filtrer l'état à partir de VB, à l'ouverture
Voici le code modifié mais il ne filtre rien
Merci à tous
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 Public Sub ImprimerEtatAccess(nomEtat As String, strFiltre As String) On Error GoTo Erreur Dim MaDbMat As String Dim MesEtats As Access.Application MaDbMat = App.Path & "\Etats.adp" Set MesEtats = New Access.Application MesEtats.OpenCurrentDatabase MaDbMat, False ''''''''''''''''''''''''''''''''''''''''''''' MesEtats.Visible = True MesEtats.DoCmd.OpenReport nomEtat, acViewPreview, strFiltre MesEtats.DoCmd.Maximize Exit Sub Erreur: MsgBox Err.Description End Sub
Partager