Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access impression d'une photo

impression d'une photo

7 réponses
Avatar
yann
bonjour

J'ais une form dans laquelle j'ais une image charger par du code
quand je fait aperçu du formulaire je la voie, mais quand je lance
l'impression l'image n'apparais pas
comment faire pour l'imprimer
Merci.
Signaler un problème avec ce contenu

7 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Raymond [mvp]
Bonjour.
Si tu imprime le formulaire tu imprimera l'image du premier enregistrement,
si tu as une image cette image sera imprimée sur tous les enregistrements et
si tu n'as pas d'image tous les enregistrements n'auront pas d'image. Il
faut passer par l'impression d'un état. tu as un exemple d'état sur la base
exemple en téléchargement:
http://access.seneque.free.fr/bases_exemples.htm N° 38


--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"yann" a écrit dans le message de
news:4016324d$0$22313$
bonjour

J'ais une form dans laquelle j'ais une image charger par du code
quand je fait aperçu du formulaire je la voie, mais quand je lance
l'impression l'image n'apparais pas
comment faire pour l'imprimer
Merci.




Avatar
yann
Si j'ais bien compris j doit transformer mon formulaire en état l'orsque je
veut imprimer

"Raymond [mvp]" a écrit dans le message de
news:
Bonjour.
Si tu imprime le formulaire tu imprimera l'image du premier
enregistrement,

si tu as une image cette image sera imprimée sur tous les enregistrements
et

si tu n'as pas d'image tous les enregistrements n'auront pas d'image. Il
faut passer par l'impression d'un état. tu as un exemple d'état sur la
base

exemple en téléchargement:
http://access.seneque.free.fr/bases_exemples.htm N° 38


--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"yann" a écrit dans le message de
news:4016324d$0$22313$
bonjour

J'ais une form dans laquelle j'ais une image charger par du code
quand je fait aperçu du formulaire je la voie, mais quand je lance
l'impression l'image n'apparais pas
comment faire pour l'imprimer
Merci.








Avatar
Raymond [mvp]
même pas, il faut que tu fasses un état pour pouvoir inclure du code.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"yann" a écrit dans le message de
news:4016396a$0$22300$
Si j'ais bien compris j doit transformer mon formulaire en état l'orsque
je

veut imprimer

"Raymond [mvp]" a écrit dans le message de
news:
Bonjour.
Si tu imprime le formulaire tu imprimera l'image du premier
enregistrement,

si tu as une image cette image sera imprimée sur tous les
enregistrements


et
si tu n'as pas d'image tous les enregistrements n'auront pas d'image. Il
faut passer par l'impression d'un état. tu as un exemple d'état sur la
base

exemple en téléchargement:
http://access.seneque.free.fr/bases_exemples.htm N° 38


--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"yann" a écrit dans le message de
news:4016324d$0$22313$
bonjour

J'ais une form dans laquelle j'ais une image charger par du code
quand je fait aperçu du formulaire je la voie, mais quand je lance
l'impression l'image n'apparais pas
comment faire pour l'imprimer
Merci.












Avatar
yann
Ok
c'est ceu que jais fais

exemple du code:

Option Compare Database
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)
On Error Resume Next
If Me.Photo = "(Aucune)" Then
Me.ImageFrame.Picture = ""
Me.ImageFrame.Visible = False
Else
Me.ImageFrame.Picture = Me.Photo
Me.ImageFrame.Visible = True
End If
End Sub

Private Sub ZoneEntêtePage_Format(Cancel As Integer, FormatCount As Integer)
Debug.Print Me.NomImage1
Dim ZZ As String
ZZ = Me.NomImage1
Dim strChemin As String
strQuoi = DLookup("repertoire", "[Informations sur ma société]")
strChemin = strQuoi & "" & ZZ
Me!ImageFrame.Picture = strChemin
End Sub

ca marche
mais comment pouraije faire pour basculer automatiquement du formulaire en
cours avec la select de l'ecran dans l'etat crée



"Raymond [mvp]" a écrit dans le message de
news:
même pas, il faut que tu fasses un état pour pouvoir inclure du code.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"yann" a écrit dans le message de
news:4016396a$0$22300$
Si j'ais bien compris j doit transformer mon formulaire en état l'orsque
je

veut imprimer

"Raymond [mvp]" a écrit dans le message de
news:
Bonjour.
Si tu imprime le formulaire tu imprimera l'image du premier
enregistrement,

si tu as une image cette image sera imprimée sur tous les
enregistrements


et
si tu n'as pas d'image tous les enregistrements n'auront pas d'image.
Il



faut passer par l'impression d'un état. tu as un exemple d'état sur la
base

