Página 1 de 1
[RESUELTO]Evitar que se puedan seleccionar celdas protegidas
Publicado: Dom Ene 22, 2017 7:46 pm
por Lucasasecas
Buenas tardes.
Una de las macros que tengo protege y desprotege la hoja con los métodos .Protect y .Unprotect
Con esto evito que se puedan modificar las celdas protegidas pero también quisiera evitar que se seleccionen.
¿Hay alguna forma de hacerlo mediante macros?
Muchas gracias.
Re: Evitar que se puedan seleccionar celdas protegidas
Publicado: Lun Ene 23, 2017 7:28 pm
por fornelasa
Parecería que no puede hacerse de una forma "normal" con macro según este bug
https://bz.apache.org/ooo/show_bug.cgi?id=123703
Tal vez esto funcione, elige una celda equis desprotegida por ejemplo B2
Código: Seleccionar todo
Sub Main
celdaActual = Thiscomponent.getcurrentselection
if celdaActual.CellProtection.islocked = true then
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "ToPoint"
args1(0).Value = "$B$2"
dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args1())
end if
End Sub
Saludos, Federico.
Re: Evitar que se puedan seleccionar celdas protegidas
Publicado: Lun Ene 23, 2017 9:59 pm
por Lucasasecas
Muchas gracias por la respuesta.
Es una solución ingeniosa! Incluso no es necesario que la hoja esté protegida.
De nuevo, muchas gracias.