如何更新列中的特定单元格

时间:2018-04-12 11:26:33

标签: excel excel-vba vba

所以我的excel书中有2张,这里有http://prntscr.com/j4931e的日期http://prntscr.com/j494s2(这是在表2中),每种类型的出勤(例如现在或不在场)我输入一个单元格I希望它更新作为工作表1 image中B列一部分的相同单元格。我希望你明白我的意思。谢谢。

Private Sub Worksheet_Change(ByVal Target As Range)        
    Worksheets(2).Range(Target.Address) = Target        
End Sub

1 个答案:

答案 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