Innehållsförteckning
Ändra storlek på objekt till intervallstorlek i VBA
Du kan storleksanpassa ett objekt som Bilder, Autoshapes och diagram för att ha samma storlek som ett område. För att göra detta, ställ in objekten .Left .Top .Width och .Hight -egenskaper som motsvarar respektive egenskaper för ett intervall.
Följande exempel storleksanpassar ett diagram till intervallet B2: D6
VBA -koden som används för att åstadkomma detta:
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
