Satura rādītājs
Mainīt objekta izmēru diapazonā VBA
Varat izmērīt objektu, piemēram, attēlus, automātiskās formas un diagrammas, tādā pašā izmērā kā diapazons. Lai to izdarītu, iestatiet objektus .Left .Top .Width un .Height rekvizīti, kas vienādi ar attiecīgajiem diapazona rekvizītiem.
Šajā piemērā diagrammas izmēri ir diapazonā B2: D6
Lai to paveiktu, izmanto VBA kodu:
Sub SizeChart2Range () Dim MyChart As Diagramma Dim MyRange As Range Set MyChart = ActiveSheet.ChartObjects (1) .Chart Set MyRange = Sheet1.Range ("B2: D6") Ar MyChart.Parent .Left = MyRange.Left .Top = MyRhage. .Top .Width = MyRange.Width .Height = MyRange.Height End with End Sub
