☰

更新第二张工作表

tag-icon • tag-icon microsoft-excel worksheet-function microsoft-excel-2010
更新第二张工作表

我在同一个工作簿中有两个工作表，并且想要在某个日期过去后自动填充原始工作表（工作表 1）中的信息以更新（工作表 2）。

例如：
如果项目日期已过，则“原始”中的信息将自动填充到第二张工作表中。现在，我在某种程度上是在手动完成此任务，方法是将信息放入 A1 中并单击“更新”。

公式如下：

Rows("2:2").Select
    Selection.Copy
    Sheets("Update").Select
    Selection.Insert Shift:=xlDown
    Sheets("Original").Select
    Range("A3").Select

我该怎么做才能让它自动放入“更新”中？

答案1

您可以尝试将该代码放入 Worksheet_Activated 子例程中。

 Private Sub Worksheet_Activate()

 End Sub

此处提供更多信息

相关内容