Saltar al contenido

COMO HACER PARA NO SELECCIONAR CELDAS


Recommended Posts

publicado

Hola compañeros del foro,

 

Me gustaría que al seleccionar una hoja, no se pueda seleccionar ninguna celda de la hoja.

Para ello, estoy probando con el método "ActiveSheet.EnableSelection = xlNoSelection", pero no me funciona.

En cambio si protegemos la hoja, entonces si que funciona correctamente:

...  
      With ActiveSheet
         .Protect Password:=contraseña, _
                  DrawingObjects:=True, _
                  Contents:=True
         .EnableSelection = xlNoSelection
      End With
...

Pero yo no quiero proteger la hoja, simplemente quiero que no se pueda seleccionar ninguna celda (si es que se puede hacer eso...).

Agradezco cualquier tipo de ayuda. Un saludo.

publicado
Hace 7 horas, paikerr dijo:

Hola compañeros del foro,

 

Me gustaría que al seleccionar una hoja, no se pueda seleccionar ninguna celda de la hoja.

Para ello, estoy probando con el método "ActiveSheet.EnableSelection = xlNoSelection", pero no me funciona.

En cambio si protegemos la hoja, entonces si que funciona correctamente:


...  
      With ActiveSheet
         .Protect Password:=contraseña, _
                  DrawingObjects:=True, _
                  Contents:=True
         .EnableSelection = xlNoSelection
      End With
...

Pero yo no quiero proteger la hoja, simplemente quiero que no se pueda seleccionar ninguna celda (si es que se puede hacer eso...).

Agradezco cualquier tipo de ayuda. Un saludo.

Te podrá ayuda en algo:

http://www.cpearson.com/excel/unselect.aspx

publicado
En 5/8/2020 at 5:22 , paikerr dijo:

Pero yo no quiero proteger la hoja, simplemente quiero que no se pueda seleccionar ninguna celda (si es que se puede hacer eso...).

¿Suena contradictorio, entonces para que tienes esa hoja, si no necesitas seleccionar ninguna celda, cual es el real motivo?

publicado

Lo más parecido a lo que buscas es esto, o sea, proteger la hoja contra selección.

With Sheets("Hoja1")
 .EnableSelection = xlNoSelection
 .Protect
End With

 

publicado
En 7/8/2020 at 10:14 , Antoni dijo:

Lo más parecido a lo que buscas es esto, o sea, proteger la hoja contra selección.


With Sheets("Hoja1")
 .EnableSelection = xlNoSelection
 .Protect
End With

 

Efectivamente, eso es lo que hago.

Muchas gracias, simplemente quería saber si es posible realizar esta acción.

 

Saludos.

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.