Discussion :

[ze_Mirouf]

Bonjour,

Etant novice en VBA Word je fais appel a vous pour trouver une solution à mon problème qui est que je dois mettre au format paysage la partie d'un document Word qui se situe après son sommaire. J'ai fait plein de tentatives pour sélectionner le contenu du document qui se situe après le sommaire et ensuite joué avec le PageSetup mais rien n'y fait et j'ai souvent l'erreur suivante "Valeur en dehors des limites"

Merci d'avance

[Heureux-oli]

Salut,

Un petit tour dans la FAQ

http://word.developpez.com/faq/index...age_differente

[ze_Mirouf]

Bonjour,

J'ai fait des recherches dans la FAQ et je n'arrive toujours pas a résoudre mon problème. J'ai pourtant bien 2 sections qui entourent la partie de mon document à mettre en page...

Par contre, plus inquiétant le simple fait de mettre ce code : (trouvé dans la FAQ)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
With ActiveDocument.PageSetup
        .Orientation = wdOrientLandscape
        .FirstPageTray = wdPrinterDefaultBin
        .OtherPagesTray = wdPrinterDefaultBin
        .SectionStart = wdSectionNewPage
        .OddAndEvenPagesHeaderFooter = True
        .DifferentFirstPageHeaderFooter = True
        .VerticalAlignment = wdAlignVerticalTop
        .SuppressEndnotes = False
        .MirrorMargins = True
End With

me crée l'erreur dont je parlais "Valeur en dehors des limites", je n'ai vraiment plus d'idées .

Merci d'avance pour vos réponses

[Heureux-oli]

Salut,

La mise en page s'applique soit à tout le document, comme tu le fais dans ton code, ou alors, à une section.

Code :

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

1
2
3
4
Sub miseEnPage()
ActiveDocument.Sections(2).PageSetup.Orientation = wdOrientLandscape
 
End Sub

Avec ActiveDocument, tu sélectionnes tout le document.
Pour ne traiter qu'une ou plusieurs sections, il faut le préciser.

[ze_Mirouf]

Merci pour le premier élément de réponse.

J'ai testé le code mais rien n'y fait. J'ai 3 sections dans mon document. Je manipule le PageSetup de ma deuxième section et je m'attends a ce que la partie du document compris entre la 2 ème et le 3 ème section soit en paysage mais rien ne se passe.

[Heureux-oli]

Salut,

Surprenant, j'ai testé le code avant de le poster et il fonctionne bien chez moi.

Peux tu mettre un exemple de document qui me permette de déterminer pourquoi ça ne fonctionne pas.

[ze_Mirouf]

Désolé, j'ai trouvé mon erreur. Ton code marche bien , je confondais simplement les sauts de sections avec les sections elles-mêmes et donc l'indice que je passais aux tableaux de sections était mauvais.

Mea culpa