Saltar al contenido

Cuadro combinada(combobox) ayuda..!!!

publicado

Buenas necesito una ayuda... quiero saber como puedo cargar mi cuadro combinado, pero al momento de guardarlo en una tabla quisiera que me guarde su codigo....

por ejemplo una tabla pais

cod_pais , pais

1 Perú

2 Brazil

quisiera que en mi cuadro combinado salga pais(Peru), pero al guardar en una base general, que se guarde 1.

Esperando su pronta respuesta... y un modelo

Gracias

tarea.zip

Featured Replies

publicado

Hola:

Sustituye el código del formulario por este:


Private Sub cb_motivo_llamada_Click()
MsgBox _
"Código: " & cb_motivo_llamada.List(cb_motivo_llamada.ListIndex, 0) & Chr(10) & _
"Motivo: " & cb_motivo_llamada.List(cb_motivo_llamada.ListIndex, 1)
End Sub

Private Sub UserForm_Initialize()
Sheets("MOTIVO_LLAMADA").Select
cb_motivo_llamada.ColumnCount = 2 'Definimos 2 columnas para el combo
cb_motivo_llamada.ColumnWidths = "0;" 'Ocultamos el código asignandole longitud cero
cb_motivo_llamada.RowSource = "A2:B" & Range("A" & Rows.Count).End(xlUp).Row 'Cargamos el combo
End Sub
[/CODE]

Te recomiendo que le pongas nombres mas cortos a los controles o te vas a hinchar a escribir.

saludos

publicado
  • Autor

Gracias...Antonio.. voy a seguir haciendo ese formulario... tu ayuda me va a sevir mucho... gracias ya te molestare mas rato :D

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.