DIMENSION DE UN RANGO
Publicado por _frany_ (62 intervenciones) el 30/05/2007 21:22:14
Hola a todos de nuevo
Tras buscar en este foro y en todo internet asi como en excel no llego a encontrar la formade como saber que dimension tiene un rango seleccionado mediante condigo VBA.
El problema que tengo parece bastante simple, hago una seleccion mediante el raton en excel
llenando una rango
pero para resumir como estoy en proceso de depuracion del codigo pongo la parte que me interesa.
Sub areas()
suelo_buscado = "regadio"
Dim rango_se_suelo As Excel.Range
Dim rango_de_datos As Excel.Range
Set Rango_de_suelo = Range("d2:f5")
Set rango_de_datos = Range("a2:c5")
do
fila=fila+1
Columna=columna+1
valor = Rango_de_suelo.Cells(fila, columna)
'''''''' AQUI ME SURGE el problema, como puedo saber que dimension macima tiene mi rango para poder salir del bucle y oder asignar variables.
Ya que aunque en el ejmplo : Set rango_de_datos = Range("a2:c5") le doy un valor, este valor lo tomará tras seleccionar directamente en pantalla y no encuentro la forma de saber que dimension en filas y columnas tiene mi rango seleccionado.
He mirado la ayuda con AREAS pero no encuentro nada.
Porque no puedo poner el codigo de la siguiente manera?
valor = Rango_de_suelo.Formula(fila, columna)
esto no me da ningun valor y he de poner tan solo valor = Rango_de_suelo.Cells(fila, columna) para que pueda funcionar.
Alguien me puede ayudar?
Juan C , por favor una pequeña ayudita.
GRacias.
Tras buscar en este foro y en todo internet asi como en excel no llego a encontrar la formade como saber que dimension tiene un rango seleccionado mediante condigo VBA.
El problema que tengo parece bastante simple, hago una seleccion mediante el raton en excel
llenando una rango
pero para resumir como estoy en proceso de depuracion del codigo pongo la parte que me interesa.
Sub areas()
suelo_buscado = "regadio"
Dim rango_se_suelo As Excel.Range
Dim rango_de_datos As Excel.Range
Set Rango_de_suelo = Range("d2:f5")
Set rango_de_datos = Range("a2:c5")
do
fila=fila+1
Columna=columna+1
valor = Rango_de_suelo.Cells(fila, columna)
'''''''' AQUI ME SURGE el problema, como puedo saber que dimension macima tiene mi rango para poder salir del bucle y oder asignar variables.
Ya que aunque en el ejmplo : Set rango_de_datos = Range("a2:c5") le doy un valor, este valor lo tomará tras seleccionar directamente en pantalla y no encuentro la forma de saber que dimension en filas y columnas tiene mi rango seleccionado.
He mirado la ayuda con AREAS pero no encuentro nada.
Porque no puedo poner el codigo de la siguiente manera?
valor = Rango_de_suelo.Formula(fila, columna)
esto no me da ningun valor y he de poner tan solo valor = Rango_de_suelo.Cells(fila, columna) para que pueda funcionar.
Alguien me puede ayudar?
Juan C , por favor una pequeña ayudita.
GRacias.
Valora esta pregunta
0