Comment activer une feuille de classeur à partir d'une combobox
Résolu/Fermé
Cluses74
Messages postés
240
Date d'inscription
dimanche 4 janvier 2015
Statut
Membre
Dernière intervention
22 août 2023
-
5 déc. 2018 à 17:00
Cluses74 Messages postés 240 Date d'inscription dimanche 4 janvier 2015 Statut Membre Dernière intervention 22 août 2023 - 8 déc. 2018 à 22:40
Cluses74 Messages postés 240 Date d'inscription dimanche 4 janvier 2015 Statut Membre Dernière intervention 22 août 2023 - 8 déc. 2018 à 22:40
A voir également:
- Vba activer une feuille d'un classeur
- Comment activer windows 10 - Guide
- Activer chromecast - Guide
- Feuille de score belote excel - Forum Excel
- Comment supprimer une feuille sur word - Guide
- Feuille de pointage excel - Télécharger - Tableur
3 réponses
cs_Le Pivert
Messages postés
7904
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 août 2024
729
Modifié le 6 déc. 2018 à 11:49
Modifié le 6 déc. 2018 à 11:49
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:
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
6 déc. 2018 à 12:15
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
6 déc. 2018 à 19:05
Ai je fait une mauvaise manip je ne comprends pas. Je recherche pourquoi ce message mais pas de chance
Merci