Excel - 在创建新选项卡时自动从单元格导入数据

我正在编写一个电子表格，汇总插入联合Excel文件中的标准模板中的数据作为单独的选项卡。

创建新选项卡时，是否可以自动将指定单元格中的数据导入摘要选项卡？由于我想要提取的数据位于每个文档的同一单元格中，这将为我节省大量的时间和精力

这样的东西将在Sheet1列的Sheet1列A中创建一个列表，并且每当任何工作表C1上的单元格发生更改时，它都会将该单元格的值放入B列中的sheet1，位于A列中相应的工作表名称旁边

它ThisWorkbook通过VBA编辑器进入模块*。您可以根据需要更改工作表名称和范围。

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    If Not Intersect(Target, Sh.Range("C1")) Is Nothing Then
        Dim ws As Worksheet
        Set ws = Sheets("Sheet1")
        Dim iRow As Integer
        On Error GoTo Yikes:
TryAgain:
        iRow = Application.WorksheetFunction.Match(Sh.Name, ws.Range("A1:A50"), 0)
        ws.Cells(iRow, 2) = Target.Value
        Exit Sub

Yikes:

        Dim rowcount As Integer
        rowcount = ws.Cells(Rows.Count, 1).End(xlUp).Row
        Dim r As Range
        Set r = ws.Cells(rowcount + 1, 1)
        r = Sh.Name
        GoTo TryAgain:
    End If
End Sub

*要进入VBA编辑器，您必须转到办公室按钮，Excel选项和流行标签，在旁边的复选框中打勾Show Developer tab in the Ribbon。然后关闭它，转到开发人员选项卡，然后单击Visual Basic最左侧的按钮。编辑器将打开，您需要双击ThisWorkbook左窗格中的模块。