Ændre størrelsen på et objekt til en områdestørrelse - eksempler på VBA -kode

Ændre størrelse på objekt til områdestørrelse i VBA

Du kan størrelse et objekt som Billeder, Autoshapes og Diagrammer til at have samme størrelse som et område. For at gøre dette skal du indstille objekterne .Left .Top .Width og .Hight egenskaber svarende til de respektive egenskaber for et område.

Følgende eksempel størrelser et diagram til området B2: D6

VBA -koden, der bruges til at opnå dette:

UnderstørrelseChart2Range () Dim MyChart As Chart Dim MyRange As Range Indstil 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