VBA'da Nesneyi Aralık Boyutuna Göre Yeniden Boyutlandır
Resimler, Otomatik Şekiller ve Grafikler gibi bir nesneyi Aralık ile aynı boyutta olacak şekilde boyutlandırabilirsiniz. Bunu yapmak için, .Left .Top .Width ve .Height özelliklerini bir Aralığın ilgili özelliklerine eşit olarak ayarlayın.
Aşağıdaki örnek, bir Grafiği B2:D6 Aralığına göre boyutlandırır
Bunu gerçekleştirmek için kullanılan VBA kodu:
Sub SizeChart2Range() MyChart'ı Grafik Olarak Karartın MyRange As Range Set MyChart = ActiveSheet.ChartObjects(1).Chart Set MyRange = Sheet1.Range("B2:D6") MyChart.Parent ile .Left = MyRange.Left .Top = MyRange .Top .Width = MyRange.Width .Height = MyRange.Height End with End Sub
