Question

我是学校校长，我正试图在Excel中制作一个调度管理应用程序。

每节课有1张，每位老师有1张。

所有工作表都相同，并且在相同坐标上有重要信息。

目前，我已经能够将课程时间表复制到老师的手中，并且它的功能就像一个魅力。我制作了学生时间表，它会自动成为老师的。

现在我有点问题。

如果我指派一位老师，让我们说星期一上午8点30分到1节，然后错误地将同一位老师分配给另一个重叠的班级，并将第一堂课转交给老师。上周，同一位老师同时分配到2个班级。

所以我的问题是：

有没有办法（在单元格更改时）一个vba脚本，它检查单元格b29在其他工作表上是否具有相同的值，而不管工作表的位置和名称是什么？

例如：

我将老师A分配到1级 - 星期一8.30 其中教师姓名和日期/小时是单元格B29，该类是单元格d5和工作表名称。

如果我在另一个班级中将同一位老师分配到b29，如果会显示一个说“有重叠”的msgbox。

我最麻烦的是，每年课程和教师都会发生变化，而且课程的相对位置也因课程年份和课程/班级数而有所变化，

谢谢！

Answer 1

我认为代码是这样的：将此代码复制到工作表（代码）：

card

将此代码复制到Module1

Private Sub Worksheet_Change(ByVal Target As Range)

    If Not Intersect(Target, Range("B29")) Is Nothing Then
        If Selection.Cells.Count = 1 Then
            Result = getTime(Range("B29").Value)
        End If
    End If

End Sub

希望这个帮助

EXCEL VBA - 如果单元格与另一个单元格的内容匹配，则发出msgbox警告

1 个答案: