Bonjour,
Un test après sélection de la feuille via le USF. Vous ne nous donnez cependant pas beaucoup d'informations sur le mode d'activation, bouton sur le USF, changement dans la sélection. autre ?
Private Sub ComboBox1_Change()
Worksheets(Me.ComboBox1.Value).Activate
End Sub
Private Sub UserForm_Initialize()
Dim i%
For i = 1 To Worksheets.Count
Me.ComboBox1.AddItem Worksheets(i).Name
Next
End Sub
Cdlt,