怎样从下面这张EXCEL表中提取单个老师的周课程表?
打开课程表工作表，按 Alt + F11 ，进入的代码编辑页面，将下面的代码贴入，鼠标点在代码中间位置，按 F5 运行代码
-----------------------
Sub aaa()
'复制标题行和列，将含有特定内容的单元格筛选到新表
Dim ra As Range, c As Range
Dim ar As Integer, ac As Integer
Dim stnm As String, nm As String
nm = "9" '将“9”改为要提取的老师的名字
stnm = "Sheet1" '将“Sheet1”改为数据源表（即课程表工作表）的表名
'Do While Worksheets(1).Name Worksheets(stnm).Name
' MsgBox "删除工作表：" Worksheets(1).Name '提示删除工作表
' Application.DisplayAlerts = False
' Worksheets(1).Delete
' Application.DisplayAlerts = True
'Loop
ar = Worksheets(stnm).UsedRange.Rows.Count
ac = Worksheets(stnm).UsedRange.Columns.Count
Worksheets.Add before:=Worksheets(1)
'MsgBox "已创建新工作表：" Worksheets(1).Name '提示新建工作表
Worksheets(stnm).Range(Cells(1, 1), Cells(1, ac)).Copy Worksheets(1).Cells(1, 1)
Worksheets(stnm).Range(Cells(1, 1), Cells(ar, 1)).Copy Worksheets(1).Cells(1, 1)
Application.CutCopyMode = False
'MsgBox Worksheets(stnm).Name " " ar " " ac '提示数据源表的有效数据区域
With Worksheets(stnm).Range(Cells(2, 2), Cells(ar, ac))
Set c = .Find(nm, LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
c.Copy Worksheets(1).Cells(c.Row, c.Column)
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address firstAddress
Else
MsgBox "在表" Worksheets(stnm) "中没有找到“" nm "”"
Exit Sub
End If
End With
Worksheets(1).Activate
End Sub
---------------------
注：
nm = "9" '将“9”改为要提取的老师的名字
stnm = "Sheet1" '将“Sheet1”改为数据源表（即课程表工作表）的表名
效果图在我的空间
有其他问题Hi我
怎样用excel从教师课表和班级课表提取对应内容到查询课表里面？
在 Excel 中，您可以使用以下方法来从教师课表和班级课表提取对应内容到查询课表中：
1、将教师课表和班级课表数据复制到 Excel 工作簿的不同工作表中。
2、在查询课表工作表中，使用 VLOOKUP 函数来查询教师课表或班级课表。VLOOKUP 函数可以在一个表格中查找特定的信息，并返回与该信息相对应的其他信息。
例如，假设您希望从教师课表中提取某位教师的课程信息，并将其显示在查询课表中。您可以使用以下 VLOOKUP 函数：
=VLOOKUP(A2, '教师课表'!A:C, 3, FALSE)
其中，A2 是在查询课表中指定的教师名称，'教师课表'!A:C 指的是教师课表中包含教师名称、课程名称和其他信息的列，3 指的是课程名称所在的列，FALSE 指的是精确匹配。
3、将 VLOOKUP 函数复制到查询课表中的其他单元格中，即可根据指定的教师名称或班级名称提取其他相关信息。
注意：在使用 VLOOKUP 函数时，请务必确保查询表中的数据与查询表中的数据类型匹配。例如，如果查询课表中的数据类型为数字，则查询表中的数据也应为数字。否则，VLOOKUP 函数可能无法正常工作。
此外，您还可以使用 INDEX 和 MATCH 函数来提取数据。这两个函数可以帮助您查找特定的信息，并返回与该信息相对应的其他信息。例如，您可以使用以下函数来查询教师课表中某位教师的课程信息：
=INDEX('教师课表'!C:C, MATCH(A2, '教师课表'!A:A, 0))
其中，A2 是在查询课表中指定的教师名称，'教师课表'!A:A 和 '教师课表'!C:C 分别指的是教师课表中包含教师名称和课程名称的列，0 指的是精确匹配。
通过使用这些函数，您就可以轻松地从教师课表和班级课表提取对应内容到查询课表中。
如何从excel总课程表中分离个人课程表
1、首先在excel表格中打开有姓名和课表的文件，需要在其中分离“张二”的个人课表。
2、然后选中“姓名”单元格，并点击表格上方工具栏中的“排序和筛选”，选中“筛选”按钮。
3、即可在选中的单元格中添加筛选按钮，点击“姓名”右侧的下拉按钮。
4、即可打开筛选的选项框，勾选需要分离的“张二”的名称，点击确定按钮。
5、即可将“张二”的个人课表分离出来了，可以对个人课表进行复制粘贴到新表格的操作。
excel怎样在一张课表中 筛选出一张没课的教室表
这个可以利用高级筛选来实现
1、在单元格中输入筛选条件为“=”（不加引号，=后面不要输入任何数字）将周一至周五的条件都设置为“=”，但是要注意排在不同行中
如：
周一 周二 周三 周四 周五
=
=
=
=
=
2、执行：数据--筛选--高级筛选…
3、列表区域为课程表的单元格区域；条件区域应选择筛选条件所在的单元格区域
确定就可以了！
比如示例中我挑选出“姓名”和“政治面貌”为空的记录！
看一下吧？祝你成功！
怎么从总课表中提取教师个人课表
1.新建一个excel表格，打开工作表
2.选中A1~F10的单元格，接下来对其进行边框设置。右键-单元格设置
3.修改表格行宽与列高，可通过鼠标拖动实现。选中1~10行，可以等高度设置行，选中A~F列，可以等宽度设置行。
4.绘制excel表头。插入-图片-自选图形-线条-直线，并进行绘制。
5.表头填充内容。插入-文本框，同时进行排版，分别输入自己想要的文字。
6.将表头内文本框的边框设置为无色。右键-设置文本框格式-颜色与线条-无线条颜色。