Tabla de contenido
Cambiar el tamaño del objeto al tamaño del rango en VBA
Puede cambiar el tamaño de un objeto como Imágenes, Autoformas y Gráficos para que tenga el mismo tamaño que un Rango. Para hacer esto, establezca las propiedades .Left .Top .Width y .Height de los objetos iguales a las propiedades respectivas de un Range.
El siguiente ejemplo dimensiona un gráfico para el rango B2: D6
El código VBA utilizado para lograr esto:
Sub SizeChart2Range () Atenuar MyChart como gráfico Atenuar MyRange como rango Establecer MyChart = ActiveSheet.ChartObjects (1) .Chart Establecer MyRange = Sheet1.Range ("B2: D6") Con MyChart.Parent .Left = MyRange.Left .Top = MyRange .Top .Width = MyRange.Width .Height = MyRange.Height Fin con End Sub
