Inhoudsopgave
Formaat van object wijzigen in bereikgrootte in VBA
U kunt een object zoals Afbeeldingen, Autoshapes en Charts dezelfde grootte geven als een bereik. Stel hiervoor de objecten .Left .Top .Width en .Height in op de respectievelijke eigenschappen van een Range.
Het volgende voorbeeld past een grafiek aan op het bereik B2:D6
De VBA-code die wordt gebruikt om dit te bereiken:
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