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

Chasse · 24 Mars 2021

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

VB:

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 · 24 Mars 2021

Bonsoir Chasse,

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

Si c'est bien le cas utilisez :

Code:

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 · 24 Mars 2021

Bonsoir job75

job75 à dit:
"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 · 24 Mars 2021

Chasse à dit:
ça va mieux avec la fonction CStr

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

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

Chasse

XLDnaute Occasionnel

job75

XLDnaute Barbatruc

Chasse

XLDnaute Occasionnel

job75

XLDnaute Barbatruc

Discussions similaires