Discussion :

[Zanor84]

Bonjour,

Je vous expose mon problème.

Chaque mois j'imprime 31 (ou 30) feuilles correspondant chacune à un jour du mois avec à côté le numéro de la semaine correspondante.
Je n'ai pas trouvé un autre système que de faire les impressions une par une .
Je m'en remet donc à vous, je souhaiterais ( dans le meilleur des mondes ) lancer une impression et qu'il imprime 31 feuilles avec la date incrémenté et le numéro de la semaine .... et si possible même imprimer toute l'année d'un coup.

Une piste ?

Cordialement,

[Sepia]

Salut Zanor84

Dans ton document Word, tu ajoutes un champ SEQ avec une numérotation numérique (\* ARABIC), un par tableau et un saut de page devant et tu en fais autant que tu veux. N'oublie de cocher les options "Mettre à jour les champs avant impression" dans "Options > Affichage > Options d'impression" et "Mise à jour des liaisons à l'ouverture" dans "Options > Affichage > Options avancées > Général".

@+

[Zanor84]

Bonjour,

Si j'ai bien compris, cette manip ne peut pas afficher la date sous forme, "Mardi 1 octobre 2013" ?

ou alors j'y suis pas arrivé ^^

[Sepia]

Salut Zanor84,

Chaque mois j'imprime 31 (ou 30) feuilles correspondant chacune à un jour du mois avec à côté le numéro de la semaine correspondante.
Je n'ai pas trouvé un autre système que de faire les impressions une par une

J'ai compris que tu voulais juste un n° qui s'incrément mais il semble que tu veuilles une date qui s'incrémente, ce qui est beaucoup plus compliqué. Je viens de retrouver un truc comme ça que j'avais fait il y a très longtemps pour un client qui voulait imprimer un formulaire d'inspection (2 pages A4) avec la date du jour qui s'incrémente par page (en fait toutes les 2 pages) que j'avais gardé car j'en avais bavé.

Je te conseille de lire le tuto de Heureux-Oli sur les champs dans Word. Après prends un peu d'aspirine car tu risque le mal de tête et un peu de nautamine car tu risque une indigestion. ==> voila ce que ça donne (en gros car il y a quelques approximations admises couramment mais l'année fait 365 1/4 car le client était assez pointilleux, le calendrier est le calendrier grégorien post an 2000), bon comme c'était il y a quelques années, il y a des valeurs que je ne sais plus réexpliquer.

PS1: Comme c'est fastidieux d'insérer les codes des champs de Word par <Ctrl>+<F9>, je te mets directement un Word comme ça tu pourras faire du Copier/Coller + l'image des champs en code car parfois lorsque c'est trop compliqué, lorsque tu as fait une mise à jour des champs imbriqués, tu ne peux plus les basculer en mode code.
Dans le Word, le premier champ va te servir à comprendre (), les 2 suivants sont pour que tu vois le résultat, il y a un paragraphe avec saut de page avant entre les 2 pour simuler ton cas.

PS2: Le jour est en chiffre sur un digit mais il te suffit de tester la valeur < 10 pour ajouter si besoin un "0" (si tu en as besoin c'est faisable).

PS3: La date est en chiffres car il faut faire des calculs assez difficiles mais après 2 tubes d'aspirines, je sens que tu sauras la faire en lettres voire la traduire .

@+

[Zanor84]

Merci beaucoup de ton temps ! je vais essayer de me demerder avec ca ! merci beaucoup

[Sepia]

Salut Zanor84,

Heureux que ça puisses te servir. Tu peux copier les liens directement mais il y a des fois l'affichage des champs imbriqués ne fonctionnent pas toujours simplement.

@+

[Heureux-oli]

Salut,

Une autre piste est de le faire en VBA, on travaille sur la date et la semaine pour tout envoyer dans un document que l'on imprime.


Une fonction de ce style :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub ListerDate()
Dim maDate As Date
Dim endDate As Date
 
maDate = DateSerial(Year(Date), 1, 1)
endDate = DateSerial(Year(Date) + 1, 1, 1)
 
Do While maDate < endDate
Debug.Print Format(maDate, "dddd dd mmmm yyyy") & "- Semaine " & Format(maDate, "ww")
 
maDate = maDate + 1
Loop
 
 
End Sub

[GeoffM37]

Bonjour à toutes et à tous,

J'ai parcouru le web pour avoir une réponse soit je ne comprenais pas soit ça ne s'appliqué pas :/

Alors j'ai décidé de vous écrire

Je souhaite incrémenter un numero à chaque impression par exemple : 2015-0001, 2015-0002, .... . Pour info je n'y connais rien à la macro.
Et que à chaque fois que l'on rouvre le doc, ça reparte du dernier numéro imprimé

pouvez vous m'aider ?

Merci

[Heureux-oli]

Salut,

Bonjour à toutes et à tous,

J'ai parcouru le web pour avoir une réponse soit je ne comprenais pas soit ça ne s'appliqué pas :/

Alors j'ai décidé de vous écrire

Je souhaite incrémenter un numero à chaque impression par exemple : 2015-0001, 2015-0002, .... . Pour info je n'y connais rien à la macro.
Et que à chaque fois que l'on rouvre le doc, ça reparte du dernier numéro imprimé

pouvez vous m'aider ?

Merci

Sans code, pas moyen.
Donc, tu dois écrire une ou plusieurs macros.

[GeoffM37]

Il y aurait une ame charitable pour me faire cela ?