Boucle dans une macro word

causek -  
m@rina Messages postés 23882 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

J'ai un problème pour boucler de la page courante à la dernière page pour modifier le header en le mettant en 'Link to previous'.

Merci d'avance pour votre aide précieuse,


A voir également:

1 réponse

m@rina Messages postés 23882 Date d'inscription   Statut Contributeur Dernière intervention   11 464
 
Bonjour,

Et si tu nous disais exactement ce que tu veux faire ? et nous donner le code que tu as écrit par la même occasion...

m@rina
0
causek
 
Bonjour,

Voici le bout de code:
(Suis en Word 2010)

Sub Macro3()
'
' Macro3 Macro
'
'
Pagnr = Selection.Information(wdActiveEndPageNumber)
TotPages = Selection.Information(wdNumberOfPagesInDocument)
Do While Pagnr <= lastpage
If ActiveWindow.View.SplitSpecial <> wdPaneNone Then
ActiveWindow.Panes(2).Close
End If
If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _
ActivePane.View.Type = wdOutlineView Then
ActiveWindow.ActivePane.View.Type = wdPrintView
End If
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Selection.HeaderFooter.LinkToPrevious = Not Selection.HeaderFooter. _
LinkToPrevious
ActiveWindow.ActivePane.View.NextHeaderFooter
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
Loop
End Sub

Vous remerciant,
0
m@rina Messages postés 23882 Date d'inscription   Statut Contributeur Dernière intervention   11 464
 
Et tu veux faire quoi très exactement ?
Parce que déjà les en-têtes fonctionnent par section et non pas par page.
Peux tu être plus précis sur la finalité de la macro ?
0