excel - Excel 如果单元格 a2>8 中的值自动移动到单元格 D2 输入文本

Question

我正在尝试使用电子表格来记录工作时间，这样如果单元格中一天的总小时数超过 8 小时A2，则光标会自动移动到D2第二个选项卡上的单元格，以便输入加班的原因。

• 标签一称为 2013
• 标签二称为2013加班。

我对excel不是很好，所以非常感谢任何帮助。谢谢！

Answer 1

你提供的信息不多。哪些细胞发生变化并有助于 A2？是否有类似的列需要选择不同的单元格？请编辑您的问题并添加有关数据结构的更多详细信息。

以下宏假设单元格 A2 被手动更改。

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim shOvertime As Worksheet
Set shOvertime = ThisWorkbook.Sheets("2013 Overtime")
If Not Intersect(Target, Range("A2")) Is Nothing Then
    If Range("A2") > 8 Then
        shOvertime.Activate
        shOvertime.Range("D2").Select
    End If
End If
End Sub

如果你的数据结构不同，请解释一下。

要使代码正常工作，请右键单击工作表选项卡并选择“查看代码”以打开 Visual Basic 编辑器 (VBE)。将代码粘贴到代码窗口并关闭 VBE。然后在单元格 A2 中输入数字。