Modifier une combobox et la placer sur plusieurs feuilles du même fichier
souverain62
Messages postés
1
Date d'inscription
Statut
Membre
Dernière intervention
-
Le Pingou Messages postés 12249 Date d'inscription Statut Contributeur Dernière intervention -
Le Pingou Messages postés 12249 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour à Tous,
Autodidacte débutant sur Excel 365 et VBA, j'ai trouvé sur le forum un petit fichier qui me conviendrait si je savais :
- Modifier l'aspect et les dimensions de la combobox ainsi que son aspect
- La placer de façon indentique sur toutes les feuilles de mon fichier
Quelqu'un peut-il m'aider ?
Merci par avance
Voici le code VBA :
Option Explicit
Private Sub ComboBox1_DropButtonClick()
Dim F As Worksheet
ComboBox1.Clear
For Each F In ThisWorkbook.Worksheets
ComboBox1.AddItem F.Name
Next F
End Sub
Private Sub ComboBox1_Click()
Dim Feuille As String
On Error Resume Next
Feuille = ComboBox1.Value
Sheets(Feuille).Activate
ActiveSheet.Range("A1").Select
End Sub
Autodidacte débutant sur Excel 365 et VBA, j'ai trouvé sur le forum un petit fichier qui me conviendrait si je savais :
- Modifier l'aspect et les dimensions de la combobox ainsi que son aspect
- La placer de façon indentique sur toutes les feuilles de mon fichier
Quelqu'un peut-il m'aider ?
Merci par avance
Voici le code VBA :
Option Explicit
Private Sub ComboBox1_DropButtonClick()
Dim F As Worksheet
ComboBox1.Clear
For Each F In ThisWorkbook.Worksheets
ComboBox1.AddItem F.Name
Next F
End Sub
Private Sub ComboBox1_Click()
Dim Feuille As String
On Error Resume Next
Feuille = ComboBox1.Value
Sheets(Feuille).Activate
ActiveSheet.Range("A1").Select
End Sub
A voir également:
- Modifier une combobox et la placer sur plusieurs feuilles du même fichier
- Fichier bin - Guide
- Comment réduire la taille d'un fichier - Guide
- Modifier dns - Guide
- Fichier epub - Guide
- Fichier rar - Guide