Propiedades del listbox

hola, Adolfo !

... un listbox en el que necesito... un rango de datos... no... el rango completo, sino determinadas columnas.
... mostrar... los registros... que cumplan unas determinadas condiciones.
... me gustaria mas que quedase con una estructura de celdas
... la unica idea es filtrar previamente los datos y mostrar posteriormente... en el listbox.
¿Alguna idea? Se aceptan sugerencias.

- para que quedase 'como una estructura de celdas'... [en principio] 'tendria que' ser un rango de celdas -?-
- para filtrar previamente los datos, una 'estructura' como la siguiente [p.ej.]
en el modulo de codigo del formulario [algun evento o procedimiento 'aparte' o... -???]
Dim Celda As Range
With ListBox1
For Each Celda In Range("pon aqui tu rango de datos")
If Celda = "pon aqui la condicion" Then .AddItem Celda
Next
End With

[seguamente] sera necesaria alguna prevencion/correccion de [posibles] errores
y/o... modificaciones 'menores/mayores' segun las 'determinadas condiciones'
y/o... mover las instrucciones a algun otro evento [o tipo de modulo]
... [etc.]

creo que [con los datos que proporcionas] podemos empezas por probar lo anterior :))
saludos,
hector.

Hola Hector,

Antes de nada, gracias por responder. A lo que me referia con que tuviese
estructura de celdas es que cada dato estuviese dentro de un cuadrado, que
tuviese bordes, (una celda) no como en un listbox, pero bueno, eso es lo
menos importante.

La solución que me planteas me parece bastante buena pero claro solo me
funciona para un rango de m filas y 1 columna. El rango que yo quiero
mostrar esta en un rango definido dentro de la funcion Insertar-- Nombre.
Por lo tanto mi primera pregunta es ¿como hacer referencia a un rango
definido con un nombre?
Y la segunda, el rango que quiero utilizar tiene mas de una columna, por lo
tanto ¿como digo al listbox en que columna hay que poner cada dato?

Lo que necesito es mostrar en un formulario todos aquellos campos que
cumplan una determinada condicion, sería como realizar un filtro, pero sin
necesidad de tener que ir hasta la hoja en cuestion.

Grancias por anticipado.


"Héctor Miguel" escribió en el mensaje
news:u7%23X$

hola, Adolfo !

> ... un listbox en el que necesito... un rango de datos... no... el rango

completo, sino determinadas columnas.

> ... mostrar... los registros... que cumplan unas determinadas

condiciones.

> ... me gustaria mas que quedase con una estructura de celdas
> ... la unica idea es filtrar previamente los datos y mostrar

posteriormente... en el listbox.

> ¿Alguna idea? Se aceptan sugerencias.

- para que quedase 'como una estructura de celdas'... [en principio]

'tendria que' ser un rango de celdas -?-

- para filtrar previamente los datos, una 'estructura' como la siguiente

[p.ej.]

en el modulo de codigo del formulario [algun evento o

procedimiento 'aparte' o... -???]

Dim Celda As Range
With ListBox1
For Each Celda In Range("pon aqui tu rango de datos")
If Celda = "pon aqui la condicion" Then .AddItem Celda
Next
End With

[seguamente] sera necesaria alguna prevencion/correccion de [posibles]

errores

y/o... modificaciones 'menores/mayores' segun las 'determinadas

condiciones'

y/o... mover las instrucciones a algun otro evento [o tipo de modulo]
... [etc.]

creo que [con los datos que proporcionas] podemos empezas por probar lo

anterior :))

saludos,
hector.

hola, Adolfo !

... me referia con... estructura de celdas... cada dato.. dentro de un cuadrado
... que tuviese bordes, (una celda) no como en un listbox, pero... es lo menos importante.
... solucion que me planteas... solo me funciona para un rango de m filas y 1 columna.

=> no 'necesariamente'... [recuerda que] un rango... 'es un rango' [celdas/filas/columnas/[dis]continuas/etc.]

... yo quiero mostrar... un rango definido dentro de la funcion Insertar-- Nombre.
... primera pregunta... ¿como hacer referencia a un rango definido con un nombre?

