Hola Gerard:
Al tiempo de felicitarte por tu MessengerSoloCodigo, que te ha quitado, seguro, horas de sueño y de diversión, paso a exponerte cómo resolvería yo tu cuestión:
Genera DOS ListBox iguales y SUPERPUESTOS, uno con los datos ordenados alfabéticamente y el otro por fechas.
Inicalizas con
CmdAlf_Click
Y los CommandButton llevarán
Private Sub CmdAlf()
List1.Visible = True
List2.Visible = False
End Sub
Private Sub CmdFec()
List1.Visible = False
List2.Visible = True
End Sub
Luego podrás mejorarlo haciendo que el puntero se sitúe en cada listBox donde te interese (por ejemplo con una variable que vaya cambiando Nombre + Fecha a Fecha + Nombre, según el caso, y hacer que List1.Text (o List2.Text) = EstaVariable), y que de esta forma te muestre los mismos datos cuando alternes el tipo de orden.
Saludos