Control Combo

Para acceder a las diferentes columnas del resultado de un combo simplemente tenemos que consultar el la propiedad "Value" del índice de la columna en la colección "Columns" en función de la consulta original.


En el siguiente ejemplo, tras seleccionar un valor en el combo, se guardarán los valores de hasta tres columnas de la consulta original.


Código ejemplo

Sub Combo_AfterUpdate(aComboMultiple)

  lColumna1 = aComboMultiple.Columns(0).Value

  lColumna2 = aComboMultiple.Columns(1).Value

  lColumna3 = aComboMultiple.Columns(2).Value

End Sub


Autor: Pablo Céspedes