activer une feuille avec un combobox

pascal21 · 18 Avril 2008

bonsoir
je suis à la recherche du code qui permet, avec une zone de liste modifiable, d'activer une feuille du classeur
j'ai fais une liste des onglets que j'ai mis dans la combobox
j'ai essayé avec

Code:

sheets. activate = combobx1.value

mais ça marche pô
quelle est la solution
merci

RENAUDER · 18 Avril 2008

Re : activer une feuille avec un combobox

Bonjour,

Code:

Private Sub UserForm_Initialize()
    For Each c In ActiveWorkbook.Sheets
        ComboBox1.AddItem c.Name
    Next
End Sub
Private Sub CommandButton1_Click()
    Sheets(Me.ComboBox1.List(Me.ComboBox1.ListIndex)).Activate
End Sub

pascal21 · 18 Avril 2008

Re : activer une feuille avec un combobox

bonsoir renauder
je ne l'avais pas préciser mais ma combobox est sur une feuille et pas dans un userform
c'est pour cela que je l'ai appelé "zone de liste modifiable" c'est celle que l'on trouve dans la barre d'outils
je n'ai besoin que du code permettant d'activer la feuille voulue
edit: ok c'est bon je n'avais pas lu parfaitement se que tu proposais
c'est bien ce que je cherchais merci bonne soirée

activer une feuille avec un combobox

pascal21

XLDnaute Barbatruc

RENAUDER

Nous a quitté

pascal21

XLDnaute Barbatruc

Discussions similaires