Visual Basic para Aplicaciones - Proteccion de Hoja de excel

Life is soft - evento anual de software empresarial
 
Vista:

Proteccion de Hoja de excel

Publicado por jvertiz (2 intervenciones) el 05/11/2002 19:24:45
Tengo una hoja de excel, la cual quiero proteger desde VB6, he visto en el help que se hace con el metodo Protect, pero como paso los parametros?... si alguien trabajo con esto, agradecere me puedan ayudar.

JV.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Proteccion de Hoja de excel

Publicado por Joselon (5 intervenciones) el 06/11/2002 10:58:24
Si a lo que te refieres es protegergo con Password aqui tienes un ejemplo

Dim xlsExcel As Excel.Application

Set xlsExcel = New Excel.Application

xlsExcel.ActiveWorkbook.SaveAs Filename:=Trim(c:\Directorio\NombreFichero.xls), _
FileFormat:=xlNormal, Password:="mete aqui tu password", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

xlsExcel.Quit

Set xlsExcel = Nothing
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Proteccion de Hoja de excel

Publicado por jvertiz (2 intervenciones) el 07/11/2002 17:31:22
no, creo q no me deje entender, solo quiero proteger las hojas, no el archivo..... quiero protegerlas para q nadie pueda modifcarlas. He visto que es con el protect pero los argumentos nose como pasarlos...

Gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Proteccion de Hoja de excel

Publicado por Joselon (5 intervenciones) el 08/11/2002 13:34:44
Aqui tienes el codigo

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Proteccion de Hoja de excel

Publicado por Joselon (5 intervenciones) el 08/11/2002 14:43:18
SE ME OLVIDO PONERTE LA OPCION DE PASSWORD PARA QUE NO PUEDAN DESPROTEGERLA

xlsExcel.ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="PALABRA CLAVE"
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar