OVH Cloud OVH Cloud

un numero different sur chaque feuilles

9 réponses
Avatar
BibiMtl
Office 2000

Bonjour ,=20
Je dois faire un formulaire que je vais imprimer pour=20
demander l'opinion de tous, mais comme je ne veux pas=20
qu'un employ=E9 puis-ce faire des photocopies du bulletin de=20
reponse, j'aimerais inscrire un numero different genre de=20
100 =E0 300 en bas de chaque feuille reponse, comment puis-
je faire? Merci..

9 réponses

Avatar
3stone
Salut,

"BibiMtl" a écrit:
Je dois faire un formulaire que je vais imprimer pour
demander l'opinion de tous, mais comme je ne veux pas
qu'un employé puis-ce faire des photocopies du bulletin de
reponse, j'aimerais inscrire un numero different genre de
100 à 300 en bas de chaque feuille reponse, comment puis-
je faire? Merci..


Au lieu d'un formulaire, imprime plutôt un état... (beaucoup plus souple)

car, dans l'état tu dispose des fonctions [Page] et [Pages]
cela te permet donc d'imprimer les pages en mettant
dans le bas de page une zone de texte avec comme source:

= "Page : " & [Page] & " sur " & [Pages]



--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------
Avatar
pat
Bonjour

"BibiMtl" a écrit:
Je dois faire un formulaire que je vais imprimer pour
demander l'opinion de tous, mais comme je ne veux pas
qu'un employé puis-ce faire des photocopies du bulletin de
reponse, j'aimerais inscrire un numero different genre de
100 à 300 en bas de chaque feuille reponse, comment puis-
je faire? Merci..

" Pierre..." dit
Au lieu d'un formulaire, imprime plutôt un état... (beaucoup plus souple)
car, dans l'état tu dispose des fonctions [Page] et [Pages]
cela te permet donc d'imprimer les pages en mettant
dans le bas de page une zone de texte avec comme source:

= "Page : " & [Page] & " sur " & [Pages]


Pierre, je pense si j'ai bien compris que "BibiMtl" souhaite imprimer 200
pages
(100 à 300) du même état "tenant" sur une seule page....chacune des 200
pages
sera identique avec un numéro différent

peut-être chercher du côté d'une variable "public" INDICE définie à 100
puis lancer l'état avec un truc du style

" for INDICE = 100 to 300"
" DoCmd.OpenReport "MonEtat"
" next INDICE

et dans ce cas la numérotation = "Page : " & [Page] & " sur " & [Pages]
sera à remplacer par = "Page : " & [INDICE] & " sur / 300"

Mais j'ai peut-être pas compris la question ? ;-))

Bon courage
Patrick

Avatar
BibiMtl
Excuse moi 3stone pour la confusion, j'aurais du utiliser
le terme questionaire au lieu de formulaire :) Je veux
imprimer genre 100 fois le meme questionaire de deux page,
mais que chaque questionaie ai un numero different, donc
les deux page de chaque question on le meme numero ex 100,
mais les deux page du second questionnires a le numero 101


Pat j'ai bien fait ce que tu m'as dis, pour le code bravo
ca marche , mais pour le numero en bas de la page, des que
je le met, une fenetre me demande d'entrer le
parametre "indice" il ne semble pas savoir ou prendre le
numero (qui est le but de l'exercise :) )

merci de votre aide...


-----Message d'origine-----
Bonjour

"BibiMtl" a écrit:
Je dois faire un formulaire que je vais imprimer pour
demander l'opinion de tous, mais comme je ne veux pas
qu'un employé puis-ce faire des photocopies du bulletin
de


reponse, j'aimerais inscrire un numero different genre
de


100 à 300 en bas de chaque feuille reponse, comment
puis-


je faire? Merci..

" Pierre..." dit
Au lieu d'un formulaire, imprime plutôt un état...
(beaucoup plus souple)


car, dans l'état tu dispose des fonctions [Page] et
[Pages]


cela te permet donc d'imprimer les pages en mettant
dans le bas de page une zone de texte avec comme source:

= "Page : " & [Page] & " sur " & [Pages]


Pierre, je pense si j'ai bien compris que "BibiMtl"
souhaite imprimer 200

pages
(100 à 300) du même état "tenant" sur une seule
page....chacune des 200

pages
sera identique avec un numéro différent

peut-être chercher du côté d'une variable "public" INDICE
définie à 100

puis lancer l'état avec un truc du style

" for INDICE = 100 to 300"
" DoCmd.OpenReport "MonEtat"
" next INDICE

et dans ce cas la numérotation = "Page : " & [Page] & "
sur " & [Pages]

sera à remplacer par = "Page : " & [INDICE] & " sur /
300"


Mais j'ai peut-être pas compris la question ? ;-))

Bon courage
Patrick





.




Avatar
pat
Re bonjour / bonsoir...;
tu disais :
mais pour le numero en bas de la page, des que
je le met, une fenetre me demande d'entrer le
parametre "indice" il ne semble pas savoir ou prendre le
numero


déclare une variable public

tu crées un nouveau module que tu nommeras variables
tu tapes simplement

Public INDICE as integer

cette variable sera alors "connue" de tous les objets de la base
et donc de ton état

Bye
Patrick


"BibiMtl" a écrit dans le message de
news:267d001c38e8a$98a977e0$

Excuse moi 3stone pour la confusion, j'aurais du utiliser
le terme questionaire au lieu de formulaire :) Je veux
imprimer genre 100 fois le meme questionaire de deux page,
mais que chaque questionaie ai un numero different, donc
les deux page de chaque question on le meme numero ex 100,
mais les deux page du second questionnires a le numero 101


