Bonjour,

Je souhaite ouvrir mon "Report" depuis un de mes formulaires via un bouton utilisant du VBA.

Je veux utiliser simplement "DoCmd.OpenReport et le nom du fichier" lorsque je fais ça au lieu de m'ouvrir le report, il essaye de l'imprimer.

Voici à quoi ressemble le code du bouton :

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
16
17
Dim objInk As MSINKAUTLib.InkPicture
Dim byt() As Byte
Dim filen As String
filen = "\\xxxx\xxx\xxxx\Project_Access\signhere\sign.gif"
Set objInk = Me.usersign.Object
byt = objInk.Ink.Save(2)
Open filen For Binary As #1
Put #1, , byt
Close #1
filen = "\\xxx\xxx\xxx\Project_Access\signhere\signlir.gif"
Set objInk = Me.lirsign.Object
byt = objInk.Ink.Save(2)
Open filen For Binary As #2
Put #2, , byt
Close #2
DoCmd.OpenReport ("Sign_1")
End Sub
Merci d'avance, pour votre aide !