创建Excel图表时，作为要放置在工作表中的对象，图表对象的大小会自动调整为适合屏幕大小的四分之一。您可能不希望图表对象具有此特定大小。例如，您可能希望图表对象始终为标准大小，因此它们相对于工作表始终显示为相同大小。

创建图表时，无法指定图表对象的大小。但是，您可以在创建图表对象后调整其大小，就像您可以调整工作表中其他图形元素的大小一样。您可以编写一个宏来以特定大小创建对象，但是这样做会消除图表向导固有的许多灵活性。例如，当您指定要创建的图表对象的大小时，还必须指定其他特征，例如图表类型。通过图表向导选择和选择此类特征要比在宏中进行选择容易。

但是，您可以轻松创建一个宏，该宏将调整现有图表对象的大小。这样的宏的关键命令将是更改图表对象的Width和Height属性。在VBA中，这些属性以磅为单位指定。因此，如果要调整图表对象的大小使其高4英寸，则可以将Height属性设置为288，即4英寸（4 * 72）中的点数。

下面的宏给出了一种逐步浏览工作表上所有图表对象并使它们具有相同大小的方法的示例。

Sub ResizeCharts()

For j = 1 To ActiveSheet.Shapes.Count         If ActiveSheet.Shapes(j).Type = msoChart Then             ActiveSheet.Shapes(j).Width = 4  72             ActiveSheet.Shapes(j).Height = 3  72         End If     Next j End Sub

此特定宏将每个图表对象的宽度设置为4英寸，将高度设置为3英寸。

注意：

如果您想知道如何使用此页面（或_ExcelTips_网站上的任何其他页面）中描述的宏，我准备了一个特殊页面，其中包含有用的信息。

点击此处在新的浏览器标签中打开该特殊页面。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧（2208）适用于Microsoft Excel 97、2000、2002和2003。可以在以下功能区中为Excel的功能区界面（Excel 2007及更高版本）找到本技巧的版本：

指定图表对象的大小。