Deshabilitar boton derecho

Hola dargento,

Creo que estas intentando atacar el problema por un lado erroneo. Yo que tu,
intentaria solucionar lo de "...ya que sino no me deja asignar macros en
ejecucion..." Si das mas detalle del problema que encuentras al correr tu
codigo en una hoja cuyos objetos estan protegidos, intentaremos darte una
solucion. De momento decirte que con los objetos protegidos no tengo
problemas en asignar codigo OnAction a las autoformas. Ni siquiera es
necesario recurrir a:

ActiveSheet.Protect UserInterfaceOnly:=True

Saludos,
KL

"dargento" wrote in message
news:

Hola!
Tengo en una hoja excel unas autoformas, a las cuales las asigno unas
macros en ejecucion, segun quiero qe¡ue hagan unas cosas u otras.Pero
mi problema es que no quiero que cualquier usuario al dar al boton
derecho sobre ellas me las pueda borrar,copiar,etc..
Tengo la hoja protegida,pero los objetos no, ya que sino no me deja
asignar macros en ejecucion.
Necesitaba no permitir al usuario utilizar el boton derecho del raton
cuando este en esas autoformas,o en toda la hoja.En visual basic
claro.
Muchas gracias


dargento

dargento's Profile: http://www.msusenet.com/member.php?userid47
View this thread: http://www.msusenet.com/t-1870586151

Hola dargento

Teclea esto en el código de la hoja en la que quieres deshabilitar el botón
derecho.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, _
Cancel As Boolean)
Cancel = True

End Sub

Esto está en la referencia de vba de excel que se puede descargar de las
páginas de microsoft.

Un saludo

Pues, es que yo protego la hoja con todo, y luego desde visual basic
intento asignar una macro con el metodo onaction, y me dice que no e
posible, ya que primero hago:
Activesheet.shapes("Autoforma 11").select
selection.onaction = "macro1"
Y no me deja, me dice que la propiedad usada de select se us
invalidamente.
¿Que hago?


KL Wrote:

Hola dargento,

Creo que estas intentando atacar el problema por un lado erroneo. Y
que tu,
intentaria solucionar lo de "...ya que sino no me deja asignar macro
en
ejecucion..." Si das mas detalle del problema que encuentras al corre
tu
codigo en una hoja cuyos objetos estan protegidos, intentaremos dart
una
solucion. De momento decirte que con los objetos protegidos no tengo
problemas en asignar codigo OnAction a las autoformas. Ni siquiera es
necesario recurrir a:

ActiveSheet.Protect UserInterfaceOnly:=True

Saludos,
KL

"dargento" wrote in message
news:
>
> Hola!
> Tengo en una hoja excel unas autoformas, a las cuales las asign
unas
> macros en ejecucion, segun quiero qe¡ue hagan unas cosas
otras.Pero
> mi problema es que no quiero que cualquier usuario al dar al boton
> derecho sobre ellas me las pueda borrar,copiar,etc..
> Tengo la hoja protegida,pero los objetos no, ya que sino no me deja
> asignar macros en ejecucion.
> Necesitaba no permitir al usuario utilizar el boton derecho de
raton
> cuando este en esas autoformas,o en toda la hoja.En visual basic
> claro.
> Muchas gracias
>
>
> dargento


> dargento's Profile: http://www.msusenet.com/member.php?userid47
> View this thread: http://www.msusenet.com/t-1870586151

dargent
dargento's Profile: http://www.msusenet.com/member.php?userid4
View this thread: http://www.msusenet.com/t-187058615

"Juan" escribió en el mensaje news:%

Hola dargento

Teclea esto en el código de la hoja en la que quieres deshabilitar el botón
derecho.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, _
Cancel As Boolean)
Cancel = True

End Sub

Esto está en la referencia de vba de excel que se puede descargar de las
páginas de microsoft.

Un saludo

Eso valdría para las celdas de la hoja, pero (que yo sepa) el evento no se disparará al pulsar con el botón derecho sobre una autoforma, sino que aparecerá el menú contextual de la misma.
Un saludo.


Fernando Arroyo
MS MVP - Excel

No creo que necesites seleccionar nada. Por ejemplo:

ActiveSheet.Shapes("Autoforma 11").OnAction = "macro1"

debería funcionar.
Un saludo.


Fernando Arroyo
MS MVP - Excel


"dargento" escribió en el mensaje news:

Pues, es que yo protego la hoja con todo, y luego desde visual basic,
intento asignar una macro con el metodo onaction, y me dice que no es
posible, ya que primero hago:
Activesheet.shapes("Autoforma 11").select
selection.onaction = "macro1"
Y no me deja, me dice que la propiedad usada de select se usa
invalidamente.
¿Que hago?


KL Wrote:
> Hola dargento,
>
> Creo que estas intentando atacar el problema por un lado erroneo. Yo
> que tu,
> intentaria solucionar lo de "...ya que sino no me deja asignar macros
> en
> ejecucion..." Si das mas detalle del problema que encuentras al correr
> tu
> codigo en una hoja cuyos objetos estan protegidos, intentaremos darte
> una
> solucion. De momento decirte que con los objetos protegidos no tengo
> problemas en asignar codigo OnAction a las autoformas. Ni siquiera es
> necesario recurrir a:
>
> ActiveSheet.Protect UserInterfaceOnly:=True
>
> Saludos,
> KL
>
> "dargento" wrote in message
> news:
> >
> > Hola!
> > Tengo en una hoja excel unas autoformas, a las cuales las asigno
> unas
> > macros en ejecucion, segun quiero qe¡ue hagan unas cosas u
> otras.Pero
> > mi problema es que no quiero que cualquier usuario al dar al boton
> > derecho sobre ellas me las pueda borrar,copiar,etc..
> > Tengo la hoja protegida,pero los objetos no, ya que sino no me deja
> > asignar macros en ejecucion.
> > Necesitaba no permitir al usuario utilizar el boton derecho del
> raton
> > cuando este en esas autoformas,o en toda la hoja.En visual basic
> > claro.
> > Muchas gracias
> >
> >
> > dargento
> >
>
> > dargento's Profile: http://www.msusenet.com/member.php?userid47
> > View this thread: http://www.msusenet.com/t-1870586151
> >


dargento

dargento's Profile: http://www.msusenet.com/member.php?userid47
View this thread: http://www.msusenet.com/t-1870586151