Змінити розмір об’єкта до розміру діапазону у VBA
Ви можете розмір такого об’єкта, як «Зображення», «Автофігури» та «Діаграми», мати такий же розмір, що і діапазон. Для цього встановіть властивості об’єктів.
У наведеному нижче прикладі діаграма відповідає діапазону В2: D6
Для цього використовується код VBA:
Sub SizeChart2Range () Зменшити MyChart як діаграму Dim Dim MyRange як діапазон Установити MyChart = ActiveSheet.ChartObjects (1). Набір діаграм MyRange = Sheet1.Range ("B2: D6") З MyChart.Parent .Left = MyRange.LeR .Top. .Top .Width = MyRange.Width .Height = MyRange.Height End With End Sub
