Comment activer une feuille de classeur à partir d'une combobox

Résolu
Cluses74 Messages postés 240 Date d'inscription   Statut Membre Dernière intervention   -  
Cluses74 Messages postés 240 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je possède un classeur de 15 feuilles qui représentent mes références et j'aimerai savoir quel code je dois mettre pour activer la feuille sélectionnée dans ma liste déroulante combobox. Je possède Excel 2010 . Je n'arrive pas à trouver ce problème sur le forum.
Cordialement


Configuration: Windows / Internet Explorer 11.0
A voir également:

3 réponses

cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

Une autre manière de procéder au changement de sélection dans la ComboBox.

Il faut que les valeurs liées aux TextBox soient dans les même cellules de chaque feuille:

Option Explicit
Private Sub ComboBox1_Change()
Sheets(ComboBox1.Value).Activate
TextBox1.Text = ActiveSheet.Range("A1").Value 'on affiche les valeurs
TextBox2.Text = ActiveSheet.Range("A2").Value 'on affiche les valeurs
End Sub
Private Sub UserForm_Initialize()
Dim f As Worksheet
For Each f In ThisWorkbook.Worksheets
ComboBox1.AddItem (f.Name) 'on rempli la ComboBox
Next f
ComboBox1.ListIndex = 0 'on affiche le 1er index de la ComboBox
End Sub


1
Cluses74 Messages postés 240 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,
Il n'y a pas de problème car toutes les feuilles de mon classeur sont identiques. Je fais l'essai et te confirme.
Encore merci cela fait au moins une semaine que je cherche une solution
0
Cluses74 Messages postés 240 Date d'inscription   Statut Membre Dernière intervention  
 
Jai copie ce code et maintenant j'ai le message Erreur d'exécution '70' . Accès refusé
Ai je fait une mauvaise manip je ne comprends pas. Je recherche pourquoi ce message mais pas de chance
Merci
0