工作表之间的Excel自动填充

我有一个具有〜300个类似工作表的Excel文档和一个包含名称列表的工作表。 这300个工作表中的每一个都有一个特定的单元格，我需要从列表中填写一个名称。 列表和表单的顺序相同（例如，sheet1需要List！C1中的名称，List！C2中的sheet2等）。 我看着VLOOKUP，但是没有任何可以使用的参考数据。

Answer 1

我觉得类似的任务，你需要使用这样的VBAmacros：

Sub DataFromList() Dim nameSht As String: nameSht = "List" Dim shtList As Worksheet Set shtList = ThisWorkbook.Worksheets(nameSht) Dim columnWithData As String: columnWithData = "C" Dim n%: n = 0 ' start from 1 row (0 + 1) ' specific cell where you need to fill a name from the list Dim addressForData As String: addressForData = "B2" For Each sht In ThisWorkbook.Worksheets If sht.Name <> nameSht Then n = n + 1 sht.Range(addressForData).Formula = "=" & nameSht & "!" & columnWithData & n End If Next sht End Sub 

当然，只有在“特定单元格”的地址全部相同的情况下才有可能