Tengo la forma de buscar los nombres de las hojas y mostrarlas en un ComboBox Private Sub ComboBox1_Enter() On Error Resume Next Aplication.ScreenUpdating = False ComboBox1.Clear For h = 6 To 35 ComboBox1.AddItem Sheets(h).Name Next h End Sub Que al...