=> igual que cuando haces referencia a rangos con la notacion 'A1' [entre comillas dobles]
p.e. For Each Celda In Range("NombreDelRango")

... segunda, el rango que quiero utilizar tiene mas de una columna, por lo tanto
... ¿como digo al listbox en que columna hay que poner cada dato?

=> los controles 'ListBox' tienen la propiedad '.ColumnCount' [1 columna 'por omsion']
puedes 'indicarle' [en tiempo de diseño o 'al vuelo'] las columnas que necesitas
=> para 'cargarle' datos en determinada/s columna/s, 'estas' se cuentan de 0 a n_columnas MENOS UNO
puedes utilizar la propiedad '.List(Fila_x, Columna_x)' para decirle 'exactamente en donde' va cada dato
=> supongo que lo realmente 'importante' sera 'armar' uno o dos bucles para recorrer las filas/columnas del rango

si cualquier duda =>o informacion adicional mas 'precisa'<=... ¿comentas?
saludos,
hector.

Hola Héctor,
Gracias por tus soluciones, al final he optado por montar una matriz y
cargar los datos de la matriz dentro del listbox.

A la hora de crear los bucles necesito que me recorran todas las filas del
rango y todas las columnas, ¿cómo puedo decir a la aplicación cuantas filas
o columnas son? En principio el número de filas y columnas es variable.
Supongo que sera definir una variable con el número de filas o columnas,
pero ¿cómo se cuantas son?

Un saludo,

"Héctor Miguel" escribió en el mensaje
news:

hola, Adolfo !

> ... me referia con... estructura de celdas... cada dato.. dentro de un

cuadrado

> ... que tuviese bordes, (una celda) no como en un listbox, pero... es lo

menos importante.

> ... solucion que me planteas... solo me funciona para un rango de m

filas y 1 columna.

=> no 'necesariamente'... [recuerda que] un rango... 'es un rango'

[celdas/filas/columnas/[dis]continuas/etc.]

> ... yo quiero mostrar... un rango definido dentro de la funcion

Insertar-- Nombre.

> ... primera pregunta... ¿como hacer referencia a un rango definido con

un nombre?

=> igual que cuando haces referencia a rangos con la notacion 'A1' [entre

comillas dobles]

p.e. For Each Celda In Range("NombreDelRango")

> ... segunda, el rango que quiero utilizar tiene mas de una columna, por

lo tanto

> ... ¿como digo al listbox en que columna hay que poner cada dato?

=> los controles 'ListBox' tienen la propiedad '.ColumnCount' [1 columna

'por omsion']

puedes 'indicarle' [en tiempo de diseño o 'al vuelo'] las columnas

que necesitas

=> para 'cargarle' datos en determinada/s columna/s, 'estas' se cuentan de

0 a n_columnas MENOS UNO

puedes utilizar la propiedad '.List(Fila_x, Columna_x)' para decirle

'exactamente en donde' va cada dato

=> supongo que lo realmente 'importante' sera 'armar' uno o dos bucles

para recorrer las filas/columnas del rango

si cualquier duda =>o informacion adicional mas 'precisa'<=... ¿comentas?
saludos,
hector.

hola, Adolfo !

... he optado por montar una matriz y cargar los datos... dentro del listbox.
... los bucles necesito que me recorran todas las filas del rango y todas las columnas
... ¿como puedo decir a la aplicacion cuantas filas o columnas son?
... el numero de filas y columnas es variable.
... sera definir una variable con el numero de filas o columnas, pero ¿como se cuantas son?

p.e.
Dim Filas As Long, Cols As Byte
With Range("NombreDelRango")
Filas = .Rows.Count
Cols = .Columns.Count
End With

[probablemente estes usando nombres de rangos 'dinamicos' -?-] ... si puedes indicar:
- cual es 'el rango' [y/o de que depende la variacion en filas/columnas]
- en cual columna se busca 'la coincidencia'
- cuales serian las columnas a trasladar al listbox [y el orden si fuera 'diferente']
se podria [tratar de] proponer una [posible] solucion 'mas en concreto' ;)

saludos,
hector.