Bonsoir,
afin de pouvoir imprimer un seul enregistrement d'une table il faut au préalable l'identifier par son numéro unique d'identification (éventuellement numéro auto).
Il peut y avoir plusieurs solutions, mais pour ma part ce que je fais la plupart du temps c'est un formulaire de recherche contenant une list box reflétant tous les enregistrements avec une instruction de type OpenReport sur sortie du formulaire de ce style.
DoCmd.OpenReport "MON_ETAT", acViewPreview, "", "", acDialog
Sur la list box une intruction sur sortie pour renvoyer le numéro de l'enregistrement en mémoire.
numero_choisi = Me.ma_list_box.Value
la variable "numero_choisi" étant une variable publique dans un module.
Public numero_choisi As Long
Ensuite il ne reste plus qu'à mettre une instruction sur ouverture de l'état et le tour est jouer.
1 2 3
| Private Sub Report_Open(Cancel As Integer)
Report.RecordSource = "SELECT ma_table.* FROM ma_table WHERE (((ma_table.numero_identification)=" & numero_choisi & "));"
End Sub |
Ca fait parti des solutions envisageables, je ne dis pas que c'est la meilleure, mais ça reste assez simple à programmer.
Bon courage
Partager