Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Re: Proteger y Desproteger Hoja con macro

180 views
Skip to first unread message

Héctor Miguel

unread,
Aug 21, 2004, 5:00:37 AM8/21/04
to
hola, Hiper

> ... hoja1 ... quisiera que fuera solo de lectura para cuando otras personas la consultan
> ... sin embargo, quisiera poder modificarla ... mediante una macro [...]

puedes asignar las protecciones 'necesarias' p.e. celdas [des]bloqueadas, password, etc.
->en la interfase grafica de la aplicacion<- y... 'ahi la dejamos' :))
y lo unico que necesitas es la siguiente instruccion...
=== en el modulo de codigo 'del libro' [ThisWorkbook] ===
Private Sub Workbook_Open()
Worksheets("Hoja1").Protect UserInterfaceOnly:=True
End Sub
¨¨¨¨¨¨¨¨¨¨¨¨¨
=> NO necesitas 'repetir' el password NI [des-re]proteger la hoja y...
[practicamente] ->todo<- lo que hagas por macros... 'pasara' sin problemas ;)

saludos,
hector.

Héctor Miguel

unread,
Aug 21, 2004, 10:35:35 PM8/21/04
to
hola, Hiper !

> Intente con el codigo anterior, pero aun continua desprotegida la hoja (me faltara algo por ahi ???)

si continua desprotegida... es debido a que NO le has 'puesto' contraseña a la hoja con...
[menu] herramientas / proteger -> / proteger hoja... [opciones de proteccion, contraseña, etc.]

'aprovecho' [por si las dudas y porque a veces se me olvida] para comentarte que...
hay [ligeros] cambios en cuanto a la seguridad/protecciones/passwords entre versiones...
- cuando le asignas una contrseña de proteccion en la interfase de usuario a hojas/libros [menu herramientas...]
y necesitas que la proteccion NO 'afecte' a tus macros
[usando la instruccion de 'solo interfase de usuario' SIN tener que [des/re]proteger la hoja]
=> en excel 97 y 2000... es 'suficiente' con poner:
=== en el modulo de codigo del libro ===


Private Sub Workbook_Open()
Worksheets("Hoja1").Protect UserInterfaceOnly:=True
End Sub

¨¨¨¨¨¨¨¨¨¨¨¨ => NO necesitas 'repetir' el password <=
=> a partir de excel 2002 [xp]...
=== en el modulo de codigo del libro ===
Private Sub Workbook_Open()
Worksheets("Hoja1").Protect _
PassWord:="la MISMA cOntRaSeÑa qUe lE pUsISte", _
UserInterfaceOnly:=True
End Sub
¨¨¨¨¨¨¨¨¨¨¨¨ => SI es requisito 'repetir' el password :-( <=
=> y 'eso' implica la [posible] necesidad de ponerle contraseña [tambien] al proyecto vba <= OJO
en ambos casos [practicamente] ->todo<- lo que hagas por macros... 'pasara' sin problemas ;)
¿comentas?
saludos,
hector.

0 new messages