Últimos mensajes - Powered by IBM

Palabras claves

Rows ("X:Y").Select

02/11/2003 - 22:26 por julian-vlc-sp | Informe spam

¡Hola a tod@s!

Aunque llevo tiempo en el grupo de access, en este soy nuevo.

Estoy empezando con el vba, y agradecería me ayudaseis.

Para ocultar unas filas, uso el siguiente código que he sacado de un macro,
poniéndolo en el evento al hacer click, de un botón determinado:

ActiveSheet.Unprotect password:="pp"
Rows("7:10").Select
Selection.EntireRow.Hidden = True
Range("a11").Select
ActiveSheet.Protect password:="pp", DrawingObjects:=True,
Contents:=True, Scenarios:=True

me funciona bien, y hace lo que necesito.

Quiero poner varios botones, cada uno para un rango distinto, los valores 7
y 10 en este ejemplo, se calcularlos, y son los valores de dos variables, a
y b que son del tipo string.

El problema viene, que si pongo: Rows("a:b").Select. ó Rows("a:b").Select, ó
algunas otras formas que he probado, no funciona.

¿Me podéis ayudar?

SALUDOS.
julian-valencia-españa

Siga el debate

6 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 Leonel

02/11/2003 - 23:12 | Informe spam

¡Hola a !

Aunque llevo tiempo en el grupo de access, en este soy nuevo.

Estoy empezando con el vba, y agradecería me ayudaseis.

Para ocultar unas filas, uso el siguiente código que he

sacado de un macro,

poniéndolo en el evento al hacer click, de un botón

determinado:

ActiveSheet.Unprotect password:="pp"
Rows("7:10").Select
Selection.EntireRow.Hidden = True
Range("a11").Select
ActiveSheet.Protect password:="pp", DrawingObjects:=True,
Contents:=True, Scenarios:=True

me funciona bien, y hace lo que necesito.

Quiero poner varios botones, cada uno para un rango

distinto, los valores 7

y 10 en este ejemplo, se calcularlos, y son los valores de

dos variables, a

y b que son del tipo string.

El problema viene, que si pongo: Rows("a:b").Select. ó

Rows("a:b").Select, ó

algunas otras formas que he probado, no funciona.

¿Me podéis ayudar?

SALUDOS.
julian-valencia-españa

.
esto funciona:

rows(a & ":" & b).select
ahora no es necesario ejecutar este select hazlo directo
rows(a & ":" & b).EntireRow.Hidden=true

"&" separado por un espacio en ambos lados

espero te sirva
un saludo

Responder a este mensaje

#2 julian-vlc-sp

03/11/2003 - 00:24 | Informe spam

Gracias, Leonel!

He seguido haciendo pruebas, y creo que el problema esta en otro sitio

El trozo de código que he pegado, lo tengo en un modulo (entiendo que es
publico), si las variables a y b las defino en el modulo, la cosa funciona
bien.

Este modulo, pretendo usarlo para varios botones, y las variables a y b las
defino en el Private Sub de cada botón.

Creo que el problema está en que al ejecutar el modulo, no coje las
variables definidas en los private.

¿Puede ser cosa de variables privadas y publicas?

¿Como puedo definir las variables en los privates de cada botón y luego
leerlas en el modulo?

GRACIAS y SALUDOS.
julian-valencia-españa

Responder a este mensaje

#3 Leonel

04/11/2003 - 01:20 | Informe spam

Gracias, Leonel!

He seguido haciendo pruebas, y creo que el problema esta

en otro sitio

El trozo de código que he pegado, lo tengo en un modulo

(entiendo que es

publico), si las variables a y b las defino en el modulo,

la cosa funciona

bien.

Este modulo, pretendo usarlo para varios botones, y las

variables a y b las

defino en el Private Sub de cada botón.

Creo que el problema está en que al ejecutar el modulo, no

coje las

variables definidas en los private.

¿Puede ser cosa de variables privadas y publicas?

¿Como puedo definir las variables en los privates de cada

botón y luego

leerlas en el modulo?

GRACIAS y SALUDOS.
julian-valencia-españa

.
vamos a suponer que tu sub en el modulo se llame

public sub ocultafilas(f1,f2)
...

rows(f1 & ":" & f2).hidden=true (creo que asi era)
end sub
supongo que usas la sub por defecto del boton esta es

Private Sub CommandButton1_Click()
dim a, b as ineteger
a=7
b
ocultafilas(a,b)
End Sub

las variables que envias son a,b y en el modulo son
recibidas por f1,f2.
un saludo

Responder a este mensaje

#4 julian-vlc-sp

04/11/2003 - 22:36 | Informe spam

Gracias, el problema era el siguiente.

Usabas variables numericas para calcular sus valores, y he tenido que usar
trim(str(variable)), porque es str me ponía un espacio delante.

Ahora estoy atascado en otro tema, si puedes, mirate el hilo que se llama
Variable Objeto.

GRACIAS y SALUDOS.
julian-valencia-españa

Responder a este mensaje

#5 Manuel Romero

04/11/2003 - 23:27 | Informe spam

En lugar de trim(str()), usa la funcion de conversion CStr()

"julian-vlc-sp" <ijulianARROBAiespana.es> escribió en el mensaje
news:

Gracias, el problema era el siguiente.

Usabas variables numericas para calcular sus valores, y he tenido que usar
trim(str(variable)), porque es str me ponía un espacio delante.

Ahora estoy atascado en otro tema, si puedes, mirate el hilo que se llama
Variable Objeto.

GRACIAS y SALUDOS.
julian-valencia-españa

Responder a este mensaje

Ads by Google

Hacer una preguntaSiguiente

Tengo una respuesta

Busqueda sugerida