SE puede proteger con una macro VBA ?

[manoloh]

Hola a todos
Me puede decir alguien si se puede desde una macro en Excel desproteger el VBA y poder protegerlo también, pues tengo una macro que me funciona perfecto si esta desprotegido pero me da error 1004 si esta protegido

Gracias

[uzziber]

El error 1004 se genera cuándo se intenta "escribir" en una hoja protegida, lee ésto.... http://support.microsoft.com/kb/905164/es

Lo que no me queda claro es...¿quieres proteger la hoja? ó ¿quieres proteger la macro?
La macro se protege desde el editor de VBA.

Saludos...

[manoloh]

Hola uzziber
lo que quiero es desproteger el VBA pero al ejecutar una macro y antes de terminar la macro volver a proteger el VBA pues el problema es que si el VBA esta desprotegido funciona pero si esta protegido me da el error 1004, lo que hace el macro es gravar una hoja en formato txt

[3pies]

Te da error 1004, porque estás intentando modificar una celda cuya hoja está protegida. Eso no tiene nada que ver con que el módulo esté protegido o no, sino con la hoja, pues está protegida.

Lo que tienes que hacer en el módulo VBA es desproteger la hoja mediantes esta línea:

Código:

' Esta línea es para desproteger la hoja:
unprotect "tu_contraseña"
' Ahora haces lo que tengas que hacer con las celdas
' bla, bla, bla
' bla, bla, bla
' Ahora volvemos a proteger la hoja
protect "tu_contraseña"

PD: Sustituye tu_contraseña por el password que le hayas puesto a tu hoja (las comillas debes dejarlas tal y como están).

Salu2

[manoloh]

El error solo se produce si tengo protegido el VBA para que no se pueda modificar la macro ni verla

las hordenes que produce el error es

Sheets("COPIA").Select

ActiveSheet.Unprotect "codigo"

ActiveWorkbook.SaveAs FileName:=fil2, _
FileFormat:=xlTextMSDOS, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False


ActiveSheet.Protect "codigo"
el unprotect y protect los he puesto despues de tu respuesta pero da igual da error