VBA

[Nath]

Bonjour à tous

Est-il possible via un combobox dans une feuille excel, en sélectionant une des valeurs figurant dans la liste, d'affecter un code qui permette de sélectionner une cellule ou une feuille.

Par exemple dans ma liste du combox box j'ai des valeurs de 1 à 1O, et si je clixk sur 5, la feuille 5 est sélectionnée.

Merci d'avance à tous ceux qui me dépanneront.

Bonne Journée

 

[porcinet82]

Salut Nath,

Cette question ayant été posée de nombreuses fois dans le forum, je te propose quelques liens ou tu devrais trouver quelques idées:

Lien supprimé

Lien supprimé

Si cela ne te convient pas, refais signe.

@+

 

[Nath]

Merci

 

[_Thierry]

Bonjour Nath, le Forum

Ne sachant pas comment tu incrémentes tes numéro au sein de ta ComboBox, voici une proposition 'Intégrale'...

Option Explicit


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i As Byte
    For i = 1 To ThisWorkbook.Worksheets.Count
        Me.ComboBox1.AddItem i
    Next
End Sub


Private Sub ComboBox1_Change()
    ThisWorkbook.Worksheets(CInt(Me.ComboBox1.Value)).Activate
End Sub

NB Fonctionnera en plaçant ce code dans le Private Module de la Feuille où se trouve la ComboBox de la Barre à Outils 'Contrôles'.

Bon Appétit
[ol]@+Thierry[/ol]

 

[Nath]

Merci beaucoup