如何在 Excel 中從多個工作表的相同儲存格創建列表？

使用以下 VBA 代碼，您可以輕鬆地從多個工作表中的指定儲存格創建列表。您可以按照以下步驟操作：

步驟 1：選擇要創建列表的指定儲存格。在我們的情況下，我們選擇了單元格 E6。

步驟 2：同時按下 Alt + F11 鍵打開 Microsoft Visual Basic for Applications 窗口，點擊 插入 > 模組，然後將以下代碼粘貼到模組窗口中。

VBA：從多個工作表的相同儲存格創建列表

Sub CreateList()
Dim xAddWs As Worksheet
Dim xWs As Worksheet
Dim RngAddress As String
xTitleId = "KutoolsforExcel"
RngAddress = Application.ActiveCell.Address
Set xAddWs = Application.ActiveWorkbook.Sheets.Add
xAddWs.Name = xTitleId
i = 1
For Each xWs In Application.ActiveWorkbook.Worksheets
If xWs.Name <> xTitleId Then
xAddWs.Cells(i, 1).Value = xWs.Range(RngAddress).Value
i = i + 1
End If
Next
End Sub

步驟 3：按 F5 鍵或點擊 執行 按鈕來運行此 VBA。

然後，所有工作表上指定儲存格的值都會被複製到名為 KutoolsforExcel 的新工作表中。請參見屏幕截圖：

此 VBA 會將列表填充到新的工作表中，且列表中的值是靜態的，不會隨著原始值改變。

然而，有時候您可能希望將列表填充到指定區域，並要求列表中的值始終與指定儲存格中的原始值保持一致。為了滿足這些需求，您應該嘗試以下方法。

此方法將介紹 Kutools for Excel 的 自動遞增工作表引用 功能，以從多個工作表的相同儲存格創建動態列表。

步驟 1：選擇要填充動態列表的 區域，然後點擊 Kutools > 更多 > 自動遞增工作表引用。

步驟 2：在彈出的 填充工作表引用 對話框中，

(1) 點擊 填充順序 框，並從下拉列表中選擇一種填充類型。在我們的情況下，我們選擇 先行後列；

(2) 在 填充公式 框中，指定要創建動態列表的儲存格地址，然後點擊 鎖定 按鈕 以鎖定公式。

(3) 點擊 填充範圍 按鈕。

現在，您將看到所有工作表中指定儲存格的值都被填充到指定區域，如下方屏幕截圖所示：

當原始值發生變化時，此指定列表中的相應值也會自動更改。

如何在 Excel 中自動填充來自不同工作表的相同儲存格到一個工作表？