Nombre de page

Bonjour et merci d'avance pour votre aide

Je souhaite savoir est ce que y a une possibilité d'afficher dans une cellule le nombre de page (Onglets) quand on sélectionne par exemple 4 ou 5 page (Onglets), sans Macro si c'est possible.

Merci

slt,

je pense que ce n'est possible qu'avec une macro.

Dim i As Integer
i = Application.ActiveWindow.SelectedSheets.Count

Bonjour

Merci pour l'aide, mais ça ne marche pas,

pouvez vous me faire un exemple

Merci d'avance pour votre précieuse aide

slt,

si j'ai bien compris tu veux l'utiliser comme fonction.

Insere ce code dans un module

Function CountSelectedSh() As Integer
CountSelectedSh = Application.ActiveWindow.selectedsheets.Count
End Function

Et aprés tu fais appel à ta fonction en insérant ce code dans n'importe qu'elle cellule:

CountSelectedSh()