Actualización automática de TABLAS DINÁMICAS, con hojas protegidas de contenidos TABLAS EXCEL (Base de dato) y Tablas dinámicas
Feliz inicio de semana.
Agradezco tu ayuda, tengo una tabla en Excel protegida, con el fin de que la persona que la va a utilizar no cometa el error de ingresar datos en las celdas con formulas, Solo deje liberadas las celdas donde se debe introducir la información.
Existe alguna posibilidad de proteger todas las hojas que contienen tabla dinámica proveniente de la tabla Excel para que el usuario solo tenga la posibilidad de utilizar dicha tabla sin que pueda acceder a ingresar datos en las demás celdas de las hojas.
He tratado, con varias macros para que cuando se ingrese un nuevo registro en la tabla Excel, se actualice automáticamente las tablas dinámicas. Los resultados obtenidos han sido sin éxito. He tenido errores tales como:
"no se puede ejecutar ese comando si la hoja protegida contiene otro informe de tabla dinamica basado en los mismos datos de origen.
Para quitar la proteccion de la hoja que contiene el otro informe, haga clic en la ficha de la hoja y, a continuacion, elija desproteger hoja(ficha revisar, grupocambios). Despues intente de nuevo ejecutar el comando."
Saludos.
Eduardo Gimenez
1 Respuesta
Ejecuta la siguiente macro. Cambia en la macro "abc" por el password que tienen tus hojas
Sub Actualizar_Hojas() 'Por.Dante Amor ' Application.ScreenUpdating = False For Each h In Sheets h.Unprotect "abc" Next ActiveWorkbook.RefreshAll For Each h In Sheets h.Protect "abc" Next Application.ScreenUpdating = True End Sub
Para ejecutar la macro pon un botón en tu hoja
Sigue las Instrucciones para un botón y ejecutar la macro
- Abre tu libro de Excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- En el menú elige Insertar / Módulo
- En el panel del lado derecho copia la macro
- Ahora para crear un botón, puedes hacer lo siguiente:
- Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
- Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
- Una vez que insertaste la imagen en tu hoja, dale click derecho dentro de la imagen y selecciona: Tamaño y Propiedades. En la ventana que se abre selecciona la pestaña: Propiedades. Desmarca la opción “Imprimir Objeto”. Presiona “Cerrar”
- Vuelve a presionar click derecho dentro de la imagen y ahora selecciona: Asignar macro. Selecciona: Actualizar_Hojas
- Aceptar.
- Para ejecutarla dale click a la imagen.
.
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
.
Avísame cualquier duda
.
