Problema con hojas ocultas.

18/07/2003 - 19:54 por Feli | Informe spam
Saludos al grupo.
Tengo un libro con unas cuantas hojas que me interesaría ocultar, pero en el
momento de hacerlo, cuando ejecuto un formulario que realiza operaciones
sobre las mismas me da un error.
Es posible tener las hojas ocultas y el formulario en ejecución?. Si me
podeis ayudar

Muchas gracias.
Paco
 

Leer las respuestas

#1 Héctor Miguel
18/07/2003 - 23:43 | Informe spam
¿Que tal, Paco?

... hojas que me interesaría ocultar, pero ... cuando ejecuto un formulario ... sobre las mismas me da un error.
Es posible tener las hojas ocultas y el formulario en ejecución?.



==> Es posible "siempre y cuando" hagas la referencia COMPLETA a la hoja (y rangos) dentro del codigo, p.e.
estando oculta la Hoja2 ==Sub EnHojaOculta()
Worksheets("Hoja2").Range("a1") = "Escritura oculta"
Worksheets("Hoja2").Range("a2") = "Ancho estándar"
Worksheets("Hoja2").Range("a1").Sort Key1:=Worksheets("Hoja2").Columns("a")
End Sub
Si quieres evitar escribir "tantas veces" Worksheets("Hoja2"), "metelo" en un bloque With (OJO con los puntos) ==Sub EnHojaOculta()
With Worksheets("Hoja2")
.Range("a1") = "Escritura oculta"
.Range("a2") = "Ancho estándar"
.Range("a1").Sort Key1:=.Columns("a")
End With
End Sub
_______
Saludos,
Héctor.
MS-MVP

Preguntas similares