Pagination automatique d'un document Excel

[SYLVIE G]

J'ai créé un document Excel comprenant plusieurs onglets paginés. Tous ces documents sont répertoriés dans un Sommaire sur lequel j'ai créé une colonne indiquant le n° des pages de chaque onglet.
Lorqu'un onglet d'1 page devient 2 pages ou + ou si j'insère une nouvelle page, toute la numérotation se trouve modifiée. Je voudrais alors que cette modification s'effectue en même temps dans la colonne de mon sommaire.

Merci de vos réponses😛

 

[Banzai64]

Re : Pagination automatique d'un document Excel

bonjour

Essayes ceci

Procédure événementielle à placer dans le code de la feuille (Sommaire)

Private Sub Worksheet_Activate()
Dim Ws As Worksheet
Dim Col As Integer
Dim Lig As Integer

Lig = 5
Col = 2

  For Each Ws In ThisWorkbook.Worksheets
     Cells(Lig, Col) = Ws.Name
     Lig = Lig + 1
  Next Ws
End Sub