清空第二个工作表。
可以使用Resize属性，例如：
（1）ActiveCell．Resize（4， 4），表示自当前单元格开始创建一个4行4列的区域。
（2）Range（“B2″）．Resize（2， 2），表示创建B2：C3单元格区域。
（3）Range（“B2″）．Resize（2），表示创建B2：B3单元格区域。
（4）Range（“B2″）．Resize（， 2），表示创建B2：C2单元格区域。
扩展资料
例1：要选择当前工作表中名为“Database”区域，然后将该区域向下扩展5行，可以使用下面的代码：
Range（＂Database＂）．Select
Selection．Resize（Selection．Rows．Count＋5，Selection．Columns．Count）．Select
例2：选择名为“Database”区域下方4行右侧3列的一个区域，然后扩展2行和1列，可以使用下面的代码：
Range（＂Database＂）．Select
Selection．Offset（4，3）．Resize（Selection．Rows．Count＋2，Selection．Columns．Count＋1）．Select