Změňte velikost objektu na velikost rozsahu ve VBA
Velikost objektu, jako jsou obrázky, automatické tvary a grafy, můžete změnit na stejnou velikost jako rozsah. Chcete -li to provést, nastavte vlastnosti .Left .Top .Width a .Height na stejné vlastnosti jako Range.
Následující příklad velikost grafu na rozsah B2: D6
K tomu byl použit kód VBA:
Sub SizeChart2Range () Dim MyChart As Chart Dim MyRange As Range Set MyChart = ActiveSheet.ChartObjects (1) .Chart Set MyRange = Sheet1.Range ("B2: D6") With MyChart.Parent .Left = MyRange.Left .Top = MyRange .Top .Width = MyRange.Width .Height = MyRange.Height End With End Sub
