Página 1 de 1

Error

Publicado: Mié Ene 28, 2009 10:10 pm
por wandrew007
Hola a todos

He estado cacharreado con openoffice, y haciendo ciertas cosas me topé con lo siguiente,
tengo en una hoja writer un formulario en el cual dispongo de varios listbox, y dentro del mismo documento cuento con un boton que hace un llamado a una macro, en esta macro toma toma el valor de uno de los listbox,
el problema que tengo es cuando en el listbox no se ha selecionado nada y activo la macro, al parecer como no hay datos en el listbox inmediatamente me envia un error en la macro en la siguiente instruccion

Código: Seleccionar todo

  	numOrden = listBoxProducto2.SelectedItems(getItem) 
En este caso, no me permite hacer un condicional o algo, simplemente sale el error , intenté colocar un "On error goto", pero no funciona,
Por favor ayudenme

Re: Error

Publicado: Vie Ene 30, 2009 2:45 pm
por QuazzieEvil
puedes revisar el tamaño del array SelectedItems, si este es menos de zero, no hay selecion

Código: Seleccionar todo

If UBound( listbox.SelectedItems)>0 Then
   MsgBox "a selection was made"
Else
   MsgBox "no selection made"
End If

Re: Error

Publicado: Vie Ene 30, 2009 3:16 pm
por wandrew007
Muchas Gracias si sirivó :D