FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Proteger Celda Excel
Posts: 198
Joined: Fri Nov 18, 2005 07:34 PM
Proteger Celda Excel
Posted: Fri May 14, 2021 12:18 AM

Hola, como puedo "bloquear" una o varias celdas de una hoja de excel, es decir que el usuario no pueda modificar dichas celdas pero si pueda abrir el archivo excel

oExcel:ActiveWorkbook:password="12345"

Con esto protejo todo el archivo, pero no es lo que necesito
Gracias

Posts: 198
Joined: Fri Nov 18, 2005 07:34 PM
Re: Proteger Celda Excel
Posted: Fri May 14, 2021 01:39 AM

Con esto bloqueo solo la hoja completa
oSheet:Protect( "123456" )
Que se puede hacer: ¿Des proteger las celdas que necesito ? o Indicar cuales están protegidas ?

Posts: 198
Joined: Fri Nov 18, 2005 07:34 PM
Re: Proteger Celda Excel
Posted: Fri May 14, 2021 01:49 AM

Ya encontré en el foro la solucion:

//To "Lock" or "Unlock" a cell use:
oSheet:Range("A1","A10"):Locked:=.f. //(or .t. to lock)

//Then to protect the locked cells:
oSheet:Protect( "12345")

//To Unprotect the locked cells:
//oSheet:UnProtect( cPassword )

Gracias por los que comparten sus conocimientos y experiencias :D

Posts: 711
Joined: Thu Oct 06, 2005 09:57 PM
Re: Proteger Celda Excel
Posted: Thu Oct 16, 2025 11:18 AM

En mi caso, para que funcione, he tenido que hacer un pequeño cambio en el "range"

        oHoja:Range( "J5:J20"):locked:=.t.

        oHoja:Protect()

Protege la columna desde la celda J5 hasta la J20 (sin contraseña)

Un saludo



Manuel

Continue the discussion