本示例将删除工作表 Sheet1 上单元格区域 A1:D10 。

ActiveWorkbook.Worksheets("Sheet1").Range("A1:D10").Delete