Urgente! ¿Como mover un boton con la ubicacion de la celda?

14/12/2004 - 13:08 por gema.bernardo | Informe spam

La forma en la que añado un boton en la celda E3 es la siguiente:

Ubicacion = "E3"

Izquierda = .Range(Ubicacion).Left
Arriba = .Range(Ubicacion).Top
Ancho = .Range(Ubicacion).Width
Alto = .Range(Ubicacion).Height

ActiveWorkbook.Unprotect C_PWD
DesprotegerHoja (.name)

Set bt = .Buttons.Add(Izquierda, Arriba, Ancho, Alto)
bt.Font.Color = &HD5D5D5
bt.OnAction = macro
'bt.Placement = xlMove
'bt.Placement = xlFreeFloating
bt.Placement = xlMoveAndSize
bt.PrintObject = True

Pero cuando edito para hacer un cambio en cualquier otra celda del
documento, se hace un autofit de las columnas que no tienen boton y a las
de boton siempre les adjudico ancho de columna 10 y ancho de fila 20.

Mi probema es que aunque le pongo la propiedad bt.Placement xlMoveAndSize el boton, queda fuera de la celda.

No se si influye que la hoja tenga inmovilizados los paneles y el scroll.

Alguien sabe decirme una solucion????

Muchas Gracias.

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

Urgente... (OT) sobre SQL express . ALguien lo tiene en produccion y como puedo mover la ubicacion fisica de las BD....

Leer las respuestas

#1 Héctor Miguel

15/12/2004 - 06:54 | Informe spam

hola, gema !

... añado un boton en la celda [...]
... cuando edito ... otra celda ... se hace un autofit de las columnas que no tienen boton [...]
... aunque le pongo la propiedad bt.Placement = xlMoveAndSize el boton, queda fuera de la celda.
... si influye que la hoja tenga inmovilizados los paneles y el scroll [...]

he 'jugado' con las situaciones que expones y... NO me ha sido posible 'reproducir la perdida de ubicacion' -?-
'me da la impresion' de que [probablemente y quizas en 'otra/s parte/s del codigo]...
estas 'ajustando medidas' [botones/celdas] a otras propiedades 'de pantalla' [como zoom/resolucion/etc.] -?-
lo que pudiera 'dar la impresion' de que el boton sigue 'encuadrado en su celda', pero... [no 'realmente']

¿comentas?
saludos,
hector.

Responder a este mensaje

#2 gemabm

15/12/2004 - 09:22 | Informe spam

OK.. Héctor Miguel gracias por intentarlo.

Al final parece que he conseguido mantenerlos fijos. El problema es que
despues de hacer autofit, disminuia, por error, el tamaño de la celda y
el boton se quedaba desplazado.

Un saludo,
Gema.

Héctor Miguel wrote: