在大学里，学生们通常会称呼他们的老师为“老师”或“教授”，而老师之间则互称“教授”。这种称呼方式体现了对知识和学术地位的尊重。但有时候，由于身份地位或关系亲密等原因，学生们也会使用一些非正式的称呼来表示对老师的尊重和爱戴。这些非正式的称呼方式可能包括“您”、“您们”、“人家”、“人家们”等。然而，在正式场合中，学生应该使用更为正式的称呼方式来表示尊重。
-
-
大学里同事教师之间都称呼老师可以、大学里的教师分为、助教、讲师、副教授和教授四种，一般都叫做老师。只有副教授和教授才可以叫做教授。
大学里教师的职称分为助教、讲师、副教授、教授四个级别。；因此也可以根据职称来称呼，这样才尊重。
大学教师职称概述：
（1）助教。
新教师在未受聘为讲师以前先从事一年或一年以上的教学辅助工作，以熟悉大学的基本教学条件和教学的组织。助教也可以由正在攻读博士学位的研究生担任。在很多国家都由博士研究生承担助教的工作，而不再专门设置助教这一级别的教职。
助教的主要任务是协助教学。助教辅助大学教育的主导方面是协助由教授和学生共同构成的课程教学系统正常工作。
他的工作方式主要呈现为两种：一种是协助教授工作；另一种是协助一门课程的展开，而这门课程可能是由多个教授共同承担，也可能是由教授指导，由助教本人开设的。教授从自己的研究生里挑选两位来协助备课、整理资料和组织课堂教学，这种是最初级的“助教”。
（2）讲师。
能够独立开设一门或一门以上课程的大学教师。讲师也有不同的等级。优秀的讲师完全可以把他的课程开设成对本门学科有巨大贡献的基础课，而他的教学方法、实验方法和基本规范将成为学生必修的一级台阶，借以达到大学教育的基本要求。
讲师也可以做一些初级的工作，基本上是去填补教授和副教授正常教学所遗留下来的空缺，来使整个教学系统趋于完善。另外，常常有这样的情况，一些完整的教学单位，会特聘讲师来讲授一些自己的教授不能承担而学生又必须学习的课程。 -
大学老师的称呼。直接就是姓加上老师。有的是教授就姓加教授
-
一般是称呼老师，你也可以称呼辅导员
-
大学老师的话，你直接称呼某某老师不就行了。
一般来说，你不用称呼其他的，直接还是以师生之间的称呼进行，没有必要搞那么复杂，也别搞那么亲密。 -
大学的老师称呼老师好，称呼老师会比称呼教授好。
几乎所有的大学老师都完全能接受“老师”这个称呼，而且很多货真价实的教授，也更情愿学生与同事喊他“某老师”，当然，在不熟悉对方喜好或初次见面的情况下，叫”教授“总是最稳妥的做法。
现在满大街都是张老师、尕老师地叫，所以本来很有内涵的一个名词，就如同小姐叫法一样，已经变味了，所以呢，这个叫法可以有，但是并不受用。教师在大学生活的日常用语里不多见，一般用于官宣，如教师节，教师的责任、教师的素质等等。
教授叫法在大学里最为流行，不管自己是教授还是副教授(即便是讲师)，被叫“教授”都是很受用的(就一般人心理学而言，例外的也有)。这个也不能算语言腐败，因为人家美国assistantprofessor(助教授，刚入大学的那种)。
associateprofessor(副教授),professor（教授），也都是教professor(刻意加上assistant,也浪费说话时间）。即便是在正式场合，也都是这样简洁称呼(如果印在纸上，那还是要加assistant,associate)。
-
根据你上传的图片，帮你做了一个代码，这个代码要放在当前工作表名称下的模块中
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim a(1 To 3) '定义三个变量存放“销售、财务、采购”的位置
If Target.Column > 1 And Target.Column < 4 Then '在第二列或第三列选择时执行
x = [b65536].End(xlUp).Row
t = Target.Value
s1 = "销售部（点击合拢目录）"
s2 = "财务部（点击合拢目录）"
s3 = "采购部（点击合拢目录）"
s4 = "点击展开子目录"
For i = 7 To x
If Cells(i, 2) = s1 Then a(1) = i
If Cells(i, 2) = s2 Then a(2) = i
If Cells(i, 2) = s3 Then a(3) = i
Next
If t = s1 Then Rows(a(1) + 1 & ":" & a(2) - 1).EntireRow.Hidden = True '隐藏
If t = s2 Then Rows(a(2) + 1 & ":" & a(3) - 1).EntireRow.Hidden = True '隐藏
If t = s3 Then Rows(a(3) + 1 & ":" & x).EntireRow.Hidden = True '隐藏
If t = s4 And Cells(Target.Row, 2) = s1 Then Rows(a(1) + 1 & ":" & a(2) - 1).EntireRow.Hidden = False '显示
If t = s4 And Cells(Target.Row, 2) = s2 Then Rows(a(2) + 1 & ":" & a(3) - 1).EntireRow.Hidden = False '显示
If t = s4 And Cells(Target.Row, 2) = s3 Then Rows(a(3) + 1 & ":" & x * 2).EntireRow.Hidden = False '显示
End If
End Sub
已经调试过了，可直接使用，当增加或减少行数时，它能自己判断。