Discussion :

[benoue]

Bonjour à tous,

J'ai un classeur excel à partir duquel je crèe des fichiers stockés dans un endroit précis.

J'aimerais pouvori créer une macro qui imprimera automatiquement tous les fichiers créés (ou certains si c'est plus facile) sans que l'utilisateur n'ait à aller faire les mises en page lui-même.

Certains documents sont dans un répertoire du type << \suivi\>> et les autres dans le répertoire courant.

Certains fichiers seront imprimés sur du format A4 en paysage et les autres sont imprimés normalement, sur du papier A4 (en mode portrait ou paysage).

Pouvez-vous m'aider SVP ? Je suis débutant en VBA. J'ai vu que les fonctions PageSetup, PrintArea et PrintOut pouvaient par exemple m'aider. Mais je n'arrive pas à trouver comment.

Merci d'avance

[ouskel'n'or]

Enregistre une macro en faisant "Aperçu" avant impression, tu auras tout le code. Un extrait qui permet d'imprimer en A4, paysage, centré horizontalement et verticalement

Code :

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

1
2
3
4
5
6
7
8
9
10
    With ActiveSheet.PageSetup
        .PrintQuality = 300
        .CenterHorizontally = True
        .CenterVertically = True
        .Orientation = xlLandscape
        .Draft = False
        .PaperSize = xlPaperA4
        .FirstPageNumber = xlAutomatic
        .Order = xlDownThenOver
    End With

Regarde les propriétés de PageSetup dans l'aide

A+
Edit
Tu ne dis pas si c'est word ou excel. Précise stp

[benoue]

Bonjoour, la macro est sous Excel.

Mais je voudrais aussi lancer l'impression d'autres documents qui n'ont rien à voir avec Excel, des documents word ou powerpoint qui sont dans des répertoires quelconques.

MErci

[ouskel'n'or]

Si c'est sous office, essaie en enregistrant les macros, tu iras aussi vite que nous...
Si après tu as des difficultés, tu dis

A+