Pat j'ai bien fait ce que tu m'as dis, pour le code bravo
ca marche , mais pour le numero en bas de la page, des que
je le met, une fenetre me demande d'entrer le
parametre "indice" il ne semble pas savoir ou prendre le
numero (qui est le but de l'exercise :) )

merci de votre aide...


-----Message d'origine-----
Bonjour

"BibiMtl" a écrit:
Je dois faire un formulaire que je vais imprimer pour
demander l'opinion de tous, mais comme je ne veux pas
qu'un employé puis-ce faire des photocopies du bulletin
de


reponse, j'aimerais inscrire un numero different genre
de


100 à 300 en bas de chaque feuille reponse, comment
puis-


je faire? Merci..

" Pierre..." dit
Au lieu d'un formulaire, imprime plutôt un état...
(beaucoup plus souple)


car, dans l'état tu dispose des fonctions [Page] et
[Pages]


cela te permet donc d'imprimer les pages en mettant
dans le bas de page une zone de texte avec comme source:

= "Page : " & [Page] & " sur " & [Pages]


Pierre, je pense si j'ai bien compris que "BibiMtl"
souhaite imprimer 200

pages
(100 à 300) du même état "tenant" sur une seule
page....chacune des 200

pages
sera identique avec un numéro différent

peut-être chercher du côté d'une variable "public" INDICE
définie à 100

puis lancer l'état avec un truc du style

" for INDICE = 100 to 300"
" DoCmd.OpenReport "MonEtat"
" next INDICE

et dans ce cas la numérotation = "Page : " & [Page] & "
sur " & [Pages]

sera à remplacer par = "Page : " & [INDICE] & " sur /
300"


Mais j'ai peut-être pas compris la question ? ;-))

Bon courage
Patrick





.




Avatar
Stéphane Lavergne
Bonjour,

J'ai 1 demande complémentaire à ce sujet.
Par contre, je ne cherche pas à imprimer plusieurs fois le même état,
mais à imprimer plusieurs états les uns à la suite des autres,
sans recommencer la pagination à 1.

Si INDICE donne le numéro de la page, est-il possible de connaître le nombre
total de pages qui sera imprimé,
et ce, avant que la 1ère page ne s'imprime ?

Merci d'avance

Stéphane

---

"pat" a écrit dans le message de
news:
Re bonjour / bonsoir...;
tu disais :
mais pour le numero en bas de la page, des que
je le met, une fenetre me demande d'entrer le
parametre "indice" il ne semble pas savoir ou prendre le
numero


déclare une variable public

tu crées un nouveau module que tu nommeras variables
tu tapes simplement

Public INDICE as integer

cette variable sera alors "connue" de tous les objets de la base
et donc de ton état

Bye
Patrick


"BibiMtl" a écrit dans le message de
news:267d001c38e8a$98a977e0$

Excuse moi 3stone pour la confusion, j'aurais du utiliser
le terme questionaire au lieu de formulaire :) Je veux
imprimer genre 100 fois le meme questionaire de deux page,
mais que chaque questionaie ai un numero different, donc
les deux page de chaque question on le meme numero ex 100,
mais les deux page du second questionnires a le numero 101


