Saludos Profesor Sergio, de ante mano gracias por responder, realice lo que me sugirió coloque el código donde me indicó, sin embargo me sigue arrojando el mismo error.
' Restaurar formato de fuente
With wsHistorico.Rows("2:2").Font
.ColorIndex = xlAutomatic
.TintAndShade = 0
End With
' Incrementar automáticamente el número de recibo
wsRecibo.Range("J2").Value = wsRecibo.Range("J2").Value + 1
'Corrección de Error en impresión
Application.Wait (Now + TimeValue("0:00:01"))
' Imprimir
wsRecibo.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
Por
dorgelis, · publicado
Hola a todos;
En un formulario cargo manualmente los datos de en el ListBox.
Tengo un botón que me sirve para añadir registros a este ListBox
Los registros son fechas.
Entonces la pregunta es, ¿si yo añado un nuevo registro hay posibilidad de que se ordenen los items por fecha?
Imagino que me la solución que me vais a dar pasará por pasar los datos a la hoja y ordenarlos desde ahí.
Esta opción para el caso no me serviría.
Buenos días a todos.
MOrdenarList.xlsm
Editado el por Benito Bartolomé
SE AÑADE IMAGEN