TITULO: Función MoveList

DESCRIPCION: Esta función te permitirá traspasar filas entre dos cuadros de lista cuya propiedad Tipo de Origen de la Fila este establecido a “Lista de Valores”. El código está, creo que suficientemente comentado.

 

EXPLICACION:

Este función fue creada para el ejemplo Buscador que también figura en esta página. Como pense que podría ser util por si misma, la he extraido de allí para ponerla a disposición de cualquiera que quiera utilizarla. La idea mover filas entre cuadros de lista cuya propiedad “Tipo de Origen de la Fila” esté establecida a “Lista de Valores”, es decir, las filas no proceden de ninguna consulta ni tabla, esto complica la situación, pues no podemos recurrir a filtrar las consultas o tablas origen de las filas, ya que no disponemos mas que de una cadena de valores separados por ‘;’.

 

La función trabaja con tres parámetros:

- frm: definido como Form, para este parámetro habrá que pasar cualquir expresión que identifique válidamente del formulario que contiene los cuadros de lista. Por ejemplo Me, o Forms!NombreFormulario …

- listaOrigen y listaDestino: definidos como string (texto), hay que pasar (encerrados entre comillas) los nombres del cuadro de lista de origen y de destino respectivamente,

 

Una llamada válida a la función sería: Call MoveList(Me, “ListaA”, “ListaB”), así estariamos indicando que :

- Los cuadros de lista se encuentra en el formulario actual (Me)

- Queremos mover una o varias filas desde el cuadro de lista llamado ListaA al cuadro de lista llamado ListaB.

 

Puedes aplicar la función a un evento del propio cuadro de lista (por ejemplo click o doble click) o a un evento click de un boto creado expresamente para ello.

 

Espero que sea de utilidad

                                               Marciano, diciembre de 2005