Pat j'ai bien fait ce que tu m'as dis, pour le code bravo
ca marche , mais pour le numero en bas de la page, des que
je le met, une fenetre me demande d'entrer le
parametre "indice" il ne semble pas savoir ou prendre le
numero (qui est le but de l'exercise :) )

merci de votre aide...


-----Message d'origine-----
Bonjour

"BibiMtl" a écrit:
Je dois faire un formulaire que je vais imprimer pour
demander l'opinion de tous, mais comme je ne veux pas
qu'un employé puis-ce faire des photocopies du bulletin
de


reponse, j'aimerais inscrire un numero different genre
de


100 à 300 en bas de chaque feuille reponse, comment
puis-


je faire? Merci..

" Pierre..." dit
Au lieu d'un formulaire, imprime plutôt un état...
(beaucoup plus souple)


car, dans l'état tu dispose des fonctions [Page] et
[Pages]


cela te permet donc d'imprimer les pages en mettant
dans le bas de page une zone de texte avec comme source:

= "Page : " & [Page] & " sur " & [Pages]


Pierre, je pense si j'ai bien compris que "BibiMtl"
souhaite imprimer 200

pages
(100 à 300) du même état "tenant" sur une seule
page....chacune des 200

pages
sera identique avec un numéro différent

peut-être chercher du côté d'une variable "public" INDICE
définie à 100

puis lancer l'état avec un truc du style

" for INDICE = 100 to 300"
" DoCmd.OpenReport "MonEtat"
" next INDICE

et dans ce cas la numérotation = "Page : " & [Page] & "
sur " & [Pages]

sera à remplacer par = "Page : " & [INDICE] & " sur /
300"


Mais j'ai peut-être pas compris la question ? ;-))

Bon courage
Patrick





.








Avatar
BibiMtl
Meme probleme??

j'ai cree mon module "variables"
Option Compare Database
Option Explicit
Public INDICE As Integer


Et mon bouton print est:
Private Sub Commande0_Click()
For INDICE = 100 To 300
DoCmd.OpenReport "etat-nom"
Next INDICE
End Sub


en bas de mon etat j'ai : ="Page : " & [INDICE] & " sur /
300"


a+


-----Message d'origine-----
Re bonjour / bonsoir...;
tu disais :
mais pour le numero en bas de la page, des que
je le met, une fenetre me demande d'entrer le
parametre "indice" il ne semble pas savoir ou prendre
le


numero


déclare une variable public

tu crées un nouveau module que tu nommeras variables
tu tapes simplement

Public INDICE as integer

cette variable sera alors "connue" de tous les objets de
la base

et donc de ton état

Bye
Patrick


"BibiMtl" a écrit dans le message de
news:267d001c38e8a$98a977e0$

Excuse moi 3stone pour la confusion, j'aurais du utiliser
le terme questionaire au lieu de formulaire :) Je veux
imprimer genre 100 fois le meme questionaire de deux page,
mais que chaque questionaie ai un numero different, donc
les deux page de chaque question on le meme numero ex 100,
mais les deux page du second questionnires a le numero 101


