Boucle dans une macro word

causek -  
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,

1 réponse

  • Votes
  • Date
  • Date décroissante
  1. m@rina Modérateur
    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
    1. 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,
    2. m@rina Modérateur
      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 ?

Discussions similaires

Symbole Attention dans Word
Nortec59

33 réponses