Discussion :

[cannelle1*]

Bonjour à tours,

j'ai un fichier sous excel avec plusieur onglet, et je dois faire apparâitre le nombre d'onglet total dans une cellule sous cette forme : numéro de l'onglet / nombre de l'onglet total comme un nombre de page (ex : 1/10).
cette élément doit se mettre à jour à chaque ajout d'onglet supplémentaire de façon instantannée (sans cliquer dessus).
et j'ai une macro qui ajoute un onglet supplémentaire mais ne me le met pas à la fin du classeur.
Merci pour votre aide
a+
Cannelle1*

[jfontaine]

Bonjour,

Tu peux utiliser l'evenement Workbook_SheetActivate de ton classeur

Code :

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

1
2
3
4
5
6
7
 
Private Sub Workbook_SheetActivate(ByVal sh As Object)
 
sh.Range("A2").NumberFormat = "@"
sh.Range("A2").Value = sh.Index & "/" & ThisWorkbook.Sheets.Count
 
End Sub

[jfontaine]

Suite a ta question envoyé en MP

Bonjour,
la paginagation des onglets marche merci beaucoup pour votre aide, par contre est il possible de commencer la pagination à partir de l'onglet 2. cad ne prend pas en compte la page 1 dans le comptage.
merci d'avance et à bientôt
cannelle 1*

CA devrait repondre a ton besoin

Code :

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

1
2
3
4
5
6
Private Sub Workbook_SheetActivate(ByVal sh As Object)
 
sh.Range("A2").NumberFormat = "@"
sh.Range("A2").Value = sh.Index & "/" & ThisWorkbook.Sheets.Count -1
 
End Sub