Utiliser combobox plutot que liste deroulante

Bonjour à tous

Je cherche à remplacer le code de la macro ci dessous qui permet d'aller sur une feuille selon la valeur choisit dans une liste déroulante, par la même valeur choist dans une combobox

Sub CHOIXFEUILLE()

Sheets(Range("C3").Value).Select
End Sub

j'ai essayé

Sub CHOIXFEUILLE()
Sheets(ComboBox1.Value).Select
end sub

mais cela ne fonctionne pas.

Bonjour

Un essai à tester. Te convent-iul ?

Bye !

Bonsoir …

Autre proposition, avec seulement *, dans la fenêtre des codes contenant la liste (Ici pour ne pas la nommer)

Private Sub ComboBox1_GotFocus()
  ComboBox1.List = Array("NORD", "SUD")
End Sub

Private Sub ComboBox1_Change()
  Application.Goto Sheets(ComboBox1.Text).[A1]
End Sub

Bien entendu, on peut adapter avec un nombre d'onglets plus important.

* oups, dans le fichier joint j’ai rajouté des liens en [A1] pour le retour après l’aller.