OVH Cloud OVH Cloud

numéro du rang d'une feuille, pour pouvoir l'imprimer, elle ou les autres..

2 réponses
Avatar
Alfred WALLACE
Bonjour (re ;-))

j'ai une feuille "caneva".

je duplique cette feuille comme =E7=E0 :
Sheets("caneva").Copy After:=3DSheets(Sheets.Count)
dans une boucle, laquelle peut donc tourn=E9er N fois.

sur chaque nouvelle feuille (une copie donc du caneva) j'ai DEUX
BOUTONS :

"imprimer cette fiche" puis dessous "imprimer TOUTES les fiches"

Pour imprimer cette fiche, tout va bien.
Par contre, pour imprimer TOUTES les fiches, je me demande comment
faire
une boucle qui va parcourir uniquement les nouvelles feuilles sans
prendre
en compte la feuille caneva (ni d'ailleurs les autres feuilles)...

J'aimerai pouvoir faire

For x =3D sheets("caneva")+1 to Sheets(Sheets.Count)
Sheets(x).Select
macro-qui imprime
next x

Enfin, un "truc" qui me permete de balayer uniquement les feuilles
nouvellement
cr=E9er, dans une boucle pour les imprimer ?

Merci pour votre aide.

Jos=E9

2 réponses

Avatar
Youky
For x = 2 to Sheets.Count
Sheets(x).Select
macro-qui imprime
next x
ou encore
For x=1 to Sheets.Count
If Sheets(x).Name="caneva" then goto saute
If Sheets(x).Name="celle tu veux pas" then goto saute
Sheets(x).Select
macro-qui imprime
saute:
Next

Youky
Avatar
Alfred WALLACE
Oui, merci, effectivement, car, de toute façon, les feuilles
que je ne veux pas ont des noms connus ("caneva", "page initiale"
etc....)

Merci
José