Por favor aquien me pueda ayudar le agradezco enormemente .
Tengo el siguiente codigo para cargar los nombres de ciertas hojas de un libro en un listbox, lo que requiero hacer es que me carguen en orden alfabetico.
Private Sub UserForm_Initialize()
ListBox1.Clear
Me.ListBox1.ListStyle = fmListStyleOption
For x = 5 To Sheets.Count
ListBox1.AddItem Sheets(x).Name
Next
End Sub
Mil gracias.
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Cordial saludo.
Por favor aquien me pueda ayudar le agradezco enormemente .
Tengo el siguiente codigo para cargar los nombres de ciertas hojas de un libro en un listbox, lo que requiero hacer es que me carguen en orden alfabetico.
Private Sub UserForm_Initialize()
ListBox1.Clear
Me.ListBox1.ListStyle = fmListStyleOption
For x = 5 To Sheets.Count
ListBox1.AddItem Sheets(x).Name
Next
End Sub
Mil gracias.