Etiquette et gaspillage
Le
Gene
est-il possible de démarrer une impression à partir non
pas de la 1ère étiquette d'une page, mais à partir de la
xème étiquette (étiquette de 3 lignes, 2ème colonne par
exemple )
pas de la 1ère étiquette d'une page, mais à partir de la
xème étiquette (étiquette de 3 lignes, 2ème colonne par
exemple )
le mieux est de filtrer la req souce, tu auras exactement les etiquettes qu'il te faut
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Gene" est-il possible de démarrer une impression à partir non
pas de la 1ère étiquette d'une page, mais à partir de la
xème étiquette (étiquette de 3 lignes, 2ème colonne par
exemple )
Peut-être faire l'édition des étiquettes à partir d'une table tampon et
avant l'édition rajouter autant d'enregistrements vide dans la table qu'il
doit y avoir d'étiquettes vides.
Mimi
"Gene" news:ac3401c43692$07bb0a40$
est-il possible de démarrer une impression à partir non
pas de la 1ère étiquette d'une page, mais à partir de la
xème étiquette (étiquette de 3 lignes, 2ème colonne par
exemple )
"Gene"
est-il possible de démarrer une impression à partir non
pas de la 1ère étiquette d'une page, mais à partir de la
xème étiquette (étiquette de 3 lignes, 2ème colonne par
exemple )
De cette facon:
' Mettre dans la partie déclaration de l'état
Public intToSkip As Integer
Public intSkipped As Integer
' Propriété de la zone Détail - Événement "Sur impression"
Private Sub Détail_Print(Cancel As Integer, PrintCount As Integer)
If intSkipped < intToSkip Then
Me.NextRecord = False
Me.PrintSection = False
intSkipped = intSkipped + 1
End If
End Sub
' Propriété de l'état - Événement "Sur ouverture"
Private Sub Report_Open(Cancel As Integer)
Dim intEttiket As String
intLabel = inputbox("Combien d'étiquettes vides ? : ", "Attention")
If IsNull(intLabel) Then
Cancel = True
Else
intToSkip = Val(intLabel)
End If
End Sub
De rien !!
--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------