EXCEL VBA指定sheet

Posted 2023-05-07

我写了以下2条语句：
Workbooks.Open Filename:="e:\文件.xlsx"
Sheets(2).Range("A2").Select
但始终选不到sheets(2),始终选的都是sheets(1).
我检查了sheets(2)的名称就是"sheets2"
请高人指教。

因为sheets(2)是第二个sheet，包含工作表、图表等在内的。
如果确定是第二个工作表，可以用worksheets(2)，或者直接用名字sheets("sheets2")。
再不然可以用sheets(2).codename看看工作表的名称然后直接用sheetx（不是name属性，是（名称）属性） 参考技术A Sheets(2)表示是由左至右第2个Sheets,不是等于Sheets("sheets2")的，如果前面有隐藏的Sheets也会计算在内的！如果你可以确认要指定的Sheets的名字，你可以把Sheets(2)改为Sheets("sheets2")。 参考技术B Sheets(2).Range("A2").Select在这句之前加一句
Sheets(2).activate 参考技术C Workbooks.Open Filename:="e:\文件.xlsx"
Worksheets("Sheets(2)").Select
Worksheets("Sheets(2)").Range("A2").Select 参考技术D 格式是这样的：sheets("sheet的名字")

Excel VBA 复制

将 Sheet1 复制到 Sheet3 后面时，实现方法如下：

Worksheets("Sheet1").Copy After:=Worksheets("Sheet3")

 

Worksheet.Copy 的使用语法如下：

         表达式 . Copy( Before, After )

        Before：在某Sheet之前插入

        After：在某Sheet之后插入

注意：上面的两个参数不能同时指定，当两个参数都没有指定时，该Sheet会被拷贝到一个新的工作簿中。

参考资料:

 https://msdn.microsoft.com/zh-cn/VBA/Excel-VBA/articles/worksheets-copy-method-excel