Pat j'ai bien fait ce que tu m'as dis, pour le code bravo
ca marche , mais pour le numero en bas de la page, des que
je le met, une fenetre me demande d'entrer le
parametre "indice" il ne semble pas savoir ou prendre le
numero (qui est le but de l'exercise :) )

merci de votre aide...


-----Message d'origine-----
Bonjour

"BibiMtl" a écrit:
Je dois faire un formulaire que je vais imprimer pour
demander l'opinion de tous, mais comme je ne veux pas
qu'un employé puis-ce faire des photocopies du bulletin
de


reponse, j'aimerais inscrire un numero different genre
de


100 à 300 en bas de chaque feuille reponse, comment
puis-


je faire? Merci..

" Pierre..." dit
Au lieu d'un formulaire, imprime plutôt un état...
(beaucoup plus souple)


car, dans l'état tu dispose des fonctions [Page] et
[Pages]


cela te permet donc d'imprimer les pages en mettant
dans le bas de page une zone de texte avec comme
source:




= "Page : " & [Page] & " sur " & [Pages]


Pierre, je pense si j'ai bien compris que "BibiMtl"
souhaite imprimer 200

pages
(100 à 300) du même état "tenant" sur une seule
page....chacune des 200

pages
sera identique avec un numéro différent

peut-être chercher du côté d'une variable "public" INDICE
définie à 100

puis lancer l'état avec un truc du style

" for INDICE = 100 to 300"
" DoCmd.OpenReport "MonEtat"
" next INDICE

et dans ce cas la numérotation = "Page : " & [Page] & "
sur " & [Pages]

sera à remplacer par = "Page : " & [INDICE] & " sur /
300"


Mais j'ai peut-être pas compris la question ? ;-))

Bon courage
Patrick





.




.





Avatar
pat
Bonjour,
"BibiMtl" a écrit Meme probleme??
j'ai cree mon module "variables"
Option Compare Database
Option Explicit
Public INDICE As Integer

Et mon bouton print est:
Private Sub Commande0_Click()
For INDICE = 100 To 300
DoCmd.OpenReport "etat-nom"
Next INDICE
End Sub
en bas de mon etat j'ai : ="Page : " & [INDICE] & " sur /
300"



Effectivemen, j'ai testé euh........ oups.......... etc........ marche pas
;-((((
je pense qu'aucune variable type public ne peut être passée à un état

A la réflection, si j'avais à faire celà, je "biaiserais" et je créerais une
table temporaire
genre TBL_nopage avec un champ de type entier court par exemple NumPag

Dans la requete source de l'état, j'ajouterais le champ NumPag

puis sur le bouton "print" un truc du genre...
Private Sub MONBOUTON_Click()
dim MABD as database
dim MATAB as recordset
set MABD=currentdb()
set MATAB = MABD.openrecordset "TBL_nopage"
For INDICE = 100 To 300
MATAB.edit
MATAB!NumPage=INDICE
MATAB.update
DoCmd.OpenReport "etat-nom"
Next INDICE
MATAB.close
MABD.close
End Sub

en bas de mon etat j'ai : ="Page : " & [NumPag] & " sur /
300"


Bonne chance
Patrick

-----Message d'origine-----
Re bonjour / bonsoir...;
tu disais :
mais pour le numero en bas de la page, des que
je le met, une fenetre me demande d'entrer le
parametre "indice" il ne semble pas savoir ou prendre
le


numero


déclare une variable public

tu crées un nouveau module que tu nommeras variables
tu tapes simplement

Public INDICE as integer

cette variable sera alors "connue" de tous les objets de
la base

et donc de ton état

Bye
Patrick


"BibiMtl" a écrit dans le message de
news:267d001c38e8a$98a977e0$

Excuse moi 3stone pour la confusion, j'aurais du utiliser
le terme questionaire au lieu de formulaire :) Je veux
imprimer genre 100 fois le meme questionaire de deux page,
mais que chaque questionaie ai un numero different, donc
les deux page de chaque question on le meme numero ex 100,
mais les deux page du second questionnires a le numero 101


Pat j'ai bien fait ce que tu m'as dis, pour le code bravo
ca marche , mais pour le numero en bas de la page, des que
je le met, une fenetre me demande d'entrer le
parametre "indice" il ne semble pas savoir ou prendre le
numero (qui est le but de l'exercise :) )

merci de votre aide...


-----Message d'origine-----
Bonjour

"BibiMtl" a écrit:
Je dois faire un formulaire que je vais imprimer pour
demander l'opinion de tous, mais comme je ne veux pas
qu'un employé puis-ce faire des photocopies du bulletin
de


reponse, j'aimerais inscrire un numero different genre
de


100 à 300 en bas de chaque feuille reponse, comment
puis-


je faire? Merci..

" Pierre..." dit
Au lieu d'un formulaire, imprime plutôt un état...
(beaucoup plus souple)


car, dans l'état tu dispose des fonctions [Page] et
[Pages]


cela te permet donc d'imprimer les pages en mettant
dans le bas de page une zone de texte avec comme
source:




= "Page : " & [Page] & " sur " & [Pages]


Pierre, je pense si j'ai bien compris que "BibiMtl"
souhaite imprimer 200

pages
(100 à 300) du même état "tenant" sur une seule
page....chacune des 200

pages
sera identique avec un numéro différent

peut-être chercher du côté d'une variable "public" INDICE
définie à 100

puis lancer l'état avec un truc du style

" for INDICE = 100 to 300"
" DoCmd.OpenReport "MonEtat"
" next INDICE

et dans ce cas la numérotation = "Page : " & [Page] & "
sur " & [Pages]

sera à remplacer par = "Page : " & [INDICE] & " sur /
300"


Mais j'ai peut-être pas compris la question ? ;-))

Bon courage
Patrick





.




.





Avatar
BibiMtl
Salut Pat je te remerci beaucoup de ton aide, j'ai bien
fait ce que tu m'a dis mais j'avais des messages d'erreur
du code, mais avec un mélange de tout tes conseils j'ai
finalement trouvé la solution :)


J'ai créé:
Une requete de mise à jour : qui met 99 à numpage de la
table TBL_nopage

Une requete de mise a jour : qui ajoute 1 à numpage de la
table TBL_nopage

J'ai ajouter la table et numpage à ma requete principale
de mon état, comme tu me l'avais dis

Une macro qui
-exécute la requete de mise 0
-appel une seconde macro à répéter 200 fois

Une macro qui :
-Exécute la requete d'ajout 1
-impression directe

Dans mon état j'ai m'y en bas comme tu le suggerais mon
champ "numpage"

et voila avec du raboutinage j'ai finalement le résultat
voulu:) merci encore PAT







-----Message d'origine-----
Bonjour,
"BibiMtl" a écrit Meme probleme??
j'ai cree mon module "variables"
Option Compare Database
Option Explicit
Public INDICE As Integer

Et mon bouton print est:
Private Sub Commande0_Click()
For INDICE = 100 To 300
DoCmd.OpenReport "etat-nom"
Next INDICE
End Sub
en bas de mon etat j'ai : ="Page : " & [INDICE] & " sur /
300"



Effectivemen, j'ai testé euh........ oups..........
etc........ marche pas

;-((((
je pense qu'aucune variable type public ne peut être
passée à un état


A la réflection, si j'avais à faire celà, je "biaiserais"
et je créerais une

table temporaire
genre TBL_nopage avec un champ de type entier court par
exemple NumPag


Dans la requete source de l'état, j'ajouterais le champ
NumPag


puis sur le bouton "print" un truc du genre...
Private Sub MONBOUTON_Click()
dim MABD as database
dim MATAB as recordset
set MABD=currentdb()
set MATAB = MABD.openrecordset "TBL_nopage"
For INDICE = 100 To 300
MATAB.edit
MATAB!NumPage=INDICE
MATAB.update
DoCmd.OpenReport "etat-nom"
Next INDICE
MATAB.close
MABD.close
End Sub

en bas de mon etat j'ai : ="Page : " & [NumPag] & " sur /
300"


Bonne chance
Patrick

-----Message d'origine-----
Re bonjour / bonsoir...;
tu disais :
mais pour le numero en bas de la page, des que
je le met, une fenetre me demande d'entrer le
parametre "indice" il ne semble pas savoir ou prendre
le


numero


déclare une variable public

tu crées un nouveau module que tu nommeras variables
tu tapes simplement

Public INDICE as integer

cette variable sera alors "connue" de tous les objets de
la base

et donc de ton état

Bye
Patrick


"BibiMtl" a écrit dans le message
de


news:267d001c38e8a$98a977e0$

Excuse moi 3stone pour la confusion, j'aurais du utiliser
le terme questionaire au lieu de formulaire :) Je veux
imprimer genre 100 fois le meme questionaire de deux
page,


mais que chaque questionaie ai un numero different, donc
les deux page de chaque question on le meme numero ex
100,


mais les deux page du second questionnires a le numero
101




Pat j'ai bien fait ce que tu m'as dis, pour le code bravo
ca marche , mais pour le numero en bas de la page, des
que


je le met, une fenetre me demande d'entrer le
parametre "indice" il ne semble pas savoir ou prendre
le


numero (qui est le but de l'exercise :) )

merci de votre aide...


-----Message d'origine-----
Bonjour

"BibiMtl" a écrit:
Je dois faire un formulaire que je vais imprimer pour
demander l'opinion de tous, mais comme je ne veux pas
qu'un employé puis-ce faire des photocopies du
bulletin




de
reponse, j'aimerais inscrire un numero different genre
de


100 à 300 en bas de chaque feuille reponse, comment
puis-


je faire? Merci..

" Pierre..." dit
Au lieu d'un formulaire, imprime plutôt un état...
(beaucoup plus souple)


car, dans l'état tu dispose des fonctions [Page] et
[Pages]


cela te permet donc d'imprimer les pages en mettant
dans le bas de page une zone de texte avec comme
source:




= "Page : " & [Page] & " sur " & [Pages]


Pierre, je pense si j'ai bien compris que "BibiMtl"
souhaite imprimer 200

pages
(100 à 300) du même état "tenant" sur une seule
page....chacune des 200

pages
sera identique avec un numéro différent

peut-être chercher du côté d'une variable "public"
INDICE



définie à 100
puis lancer l'état avec un truc du style

" for INDICE = 100 to 300"
" DoCmd.OpenReport "MonEtat"
" next INDICE

et dans ce cas la numérotation = "Page : " & [Page] & "
sur " & [Pages]

sera à remplacer par = "Page : " & [INDICE] & " sur /
300"


Mais j'ai peut-être pas compris la question ? ;-))

Bon courage
Patrick





.




.




.






Avatar
pat
"BibiMtl" a écrit dans le message de
news:019c01c38f5c$f7e85eb0$
Salut Pat je te remerci beaucoup de ton aide, j'ai bien
fait ce que tu m'a dis ......


de rien, c'est la philosophie des newsgroup

@+ sur le net