Spremenite velikost predmeta na velikost območja v VBA
Objekt, kot so Slike, Samodejne oblike in Karte, lahko spremenite v enako velikost kot obseg. Če želite to narediti, nastavite lastnosti .Left .Top .Width in .Height lastnosti, enake ustreznim lastnostim obsega.
Naslednji primer meri grafikon v obseg B2: D6
Koda VBA, uporabljena za to:
Sub SizeChart2Range () Dim MyChart As Chart Dim MyRange As Range Set MyChart = ActiveSheet.ChartObjects (1) .Carrt Set MyRange = Sheet1.Range ("B2: D6") z MyChart.Parent .Left = MyRange.Lef .Top .Top .Width = MyRange.Width .Height = MyRange.Height End With End Sub
