Hacer que funcione una macro con una hoja oculta

22/10/2006 - 04:55 por Edixon | Informe spam
Hola amigos tengo un problemita, espero puedan ayudarme.

Tengo una macro que me hace un autofiltro de un nombre x en la hoja 1
y me trae todos los datos a la hoja 2 lo que necesito es ocultar la
hoja 1(Menu formato-Hoja-ocultar) o de otra forma,pero que la macro me
siga haciendo el procedimiento igual


Nota: Cuando bloqueo la hoja y ejecuto la macro en la hoja 2 me da un
error

Gracias de antemano por su ayuda
 

Leer las respuestas

#1 Héctor Miguel
22/10/2006 - 07:25 | Informe spam
hola, Edixon !

Tengo una macro que me hace un autofiltro de un nombre x en la hoja 1 y me trae todos los datos a la hoja 2
lo que necesito es ocultar la hoja 1... o de otra forma, pero que la macro me siga haciendo el procedimiento igual
Nota: Cuando bloqueo la hoja y ejecuto la macro en la hoja 2 me da un error



[aunque no comentas cual seria la 'utilidad' de los autofiltros en una hoja oculta] -???-

prueba/revisa/adapta/... el siguiente ejemplo:
al abrirse el libro, se protege, se ['super']oculta y se habilita el uso de macros y autofiltros en la hoja1
[nota: los aotufiltros YA estan aplicados/definidos/habilitados/... en la misma]

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

en el modulo de codigo del libro [ThisWorkbook] ==Private Sub Workbook_Open()
With Worksheets("Hoja1")
.Protect PassWord:="abc", UserInterfaceOnly:=True
.EnableAutoFilter = True
.Visible = xlSheetVeryHidden
End With
End Sub

en un modulo de codigo 'general ==Sub Autofiltros_Hoja_Oculta()
With Worksheets("hoja1")
.[a1].AutoFilter Field:=1, Criteria1:="xyz"
End With
End Sub

Preguntas similares