Mantener un botón pulsado.

Hola Héctor.

Sigo sin conseguir que funcione. El problema, creo yo, es que la macro
asociada al botón no se ejecuta hasta que este se suelta...

Seguiré investigando.

Saludos.

César.

"César" wrote:

Hola Héctor.

Gracias de nuevo por tu interés.

Probaré y ya te cuento.

Saludos, César.

"Héctor Miguel" wrote:

> hola, César !
>
> > He probado tu solucion pero no consigo adaptarla a lo que busco.
> > Tengo el siguiente codigo asociado a un boton de una barra de herramientas.
> > Al pulsarlo desplaza hacia abajo el titulo de una serie de un grafico.
> > Sub Etiquetas_Rotulos_Dw()
> > Set QueTitulo = Selection
> > QueSerie = Selection.Parent.PlotOrder
> > ActiveChart.SeriesCollection(QueSerie).Points(1).DataLabel.Select
> > Selection.Top = Selection.Top + 1
> > QueTitulo.Select
> > End Sub
> > Lo que busco es que el titulo se siga desplazando mientras este el boton pulsado.
> > Alguna idea?
>
> el 'detalle' es que en el codigo que expones no estas usando la funcion de las API's :))
> prueba incluyendo esa 'llamada' +/- como sigue:
>
> ' esta linea al inicio del mismo modulo donde ejecutas 'la macro' ...
> Private Declare Function GetAsyncKeyState Lib "User32" (ByVal vKey As Long) As Long
>
> Sub Etiquetas_Rotulos_Dw()
> Set QueTitulo = Selection
> QueSerie = Selection.Parent.PlotOrder
> ActiveChart.SeriesCollection(QueSerie).Points(1).DataLabel.Select
> DoEvents
> Do While GetAsyncKeyState(&H1)
> Selection.Top = Selection.Top + 1
> Loop
> QueTitulo.Select
> End Sub
>
> si cualquier duda [o informacion adicional]... comentas ?
> saludos,
> hector.
>
>
>

hola, César !

Sigo sin conseguir que funcione. El problema, creo yo, es que la macro asociada al boton no se ejecuta hasta que este se suelta...

es -casi- seguro que asi este sucediendo [sobre todo si el boton 'viene' de la barra de herramientas formularios] -?-
prueba incrustando un boton de la barra de herramientas 'cuadro de controles'
-> y usando el codigo expuesto en la primera propuesta en el modulo de la hoja donde incrustes el boton -?-

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.