Boîte de dialogue Résolu

Question

Bonjour,

Je suis débutant programmer des macros sous Excel. Je cherche donc à programmer une boîte de dialogue me permettant de naviguer entre différentes feuilles, sans passer par une liste déroulante.
C'est urgent car je ne peux  pas continuer sans cette partie.

Merci à vous

lermite222 · Answer

Bonjour,
Dans un UF tu met un Combobox
et dans sa feuille de code tu colle
Private Sub ComboBox1_Change()
    Sheets(ComboBox1.Text).Select
End Sub

Private Sub UserForm_Initialize()
Dim Wo As Worksheet
    For Each Wo In Worksheets
        ComboBox1.AddItem Wo.Name
    Next Wo
End Sub
A+

Benwoit9 · Answer

OK, merci de l'aide.

j'essaie tout de suite.

Je tiendrai au courant de l'évolution.

Benwoit9 · Answer

Ok, c'est bon. Je te remercie.

Sinon, est-ce que tu sais comment faire pour ça s'affiche dès l'ouverture du fichier?

lermite222 · Answer

Dans la feuille de ThisWorkBook
Private Sub Workbook_Open()
    'le 0 pour que tu puisse aller dans les feuilles sélectionnées
    Userforme1.Show 0
End Sub
A+

Benwoit9 · Answer

merci beaucoup pour ton aide.
Un de ces jours.

Boîte de dialogue

5 réponses

Discussions similaires

Newsletters