如何在总课表中提取个人课表

怎样用VBA从总课程表中提取个人课表 有以下方法

1.首先，了解主要课程的内容。第一行是主目录，第二行是日期，第一列是时间，然后是细节。整个excel分为两页，第一页是主课程表，第二页是个人课程表。

2.新建sheet3，复制sheet1，然后明确内容，也就是复制框架，然后插入函数B3=IF(总课程表！B3=物理，1，0)，在excel中，如果IF函数的意义匹配值为真，则显示1，如果为假，则显示0。在整个课程表中拖拽复制这个函数，你会发现两个地方显示1，其余显示0。

3.通过对比主课程，你会发现sheet3中显示1的两个地方正好是物理课程。这种方法是按功能搜索个人课程，需要个人修改1或0，比较繁琐。

4.我们将sheet2更改为个人课程表，在指定位置单击鼠标右键，然后在菜单栏中选择[查看代码]。这一步将打开VBA编辑框。

5.在VBA编辑框中，选择[个人课程表]，一般模式请使用[工作表]，触发模式请使用BeforeDoubleClick。请注意，你应该有一些VBA常识。例如，cells函数表示单元格的值，cells(7，3)引用第7行的第三列。每一行代码都应该以英文冒号:结尾，这是基本的VBA常识。输入private sub workshop _ before双击(byval target作为范围，cancel作为布尔)sheet2.cells (7，3) = physics: Sheet2。单元格(3，6) = physics: Sheet2。细胞(11，5) =梳理:

6.保存并关闭VBA编辑框。执行完毕后，返回主excel，就可以看到结果了。周二周五有课，周四晚自习，其他都是空。通过比较主课程，这意味着VBA代码是正确的！