Macro para mostrar hojas ocultas

Estimados señores expertos disponibles, les hago mi pregunta, esperando poder contar con su invaluable apoyo. Me gustaría conocer una macro, que me permita mostrar de una sola vez si fuese posible, todas las hojas ocultas, de un archivo de excel, el cual tengo con un promedio de 10 hojas, y del cual por razones de ordenamiento y estética, me veo obligado a mantener ocultas la mayoría, no obstante hay ocasiones en las cuales me es necesario el tenerlas todas mostradas.
Respuesta
1
Esta macro te mostrara todas las hojas del libro
Sub mostrar_hojas_ocultas()
Application.ScreenUpdating = False
    For Each N In Sheets
        N.Visible = True
    Next N
Application.ScreenUpdating = True
End Sub
wow! sorprendidisimo de verdad que alegro, no sabes mi estimado experto lo tediosos que es ir mostrando una a una las hojas pero con esto un clic y problema resuelto.
Pero antes de finalizar la pregunta mi estimado, tengo una inquietud aun... habrá una macro que por decirlo así revierta el proceso, y así evitar el ir ocultándolas una a una también. Ya que esa es también parte de la tarea que realizo después de verificar ciertos datos.
Desde ya mil gracias por tu pronta y oportuna respuesta
Un saludo!
Si claro pero esa es una tarea más tediosa necesita saber el nombre de las hojas que quieras
Si quieres pásame el archivo o bien dime el nombre de las hojas
[email protected]
Hola y gracias por brindarme tu ayuda... nuevamente infinitas gracias. Aquí están los nombres de algunas de las páginas, que componen mi archivo.
? Hoja de trabajo, Formatos 1, Formatos 2, Análisis, Oficio 1, Oficio 2, Consolidado, Informe diario 1, Informe diario 2.
Y este es el nombre de la Hoja que mantengo digamos al frente, cuando todas están ocultas
"Activacion"
Gracias amigo, por tu tiempo y conocimiento.
Un saludo!
Esta macro te oculta todas las hojas menos "activacion"
Si algún día quieres que alguna más no se oculte simplemente borra la linea o bien cambias = False por = True
Sub ocultar_hojas()
Sheets("Activacion").Visible = True
Sheets("Activacion").Select
Sheets("Informe diario 1").Visible = False
Sheets("Informe diario 2").Visible = False
Sheets("Hoja de trabajo").Visible = False
Sheets("Formatos 1").Visible = False
Sheets("Formatos 2").Visible = False
Sheets("Analisis").Visible = False
Sheets("Oficio 1").Visible = False
Sheets("Oficio 2").Visible = False
Sheets("Consolidacion").Visible = False
End Sub
No olvides finalizar la pregunta
Gracias buen amigo... te agradezco tu valiosa cooperación y/o ayuda valiosa, gracias por tu tiempo ademas. Me han de servir estas dos macros muchísimo.
Gracias amigo... un Saludo!
Att. Ricardo

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Macro para mostrar y ocultar hojas de excel

Tengo una hoja de excel que uso como indice en donde tengo imágenes que son hipervínculos que me dirigen a otras hojas del mismo libro. La pregunta es como puedo hacer que cuando abra el libro solo se vea el indice y al clickear en alguna imagen de...
3 respuestas

Mostrar hojas ocultas excel 2007

Soy contador publico y estoy recibiendo un cargo en una empresa, mi pregunta se relaciona en que el Sr. Contador anterior dejo el archivo para realizar los balances pero dejo ocultas las hojas para alimentar las hojas que los elaboran, lo que pasa es...
1 respuesta

Macro mostrar Hojas ocultas

Solicito de tu apoyo para generar una macro que me permita abrir todas las hojas ocultas de un libro.
1 respuesta

Bloqueo para que no se vean hojas en excel

Tengo un archivo de Excel en el cual tengo 3 hojas y solo quiero que se vea la primera, un amigo me enseñó una secuencia en visual basic pero me marga que es incorrecta, ¿Me podrían ayudar por favor? Anexo secuencia Private Sub Workbook_Open()...
1 respuesta

Mostrar una hoja de excel desde un Userform

De TodoExpertos Tengo un formulario en un archivo Excel que oculta el libro al cargar usando el código Application.visible = false userform.show Ahora bien, me gustaría saber como puedo hacer para que usando un botón desde el form me muestre solo una...
1 respuesta

Habilitar macros

Tengo una hoja con una macro y quiero que al abrir el libro, cuando ponga el mensaje de si quieres habilitar las macros, no puedas pinchar en el botón de no o en todo caso que cuando pulses que no, se cierre el libro. ¿Es posible?
1 respuesta

Mostrar hojas ocultas

Oculte varias hojas, usando la opción formato, ¿Hoja y ocultar pero ya no puedo ver las hojas ocultas por estar desactivada la opción mostrar que hago?
1 respuesta

Macro Para Ocultar Hojas excel y abrirlas con comboBox

Dante Ante todo u gran saludo a tu persona y por la gran ayuda que nos brindas en el foro, hiendo con mi pregunta. Tengo 30 hojas excel activas en las que ingreso datos, lo que necesito con este tema es que se pueda ocultar las hojas y solo me...
1 respuesta

No abrir archivo si no se habilitan macros

Soy nuevo en esto y solicito su ayuda. He preparado un archivo en Excel que funciona con una pequeña macro, como es para distribuirlo entre 20 usuarios, lo que necesito es lo siguiente: Al abrir el archivo me debe "obligar" a habilitar las macros, si...
1 respuesta

Sheets("nombre").Select sobre una hoja oculta

Tengo un userform con una serie de checkbox que marcan con una por unas celdas de unas hojas de excel (hoja1, hoja2...) Los resultados se obitnen en la hoja5 Como lo único que importa es ver los resultados que están en la hoja5, oculte la hoja 1 y me...
1 respuesta