¿Hay una macro que pueda ocultar filas bloqueadas?

Como estasexperto:
Soy Javier, oye te expongo el siguiente problema, que ojala te des tiempo de contestarme:
Tengo una hoja de calculo con un macro que me sirve muy bien paro ocultar filas con valor cero que "no" están bloqueadas (seguridad), utilizo este macro:
Sub ocultar filas()
Range("C7"). Activate
WhileActiveCellRow<>201
If ActiveCell.Value=0 Then
ActiveCellEntireRow.Hidden=True
End if
ActiveCelloffset (1,0). Activate
Wend
End sub
Como te digo la macro me sirve muy bien, pero ocupo bloquear las filas (celdas), para que no me muevan las fórmulas, y ya bloqueadas la macro no me sirve.
La pregunta es: ¿Hay una macro que me pueda ocultar esas filas bloqueadas?

2 Respuestas

Respuesta
2
En principio si la hoja esta protegida, hay que desproteger, y para ello utiliza activesheets.unprotect password:="pepe"
Donde pone "pepe" pon la contraseña que tengas
Sub ocultar_filas()
ActiveSheet.Unprotect password:="pepe"
Range("C7").Activate
While ActiveCellRow <> 201
If ActiveCell.Value = 0 Then
ActiveCell.EntireRow.Hidden = True
End If
ActiveCell.Offset(1, 0).Activate
Wend
ActiveSheet.Protect password:="pepe"
End Sub
hey experto muchas gracias ya quedo con el código que me mandaste:
Lo que pasa es que el excel 2005, se agarraba toda la hoja y se desbloqueaba. En
cambio en el excel 2007 (del trabajo), donde realmente tengo el archivo se
ejecuto la macro muy bien, desbloqueaba solamente el área de la macro.
Saludos y muchas gracias me hiciste un parote jejejej Javier
Respuesta
1
Y porque no la ocultas y después la proteges:
Sub ocultar_filas_Proteger()
'Nos situamos en una celda que queremos ocultar y proteger
ActiveCell.Offset(-1, 0).Select
'Primero la ocultamos
ActiveCell.EntireRow.Hidden = True
'Y ahora la protegemos
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
>Un saludo
>Julio

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Ocultar Filas con Macro

Este es el asunto; Tengo una hoja con muchos valores desde la columna B hasta la AA; en la columna B tengo una lista de valores desde la fila 11 hasta la 450, dichos valores provienen de otra hoja, es decir, son puras fórmulas "=hoja2!b11" y así por...
1 respuesta

Ocultar filas con resultado "cero"

Mi duda radica en lo siguiente: Tengo un rango con resultados y subtotales y deseo que excel me evalúe los resultados y me oculte las filas cuyos resultados sean "cero" pero que no oculte los subtotales en caso de que sean "cero" p.e. A B C 1 + 2 = 3...
1 respuesta

¿Cómo puedo ocultar COLUMNAS con macros en excel?

Tengo valores desde A1 a K18, son números, en A20 a K20 tengo una suma de todos los números, pero en algunos tengo valor CERO, lo que necesito es que si un valor de los que tengo en A20:K20 es igual a CERO oculte toda esa columna, por ejemplo: si en...
1 respuesta

Bloqueo de celdas

Mi nombre es leonardi, Actualmente estoy diseñando una hoja electrónica en Excel 2002 pa realizar los pedidos de suministros de papelería en la empresa en que trabajo, la idea es tener un listado con tres columnas a saber: nombre del producto, código...
1 respuesta

Macro para eliminar filas y columnas ocultas

Necesito un macro para eliminar filas y columnas de una hoja. Probé algunos macros que encontré en internet y algunos me dan error y otros directamente no hacen nada. El archivo no tiene ninguna particularidad más que contener una tabla con filas ocultas.
1 respuesta

Ocultar y mostrar filas en Excel por medio de una

Ocultar y mostrar filas en Excel por medio de una macro Cordial saludo. Solicito por favor una ayuda. Quiero que por medio de una macro, al seleccionar una "casilla de verificación (control de formulario)", es decir, "VERDADERO/FALSO" cuya celda...
1 respuesta

Ocultar filas automáticamente

Tengo una tabla con 185 filas con diversa información. Quiero que según un valor de una celda de cada fila, se oculte dicha fila automáticamente. ¿Cómo puedo hacerlo?
1 respuesta