Código: Seleccionar todo
Sub Carga_Motivos
'CARGA LISTBOX MOTIVOS
oControl2 = oDialogo.getControl( "LBX_Motivos" )
HojaDatos = ThisComponent.getSheets.getByName( "Rechazos" )
Select Case oControl.Text
Case "Solicitud Inscripción de Persona Jurídica"
co1 = 29
goto salta
Case "Solicitud Inscripción de Personas Físicas"
co1 = 67
goto salta
End Select
salta:
Do Until HojaDatos.getCellByPosition(1,co1).getString = ""
oControl2.addItem( HojaDatos.getCellByPosition(1,co1).getString, oControl2.getItemCount)
co1 = co1 + 1
Loop
End Sub
Funciona bien y me carga los motivos según la opción elegida. Pero cuando elijo otra opción de tema, los nuevos datos no reemplazan a los que estaban sino que se agregan. Entiendo que al inicio de la nueva opción debería vaciar el ListBox, pero he probado miles de formas y no le encuentro la vuelta.
Envio una copia del archivo de ejemplo por si alguien me puede dar una mano.
En este mismo punto tengo otra duda que abriré otro hilo para la misma.
Muchas gracias.
Chelo2