Excel将同时选中的工作表编成工作组,并以刚开始的活动工作表为组中的活动工作表。 Array函数创建一个数组。 Select方法有一个可选的参数Replace,当指定该参数值为True时,使用指定的工作表代替当前的工作表成为活动工作表。 例如,当前工作表为Sheet2,运行下面的语句: Sheets("Sheet3").SelectTrue 工作表Sheet3将成...
下面的代码同时选择第1个和第3个工作表: Sub SelectMultiSheets1() Worksheets(Array(3, 1)).Select End Sub 3.选择所有工作表: 如果工作簿中不包含图表工作表、对话框工作表,下面的代码可以同时选择所有的工作表: Sub SelectAllSheets() Dim ws As Worksheet For Each ws In ActiveWorkbook.Sheets ws.Select...
代码四： Sub MySelectSheets4()Worksheets.Select End Sub 代码五： Sub MyArraySheets5()Worksheets(Array(1, 2, 3)).Select End Sub 代码解析：a) MySelectShs过程遍历工作表并使用带参数的Select方法选中所有工作表。应用于Worksheet对象的Select方法的语法如下：Select(Replace)参数Replace是可选的。如果该...
Select是指选定对象,Activate是指激活对象。 Select可以同时选定多个对象,但Activate只能激活一个对象。 '可以同时选择3个工作表 ActiveWorkbook.Sheets(Array(1,2,3)).Select '不能同时激活3个工作表,执行会提示错误 ActiveWorkbook.Sheets(Array(1,2,3)).Activate 即对于工作表对象,select方法可以选择多个工作表,而...
在VBA中，Sheets(Array("sheet1", "sheet2", "sheet3")).Select，这个写法就是正确的啊
VBA中的Activate方法和Select方法看起来似乎相同，其实二者是有区别的。Activate方法的作用是激活，而Select方法的作用是选择。其区别如下：1.对于“Sheets”对象 Sheets.Select可以同时选择多个工作表，而Sheets.Active不能同时激活多个工作表。如下面的语句：Sub Test1()ActiveWorkbook.Sheets(Array(1, 2, 3...
Sheets("SHEET4").Select Arr = Array("大象", "老虎", "狮子", "狐狸")Set MyRange = Range("A1")Set MyRange = MyRange.Resize(1, UBound(Arr) + 1)MyRange.ClearContents MyRange.Value = Arr MsgBox "ok!"End Sub 代码截图：代码讲解：上述代码首先从Arr = Array("大象", "老虎", "狮子"...
Sheets("Sheet7").Select Range("i2 : I3000").ClearContents i = 2 Do While Cells(i, "h") <> "" UU = Cells(i, "h") For t = 1 To n Set FJX = Sheets(WSArray(t)).Columns("A").Find(UU, lookat:=xlWhole) If Not FJX Is Nothing Then Cells(i, "i") = Cells(i, "i")...
23 ActiveSheet.Move After:=ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count) 将当前工作表移至工作表的最后 24 Worksheets(Array(“sheet1”,”sheet2”)).Select 同时选择工作表1和工作表2 25 Sheets(“sheet1”).Delete或 Sheets(1).Delete 删除工作表1 26 ActiveWorkbook.Sheets(i).Name ...
或:Application.Goto (ActiveWorkbook.Sheets("Sheet2").Range("E6")) 也可以先激活该工作表,然后再选择: Sheets("Sheet2").Activate ActiveSheet.Cells(6, 5).Select 如何选择不同工作簿中的单元格? 例如,要选择另一工作簿中的一个工作表上的单元格F7,可以使用下面的代码: ...