Actualizar contenido de listbox sin cerrar el formulario.

05/01/2007 - 01:28 por ~ jose ~ | Informe spam
Hola que tal?
Tengo un formulario con un listbox y unos botones que insertan datos en
el rango que emplea el listbox.
Como puedo actualizar el contenido de un listbox cuando se está
ejecuntando el formulario?
Por ejemplo actualizar el listobx cuando pincho un botón del
formulario, que código me hace falta?

Gracias, un saludo,
jose
 

Leer las respuestas

#1 Ivan
05/01/2007 - 02:11 | Informe spam
hola Jose

creo que simplemente tendrias que borrar el listbox y volver a cargarlo
en el evento click del boton

pej:

suponiendo que el rango que llena el listbox (ListBox1) esta en la
columna 'a' (a partir de a1) y la ultima celda puede ser variable,
podrias usar alguna de estas formas ->

with listbox1
.clear
.list=range("a1:a" & range("65536").end(xlup).row).value
end with

o esta otra

dim celda as range
listbox1.clear
with activesheet
for each celda in .range("a1:a" & .[a65536].end(xlup).row)
listbox1.additem celda.value
next
end with

cualquiera de estos dos codigos podrias ponerlo en el evento click del
boton, una vez adaptado a tu situacion concreta en cuanto a rango,
hoja, etc

espero te ayude en algo

un saludo y hasta pronto
Ivan

PD: los codigos estan escritos en el editor del foro y pueden tener
alguna errata (creo que no, pero...), aunque supongo que seria facil de
corregir

Preguntas similares