exemple en téléchargement:
http://access.seneque.free.fr/bases_exemples.htm N° 38


--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"yann" a écrit dans le message de
news:4016324d$0$22313$
bonjour

J'ais une form dans laquelle j'ais une image charger par du code
quand je fait aperçu du formulaire je la voie, mais quand je lance
l'impression l'image n'apparais pas
comment faire pour l'imprimer
Merci.
















Avatar
Raymond [mvp]
tu ouvres ton report avec une clause where.
tu veux imprimer l'enregistrement en cours ou le recorrdset ?
pour l'enregistrement en cours tu mets la valeur de ta clé primaire qui doit
être affichée à l'écran, pour le record set tu prends la clause where de ta
requête.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"yann" a écrit dans le message de
news:40164525$0$22316$
Ok
c'est ceu que jais fais

exemple du code:

Option Compare Database
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)
On Error Resume Next
If Me.Photo = "(Aucune)" Then
Me.ImageFrame.Picture = ""
Me.ImageFrame.Visible = False
Else
Me.ImageFrame.Picture = Me.Photo
Me.ImageFrame.Visible = True
End If
End Sub

Private Sub ZoneEntêtePage_Format(Cancel As Integer, FormatCount As
Integer)

Debug.Print Me.NomImage1
Dim ZZ As String
ZZ = Me.NomImage1
Dim strChemin As String
strQuoi = DLookup("repertoire", "[Informations sur ma société]")
strChemin = strQuoi & "" & ZZ
Me!ImageFrame.Picture = strChemin
End Sub

ca marche
mais comment pouraije faire pour basculer automatiquement du formulaire en
cours avec la select de l'ecran dans l'etat crée


Avatar
yann
Jais pas tous compri je vais cherche un peut
je vous donnerais ds nouvelle demain.
Merci

"Raymond [mvp]" a écrit dans le message de
news:
tu ouvres ton report avec une clause where.
tu veux imprimer l'enregistrement en cours ou le recorrdset ?
pour l'enregistrement en cours tu mets la valeur de ta clé primaire qui
doit

être affichée à l'écran, pour le record set tu prends la clause where de
ta

requête.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"yann" a écrit dans le message de
news:40164525$0$22316$
Ok
c'est ceu que jais fais

exemple du code:

Option Compare Database
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)
On Error Resume Next
If Me.Photo = "(Aucune)" Then
Me.ImageFrame.Picture = ""
Me.ImageFrame.Visible = False
Else
Me.ImageFrame.Picture = Me.Photo
Me.ImageFrame.Visible = True
End If
End Sub

Private Sub ZoneEntêtePage_Format(Cancel As Integer, FormatCount As
Integer)

Debug.Print Me.NomImage1
Dim ZZ As String
ZZ = Me.NomImage1
Dim strChemin As String
strQuoi = DLookup("repertoire", "[Informations sur ma société]")
strChemin = strQuoi & "" & ZZ
Me!ImageFrame.Picture = strChemin
End Sub

ca marche
mais comment pouraije faire pour basculer automatiquement du formulaire
en


cours avec la select de l'ecran dans l'etat crée






Avatar
yann
Jais trouvr plus simple

DoCmd.PrintOut acSelection, Current, , acHigh

pour imprimer mon formulaire sans passer par un etat

"Raymond [mvp]" a écrit dans le message de
news:
tu ouvres ton report avec une clause where.
tu veux imprimer l'enregistrement en cours ou le recorrdset ?
pour l'enregistrement en cours tu mets la valeur de ta clé primaire qui
doit

être affichée à l'écran, pour le record set tu prends la clause where de
ta

requête.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"yann" a écrit dans le message de
news:40164525$0$22316$
Ok
c'est ceu que jais fais

exemple du code:

Option Compare Database
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)
On Error Resume Next
If Me.Photo = "(Aucune)" Then
Me.ImageFrame.Picture = ""
Me.ImageFrame.Visible = False
Else
Me.ImageFrame.Picture = Me.Photo
Me.ImageFrame.Visible = True
End If
End Sub

Private Sub ZoneEntêtePage_Format(Cancel As Integer, FormatCount As
Integer)

Debug.Print Me.NomImage1
Dim ZZ As String
ZZ = Me.NomImage1
Dim strChemin As String
strQuoi = DLookup("repertoire", "[Informations sur ma société]")
strChemin = strQuoi & "" & ZZ
Me!ImageFrame.Picture = strChemin
End Sub

ca marche
mais comment pouraije faire pour basculer automatiquement du formulaire
en


cours avec la select de l'ecran dans l'etat crée