Appel d'une feuille par un numéro

[Michel]

Bonjour à tous le forum,
Je voudrais savoir, si possible, que lorsque je rentre un numéro dans une celulle il m'affiche la feuille correspondante au numéro. Exemple : je rentre 1 et ça m'affiche la feuille 2
D'avance je vous remercie
@ plus
Michel

 

[Eric C]

Bonjour le forum
Bonjour Michel

Un début de piste à développer

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("A1") = 1 Then
Sheets("Feuil2").Select
End If
End Sub

@ ++ Eric C

 

[Michel]

Bonjour Eric C,
Ok pour la formule, mais dans mon classeur j'ai 40 feuilles, si je fais 1 ça m'envoie à la feuille 01, si je fais 2 la feuille 02 etc
Merci pour ta réponse rapide
@ plus
Michel

 

[EricS]

Bonjour

essaie

Dim num As String

num = Str(Range("a1"))
num = Right(num, Len(num) - 1)
If Len(num) < 2 Then num = "0" & num

Sheets("feuil" & num).Select

A+
Eric

 

[Hervé]

Bonjour

Une autre proposition si les feuilles sont ordonnées et non déplacées:

Sheets(Range("a1")).Select

salut
Hervé

 

[Michel]

Bonsoir à tous,
Je vous remercie tous les trois de vos réponses rapides, les trois solutions marche impeccable.
Encore merci et @ plus
Michel