Discussion :

[blin07]

Bonjour à tous,

Voila je vous présente mon petit soucis.

J'ai crée un Etat "Photo d'identité" pour lequel je demande le nom de la photo à afficher. Jusqu'ici aucun probléme..

Mais je souhaiterai pouvoir imprimer plusieurs exemplaires de la meme photo sur une seule page en fonction des besoins de l'utilisateur.

(par exemple l'utilisateur saisirait dans une zone de texte a l'ouverture le nombre d'exemplaires souhaités pour avoir une seule page au lieu d'imprimer autant de pages que de photos souhaitées) en fait dupliquer l'état sur une meme page

si cela est possible et que vous pouvez m'aider, n'hésitez pas ...

Merci d'avance...

[helas]

il faut créer autant de photos que la page peut en contenir et les rendre
invisibles. Le nom des éléments de l'état doivent pouvoir s'incrementer.
exemple : photo1 , photo2, photo3,... pour le 1er objet, le 2ème, etc tous contenant la même photo

Sur l'événement Ouverture de l'état , placer ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Private Sub Report_Open(Cancel As Integer)
 Dim i As Integer, n As Integer
 n = CInt(InputBox("Nb de photos", "Edition de photos", 1))
 If (n < 1) Or (n > 15) Then Exit Sub
 i = 1
 Do
   'si i <= n alors c'est Vrai sinon c'est Faux
   Me("photo" & CStr(i)).Visible = (i <= n)   
   i = i + 1
 Loop Until i > 15
End Sub

[blin07]

Merci beaucoup à toi Helas,

c'est exactement ce que je cherchais.
Ca fonctionne nickel

Encore merci...