更新：2007 年 11 月
允许在新范围上调整 ListObject 控件的大小。
命名空间： Microsoft.Office.Tools.Excel
程序集： Microsoft.Office.Tools.Excel.v9.0（在 Microsoft.Office.Tools.Excel.v9.0.dll 中）
语法
声明
Public Sub Resize ( _
Range As Range _
)
用法
Dim instance As ListObject
Dim Range As Range
instance.Resize(Range)
public void Resize(
Range Range
)
参数
Range
类型：Microsoft.Office.Interop.Excel.Range列表的新范围。
备注
此属性未插入或移动任何单元格。
标题必须保留在同一行中，得到的列表必须与原始列表重叠。该列表必须包含一个标题行和至少一个数据行。
对于链接到运行 Microsoft Windows SharePoint Services 的服务器的列表，可以调整该列表的大小，方法是提供一个 Range 参数，该参数仅在其所包含的行数方面不同于 ListObject 的当前范围。如果尝试通过（在 Range 参数中）添加或删除列来调整链接到 Windows SharePoint Services 的列表的大小，则将导致运行时错误。
示例
下面的代码示例在当前的工作表上创建一个 ListObject，然后调用 Resize 方法以增大 ListObject 的大小。
此示例针对的是文档级自定义项。
Private Sub ListObject_Resize()
Dim List1 As Microsoft.Office.Tools.Excel.ListObject = _
Me.Controls.AddListObject(Me.Range("A1", "D4"), "List1")
If DialogResult.Yes = MessageBox.Show("Resize the ListObject?", _
"Test", MessageBoxButtons.YesNo) Then
List1.Resize(Me.Range("A1", "H4"))
End If
End Sub
private void ListObject_Resize()
{
Microsoft.Office.Tools.Excel.ListObject list1 =
this.Controls.AddListObject(this.Range["A1", "D4"], "list1");
if (DialogResult.Yes == MessageBox.Show("Resize the ListObject?",
"Test", MessageBoxButtons.YesNo))
{
list1.Resize(this.Range["A1", "H4"]);
}
}
权限
- 对直接调用方的完全信任。此成员不能由部分信任的代码使用。有关更多信息，请参见通过部分受信任的代码使用库。