Imprimir página | Cerrar ventana

Ordenar un cuadro lista

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=85481
Fecha de impresión: 16/Abril/2024 a las 16:34


Tema: Ordenar un cuadro lista
Publicado por: Jorge(GN)
Asunto: Ordenar un cuadro lista
Fecha de publicación: 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?


-------------
Access BD


Respuestas:
Publicado por: rokoko
Fecha de publicación: 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;

Publicado por: Mihura
Fecha de publicación: 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.

http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones
http://www.tecsys.es" rel="nofollow - Tecsys.es

Publicado por: Jorge(GN)
Fecha de publicación: 10/Septiembre/2020 a las 11:12
Tema resuelto, la verdad funciona bien. Muchas gracias.

-------------
Access BD

Publicado por: Jorge(GN)
Fecha de publicación: 10/Septiembre/2020 a las 11:13
Si exactamente, la columna base es la unidad.

-------------
Access BD


Imprimir página | Cerrar ventana