Question

我有以下问题。我有相对大量的Excel图表，我希望能够自动更改图表的大小（即宽度和高度）。通过自动我的意思是：我有两个单元格，一个用于高度，一个用于宽度，当我更改它们时，图表会自动更改，而不必按任何其他按钮或任何其他内容。例如，单元格A1的宽度值为100，单元格B1的高度值为200。因此，当我将A1更改为200而B1更改为300时，我的所有图表都会变大。

我到目前为止所做的是能够遍历所有图表并更改形状，但我需要先按一个按钮才能运行我的宏。我想知道是否有办法改变图表的形状而不必按任何按钮，只需更改具有图表宽度和高度的两个单元格的值。提前谢谢。

Answer 1

在vbaproject中，打开microsoft excel对象，然后选择你的A1：B1所在的工作表。然后写

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Target.Worksheet.Range("A1:B1")) Is Nothing Then
'put your macro here'
    End If
End Sub

这样，每当A1或B1中的某些内容发生变化时，您就可以运行宏。小心你在A1或B1中写的内容，你应该在运行宏之前对这些值进行一些检查

在excel中动态更改图表

1 个答案: