** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Ordenar un cuadro lista
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoOrdenar un cuadro lista

 Responder Responder
Autor
Mensaje
Jorge(GN) Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 01/Septiembre/2020
Localización: Venezuela
Estado: Sin conexión
Puntos: 29
Enlace directo a este mensaje Tema: Ordenar un cuadro lista
    Enviado: 10/Septiembre/2020 a las 00:25
Buenas tardes amigos, tengo por aquí una duda. Tengo un cuadro combinado llamado "listUnidad", selecciono un valor y el resultado se refleja de manera filtrada, en esa categoría en el cuadro de lista "listResultado".

El código VBA que uso es el siguiente:

Private Sub listUnidad_Click()
    
    Dim SQL As String
    
    SQL = "SELECT Id,inicial_nom,nomenclatura As Unidad"
    SQL = SQL & " FROM data_Inv "
    SQL = SQL & " WHERE unidad = '" & Me.listUnidad & "'"
    Me.listResultado.RowSource = SQL

End Sub

Pense que con el Origen de Fila se ordenaría, pero hay detalles y supongo que esta cuando declaro la expresión SQL y mi origen de fila choca el orden con el código VBA.

¿Qué uso para que en el código VBA se ordene el resultado del cuadro de lista de mayor a menor correctamente?


Editado por Jorge(GN) - 10/Septiembre/2020 a las 00:30
Access BD
Arriba
rokoko Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 16/Febrero/2008
Localización: Pamplona
Estado: Sin conexión
Puntos: 3062
Enlace directo a este mensaje Enviado: 10/Septiembre/2020 a las 07:56
Pues yo creo que si pones en la SQl que te ordenene de mayor a menor por  un campo lo deberia hacer

 Dim SQL As String
    
    SQL = "SELECT Id,inicial_nom,nomenclatura As Unidad"
    SQL = SQL & " FROM data_Inv "
    SQL = SQL & " WHERE unidad = '" & Me.listUnidad & "' ORDER BY data_Inv.Id"
    Me.listResultado.RowSource = SQL


Prueba a ver.......escrito al vuelo, en el ejemplo te ordenario por el campo id.....


Si fuera ordenar por descendente seria asi  ORDER BY data_Inv.Id DESC;
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 13990
Enlace directo a este mensaje Enviado: 10/Septiembre/2020 a las 10:37
Vigila cuál es la columna dependiente de la lista ...

Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
Jorge(GN) Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 01/Septiembre/2020
Localización: Venezuela
Estado: Sin conexión
Puntos: 29
Enlace directo a este mensaje Enviado: 10/Septiembre/2020 a las 11:12
Tema resuelto, la verdad funciona bien. Muchas gracias.
Access BD
Arriba
Jorge(GN) Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 01/Septiembre/2020
Localización: Venezuela
Estado: Sin conexión
Puntos: 29
Enlace directo a este mensaje Enviado: 10/Septiembre/2020 a las 11:13
Si exactamente, la columna base es la unidad.
Access BD
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable