VBA 中两个代码如何先后启动？ vba常用代码实战大全
如何使用VBA打开另一个EXCEL并在另一个文件上运行该文件的模块1
用OPEN方法打开另一文件，然后直接操作另一个文件即可
VBA中代码选择另一个工作簿怎么写
这个不用VBA就能解决，但我想，没必要分5个工作簿，这个功能太简单了，我能做到选择年级进行筛选，这个筛选不是什么向下的箭头什么的，是你点击一个单元格就能选择年级，选择完年级就能看到相应的，如果你要给别人发过去不同年级的，同时不想让别人看到你的总表，那么我给你提供几个方案，建立登陆系统，只有你有权限查看更改总表，或者利用公文包进行网络共享，在一个就算分开工作簿也没必要用VBA，直接外联工作簿就行，非常简单，首先，你需要建立一个新的工作簿可以命名为一年级，打开这个新建立的，点击A1单元格输入“=”，然后打开你的总表，点击A1这样，一年级的A1就等于总表A1了，拖拉全部都是了，用查找替换功能将公式变成半绝对引用，设置密码加锁，然后再一年级工作簿建立一个一年级工作表，建立查找公式组，这样，就完成了一年级的建立，当然，公式变种方式非常非常多，大概就这个思路，但你想在打开状态提示更新信息到时需要VBA，例如你可以写一个重新计算所有公式的一个VBA代码，然后再在工作簿添加关闭自动保存代码就行了，只要你关闭了他就自动保存了，再打开会提示你要不要更新，点击更新就更新，不点击就会保留状态，点击按钮或者再打开就会得到更新提示或更新总结：换一种思路，一样很方便，建议用VBA实现一些既简单又恶心的功能，例如保存了，例如重新计算公式了（虽然EXCEL自带计算按钮）
Excel的VBA循环代码
通常有下面一些循环语句：
1、For ... Next
如： For i=1 to 100
Cells(i,1)=1
Next
2、Do Until .... Loop
如： i=1
Do Until i=100
Cells(i,1)=i
i=i+1
Loop
3、Do Where ... Loop
如： i=1
Do Where i<=100
Cells(i,1)=i
i=i+1
Loop
vba代码中，如果引用一张已打开的工作薄，怎么写程序，防止重复打开
给你介绍两种方法：
1、遍历所有工作簿，然后用工作簿名进行比较判断，代码如下
For I = 1 To Workbooks.Count
If Workbooks(I).Name = "要比较的工作簿名称.xlsx" Then Exit For
Next
If I > Workbooks.Count Then Workbooks.Open ("带路径的文件名")
2、设置一个工作簿对象变量，直接将工作簿赋值给变量看结果，代码如下：
Dim Wo As Workbook
On Error Resume Next
Set Wo = Workbooks("要比较的工作簿名称.xlsx")
If Wo Is Nothing Then Workbooks.Open ("带路径的文件名")