所以我的excel书中有2张,这里有http://prntscr.com/j4931e的日期http://prntscr.com/j494s2(这是在表2中),每种类型的出勤(例如现在或不在场)我输入一个单元格I希望它更新作为工作表1 中B列一部分的相同单元格。我希望你明白我的意思。谢谢。
Private Sub Worksheet_Change(ByVal Target As Range)
Worksheets(2).Range(Target.Address) = Target
End Sub
答案 0 :(得分:0)
试试这个。有两个选项,因为不是100%肯定你在追求什么。代码应该放在表2模块中。您可能希望限制触发它的范围,例如只有B-F列?
Private Sub Worksheet_Change(ByVal Target As Range)
If target.column>1 then
Worksheets(1).Range("B" & target.row).Value = Target.Value
End if
End Sub