Discussion :

[eddy959]

Bonjour à Tous

je vous explique mon souci:

ma base: une feuille "planning";
de cette feuille en découle toute une série de feuilles nommées "Jour xx";
Jour étant fixe et xx variable
Ce nom apparait aussi dans la cellule A5 de toutes ces feuilles
Il peut y avoir plus de 200 onglets avec ce nom (quantité non défini à l'avance)

Mon besoin:
pour le macro 1 (idem macro 2):
sélectionner tous les onglets portant le nom "Jour "
sélectionner la zone A1 à E7, la définir en zone d'impression ou en zone à imprimer
indiquer en pied de page centrer "une référence fixe"
Centrer horizontalement et verticalement
ajuster à 1/1 page
et enfin me positionner sur le sélecteur d'imprimante

Pour le macro 2:
même demande que macro 1 sauf au niveau de la zone d'impression et pied de page


Mon problème principal étant la sélection de tous les onglets comportant le mot "JOUR" pour le reste j'arrive a bidouiller

Merci à vous

[Philippe Tulliez]

Bonjour,

Mon problème principal étant la sélection de tous les onglets comportant le mot "JOUR" pour le reste j'arrive a bidouiller

Une idée comme une autre.
A l'aide d'une boucle (For To Next ou For Each In Next), tu parcoures toutes les feuilles du classeur en cherchant la chaîne de caractères Jour et ce à l'aide de la méthode Find.
Si le mot est trouvé, tu places le n° de la feuille ou sont nom dans une variable dimensionnée que tu redimensionnes à chaque nouvelle feuille ayant un résultat positif.
Une fois la boucle terminée, tu connais grâce à la fonction Ubound le nombre de feuille ayant au moins une fois le mot Jour.
Il te reste à effectuer la procédure sur ces feuilles.

[eddy959]

Merci de ta réponse Philippe,
mais là tu me parle javanais...
J'arrive à bidouiller quelques petits trucs mais je suis un réel novice en Vba.

sinon, pour l’hypothèse de trouver le mot jour dans la feuille, c'est impossible car celui ci apparait dans les 2 tableaux qui doivent être imprimé

http://cjoint.com/?0JtpdglJGTN