Conexión de datos ODC con Libro Excel Protegido.

Puedes usar la orden userinterfaceonly:=True, para proteger la hoja de los usuarios, pero no cuando ejecutas código de VBA.

Por ejemplo:

Sub macro()

Sheets("Hoja1").select    'Hoja que deseas proteger para que usuario no modifique

Pero el código de VBA que desea ejecutar si

ActiveSheet.Protect Password:="123", userinterfaceonly:=True 

Range("g4"). Clear 'Observa queue mediante código permite borrar el contenido de la

Celda g4
 End Sub

Hola buenos días, Willcoss.

Te comento la hoja de calculo que estoy realizando, tiene una conexión de datos odc mediante una base de datos access, que a la hora de actualizar me dice que la hoja esta protegida y por lo tanto no actualiza los datos, el tema es que no puedo dejar desprotegida la hoja de calculo por que sino los botones con sus correspondientes macros estarían descubiertos  para los usuarios.

Tu solución me parece muy buena pero no funciona poniéndola en ThisWorkBook, no me actualiza los datos en el libro excel y me da error, por lo tanto sigo igual.

Situación Actual:

El libro lo tengo protegido, pero la hoja donde tengo los botones y las macros la tengo desprotegida, el código basic también tengo protegido el proyecto para que no se pueda acceder al código.

Necesitaría una solución para actualizar los datos externos. te adjunto código de una de las macros, por si sirve de ayuda.

Sub BOROX()
ActiveSheet.Unprotect Password:="-"
'Seleccionamos las columnas a ocultar
Range("F:F,G:G,H:H,J:J,QUE:QUE,L:L,M:M,N:N,O:O,P:P,QUE:QUE,R:R,ES:ES,T:T,U:U,V:V,W:W,POR:POR,Y:Y").Select
'Las ocultamos
Selection.EntireColumn.Hidden = True
'Nos situamos en A2
Range("A2").Select
ActiveSheet.Protect Password:="-"
End Sub

Muchas gracias por vuestra atención, un saludo.