Posicion relativa de botones de comando, URGENTE!!

30/05/2007 - 18:17 por Carolina A. | Informe spam
Hola a todos, por fa necesito que me ayuden con un problema, necesito
poner un boton de comando al final de una tabla dinámica, pero por
obvias razones el largo de la tabla dinamica variía continuamente...al
poner el boton y cambiar el numero de filas de la tabla dinamica el
boton de comando se queda en la posicion en que lo creé..necesito que
este siempre quede ubicado al final de la tabla, sea cual sea el
numero de filas...como puedo hacer esto??? ya intenté acerlo por
format control > properties (con todas las opciones que existen
allí) y no he podido arreglar mi problema. gRACIAS!
 

Leer las respuestas

#1 David
30/05/2007 - 19:38 | Informe spam
Hola, Carolina.

Primero,
supongamos que tu tabla dinámica principia en la celda A3 de la "Hoja2", y
termina en la fila 9. En alguna celda de tu hoja (voy a suponer que es D1),
puedes ingresar una fórmula como la siguiente:

=CONTARA(A:A)+4

Esto te daría como resultado 11, que sería la posición para tu botón.
Cuando modifiques el diseño de tu tabla dinámica, D1 siempre te calculará la
fila en la cual debería ir tu botón.



Segundo,
Averigüemos el nombre de tu botón. Haz clic derecho en él, y anota lo que
aparece en el Cuadro Nombre, poniendo especial cuidado en las tildes y los
espacios. Supondré que el nombre fue "Botón 1".



Tercero,
Ahora hagamos una macro que detecte la distancia en puntos de la fila
encontrada en la celda D1, y la asigne a la posición superior (TOP) de tu
botón:

Sub prueba()
Set mydocument = Worksheets("Hoja2")
mydocument.Shapes("Botón 1").Top = Range("A" & Range("D1").Value).Top
End Sub



Cuarto,
Para finalizar, cuando actualices tu tabla dinámica, se dispara el evento
Worksheet_Change de la hoja. Puedes utilizarlo para hacer automático el
cambio de posición de tu botón. Haces clic derecho en el separador de la
hoja, seleccionas "Ver código" y pegas lo siguiente:

Private Sub Worksheet_Change(ByVal Target As Range)
prueba
End Sub



Espero que esto te ayude. Siempre comenta los resultados que obtengas.

Saludos.




"Carolina A." escribió:

Hola a todos, por fa necesito que me ayuden con un problema, necesito
poner un boton de comando al final de una tabla dinámica, pero por
obvias razones el largo de la tabla dinamica variía continuamente...al
poner el boton y cambiar el numero de filas de la tabla dinamica el
boton de comando se queda en la posicion en que lo creé..necesito que
este siempre quede ubicado al final de la tabla, sea cual sea el
numero de filas...como puedo hacer esto??? ya intenté acerlo por
format control > properties (con todas las opciones que existen
allí) y no he podido arreglar mi problema. gRACIAS!


Preguntas similares