Microsoft 365 Sélectionner feuille le nom se trouvant dans une liste déroulante

[Chasse]

Bonsoir le Forum
Que me manque-t-il a ce code pour qu'il me sélectionne la feuille demandée

Sub Sel()
Dim Sh As Worksheets
Dim av As Range
Set av = Range("epreuve") 'Liste déroulante nommée Epreuve
Set Sh = Sheets(av)
Sh.Select
End Sub

Merci de votre aide et bonne soirée

 

[job75]

Bonsoir Chasse,

"Epreuve" doit être le nom donné à la cellule qui contient la liste de validation.

Si c'est bien le cas utilisez :

Sub Sel()
Dim Sh As Worksheet
Dim av As Range
On Error Resume Next 'si la feuille n'est pas trouvée
Set av = Range("Epreuve") 'cellule nommée Epreuve contenant la liste de validation
Set Sh = Sheets(CStr(av))
Sh.Select
End Sub

A+

 

[Chasse]

Bonsoir job75

"Epreuve" doit être le nom donné à la cellule qui contient la liste de validation.

Oui c'est bien le nom.
ça va mieux avec la fonction CStr
Encore merci
Cordialement

 

[job75]

ça va mieux avec la fonction CStr

Oui et ça va mieux aussi en déclarant Sh As Worksheet sans "s".