Bonjour,
Je suis en train de réaliser une base de gestion d'abonnés.
Après avoir filtré la base dans un formulaire (filtre multicritère en VBA),
je souhaite exporter ces résultats dans un état pour éditer des fiches de rappel.
N'ayant aucune connaissance en VBA, j'ai trouvé un tutorial pour m'aider à réaliser ce transfert mais le résultat n'est pas concluant.
Je m'explique :
J'ai créé un bouton dans mon formulaire "recherche _abonnements" qui m'envoie vers l'état "relance_abonnement_revue" grace au code :
et j'ai mis un code sur l'évènement Open de mon Etat :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 [color=blue]Private Sub Commande70_Click() Dim relance_abonnement_revue As String relance_abonnement_revue = "relance_abonnement_revue" DoCmd.OpenReport relance_abonnement_revue, acPreview End Sub[/color]
Le passage de l'un à l'autre se fait bien mais mon filtrage n'est pas appliqué (il m'édite TOUTE la table)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 [color=blue]Private Sub Report_Open(Cancel As Integer) Me.RecordSource = Forms.Item("imprimer_etat").RecordSource End Sub[/color]
Qu'est ce qui ne fonctionne pas ?
y'a t il une erreur dans le code ?
Pouvez vous m'aider, s'il vous plait ?
Merci d'avance
Skalia
Partager