Note: The other languages of the website are Google-translated. Back to English

如何從Excel中的多個工作表引用同一單元格?

假設您有一個包含多個工作表的工作簿,現在您想將多個工作表中同一單元格中的數據提取到一個主工作表中。 例如,將單元格B8從Sheet1,Sheet2,Sheet3,Sheet4…拉入主表,如下面的屏幕快照所示。 您如何在Excel中快速輕鬆地解決此任務?

使用公式將來自多個工作表的同一單元格引用到一個主表中

使用VBA代碼將多個工作表中的同一單元格引用到一個主表中

將具有多個功能的工作表中的同一單元格引用到一個主表中


使用公式將來自多個工作表的同一單元格引用到一個主表中

如果您的工作表名稱是默認的工作表名稱,例如Sheet1,Sheet2,Sheet3 ...,則可以使用公式在Excel中快速處理此作業。

1。 首先,您應該創建一個助手編號列表,請輸入1、2、3、4 ...序列號,這些序列號指示您需要參考的工作表,請參見屏幕截圖:

2. 然後,將以下公式輸入到要提取數據的單元格中,然後將填充手柄向下拖動到要應用此公式的單元格中,並且已提取多個工作表中所有相同的單元格值,請參見屏幕截圖:

=INDIRECT("'Sheet" & E2 & "'!$B$8")

備註:在以上公式中, E2 是您在步驟1中輸入的幫助者編號,並且 B8 是您要提取的單元格引用。 僅當工作表名稱為Sheet1,Sheet2,Sheet3 ...時,此公式才有效


將多個工作表中的同一單元格引用到一個主表中

Excel的Kutools 支持強大的功能-動態參考工作表 這可以幫助您將多個工作表中的相同單元格值引用到主表中。 請參見下面的演示。    點擊下載Kutools for Excel!


使用VBA代碼將多個工作表中的同一單元格引用到一個主表中

在這種情況下,如果有數十個工作表的工作表名稱是不同的內容而不是Sheet1,sheet2,則下面的VBA代碼可以幫助您將多個工作表中的相同單元格引用一次填充到一個工作表中。

1。 在主工作表中,單擊單元格B8,這是您要從其他工作表中提取的單元格。

2。 按住 ALT + F11 鍵,然後打開 Microsoft Visual Basic for Applications窗口.

3。 點擊 插入 > 模塊,然後將以下代碼粘貼到 模塊窗口.

VBA代碼:從多個工作表中引用同一單元格

Sub AutoFillSheetNames()
'Update by Extendoffice
Dim ActRng As Range
Dim ActWsName As String
Dim ActAddress As String
Dim Ws As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set ActRng = Application.ActiveCell
ActWsName = Application.ActiveSheet.Name
ActAddress = ActRng.Address(False, False)
Application.ScreenUpdating = False
xIndex = 0
For Each Ws In Application.Worksheets
If Ws.Name <> ActWsName Then
ActRng.Offset(xIndex, 0).Value = "='" & Ws.Name & "'!" & ActAddress
xIndex = xIndex + 1
End If
Next
Application.ScreenUpdating = True
End Sub

4。 然後按 F5 鍵來運行此代碼,並且其他工作表中單元格B8的所有值都已拉入“主”工作表中。 看截圖:

備註: 此VBA代碼適用於填充您單擊的單元格。 例如,如果單擊指定工作表中的單元格A1,則其他工作表中單元格A1的所有值都將填充到該工作表中。


將具有多個功能的工作表中的同一單元格引用到一個主表中

如果您不熟悉VBA代碼,請在這里為您介紹一個有用的工具- Excel的Kutools,其 動態參考工作表 實用程序,您可以輕鬆地從Excel中的多個工作表中填充單元格引用。

提示:要應用此 動態參考工作表 功能,首先,您應該下載 Excel的Kutools,然後快速輕鬆地應用該功能。

安裝後 Excel的Kutools,請這樣做:

1。 單擊要從其他工作表中提取母版工作表中的單元格B8。

2. 然後點擊 庫工具 > 更多 > 動態參考工作表,請參見屏幕截圖:

3。 在 填寫工作表參考 對話框中選擇 垂直填充單元格 來自 填寫訂單,然後單擊公式文本框旁邊的小鎖,灰色鎖將變為黃色鎖,這意味著公式和單元格引用已被鎖定,然後您可以單擊任意單元格以從其他工作表中提取單元格B8引用,在在本例中,我將單擊單元格B2。 然後,檢查要從中提取單元格引用的工作表。 看截圖:

備註:如果您未鎖定此小鎖,則單擊的單元格引用將隨所選單元格一起更改。

4。 然後點擊 填充範圍 按鈕,並且其他工作表中的單元格B8的單元格值已在“主”工作表中垂直列出,然後關閉此對話框。 看截圖:

點擊下載Kutools for Excel並立即免費試用!


更多文章:

  • 根據條件將多個工作表中的行複製到新工作表中
  • 假設您有一個包含三個工作表的工作簿,這些工作表的格式與下面的屏幕快照相同。 現在,您想要將這些工作表中的C列包含“已完成”文本的所有行複製到新工作表中。 您如何快速,輕鬆地解決此問題,而又不手動一一複制和粘貼它們?
  • 從多個工作表創建唯一值列表
  • 有什麼快速的方法可以讓我們從工作簿中的所有工作表中創建唯一值列表? 例如,我有四個工作表,其中一些名稱包含A列中的重複名稱,現在,我想將這些表中的所有唯一名稱提取到一個新列表中,如何在Excel中完成此工作?
  • 跨多個工作表的特定值
  • 假設我有多個工作表,其中包含以下數據,現在,我想從這些工作表中獲取特定值“ Excel”的出現次數。 如何在多個工作表中計算特定值?
  • 將相同的圖像插入多個工作表
  • 通常,我們可以使用Excel中的“插入”功能將圖片快速插入到工作表中,但是,是否曾經嘗試過將同一張圖片插入工作簿的所有工作表中? 本文,我將為您介紹一種解決此工作的有用方法。
  • 在Excel中同時在多個工作表上運行相同的宏
  • 通常,我們可以在工作表中運行一個宏,如果有多個工作表需要應用同一宏,則應一張一張地觸發代碼。 是否還有其他快速方法可以在Excel中一次在多個工作表上運行同一宏?

最佳辦公效率工具

Kutools for Excel 解決了你的大部分問題,並將你的生產力提高了 80%

  • 重用: 快速插入 複雜的公式,圖表 以及您以前使用過的任何東西; 加密單元 帶密碼 創建郵件列表 並發送電子郵件...
  • 超級公式欄 (輕鬆編輯多行文本和公式); 閱讀版式 (輕鬆讀取和編輯大量單元格); 粘貼到過濾範圍...
  • 合併單元格/行/列 不會丟失數據; 拆分單元格內容; 合併重複的行/列...防止細胞重複; 比較範圍...
  • 選擇重複或唯一 行; 選擇空白行 (所有單元格都是空的); 超級查找和模糊查找 在許多工作簿中; 隨機選擇...
  • 確切的副本 多個單元格,無需更改公式參考; 自動創建參考 到多張紙; 插入項目符號,複選框等...
  • 提取文字,添加文本,按位置刪除, 刪除空間; 創建和打印分頁小計; 在單元格內容和註釋之間轉換...
  • 超級濾鏡 (將過濾方案保存並應用於其他工作表); 高級排序 按月/週/日,頻率及更多; 特殊過濾器 用粗體,斜體...
  • 結合工作簿和工作表; 根據關鍵列合併表; 將數據分割成多個工作表; 批量轉換xls,xlsx和PDF...
  • 超過 300 項強大的功能. 支持 Office / Excel 2007-2021 和 365。支持所有語言。 在您的企業或組織中輕鬆部署。 完整功能 30 天免費試用。 60 天退款保證。
kte選項卡201905

Office選項卡為Office帶來了選項卡式界面,使您的工作更加輕鬆

  • 在Word,Excel,PowerPoint中啟用選項卡式編輯和閱讀,發布者,Access,Visio和Project。
  • 在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
  • 將您的工作效率提高 50%,每天為您減少數百次鼠標點擊!
officetab底部
按評論排序
留言 (13)
還沒有評分。 成為第一位評論!
網站主持人對此評論進行了最小化
非常感謝它非常有用:roll:
網站主持人對此評論進行了最小化
如果我想指定單元格不是點擊它而是寫它怎麼辦? 代碼將如何變化? 謝謝!
網站主持人對此評論進行了最小化
您錯過了 VBA 代碼第 16 行中的單引號。 此代碼是正確的: Sub AutoFillSheetNames() 'Update 20131202 Dim ActRng As Range Dim ActWsName As String Dim ActAddress As String Dim Ws As Worksheet On Error Resume Next xTitleId = "KutoolsforExcel" Set ActRng = Application.ActiveCell ActWsName = Application.ActiveSheet.Name ActAddress = ActRng.Address(False, False) Application.ScreenUpdating = False xIndex = 0 For Each Ws In Application.Worksheets If Ws.Name ActWsName Then ActRng.Offset(xIndex, 0).Value = "='" & Ws.Name &“'!” & ActAddress xIndex = xIndex + 1 End If Next Application.ScreenUpdating = True End Sub
網站主持人對此評論進行了最小化
我將如何引用特定單元格而不是我在另一個工作簿中選擇的單元格?
網站主持人對此評論進行了最小化
嗨,感謝您編碼它真的很棒,對我們很有幫助。 在上面的 VBA 代碼中,如何排除隱藏的工作表? 因為我有不同的客戶,我使用一種格式每月向他們收費。 所以我創建了幾個工作表並將它們隱藏起來,並從這個隱藏的工作表中提取不同的數據。 所以請讓我知道編碼,這樣它就不會從隱藏的工作表中選擇單元格值。 您的工作受到高度讚賞,並感謝您的大力支持! 問候阿布舍克
網站主持人對此評論進行了最小化
嗨,我剛剛嘗試了您的 vba 代碼,如何在我的主電子表格上使用它是有道理的用作 B6 之類的參考在其他電子表格上不對應 - 所以要解釋要查找的值 id 出現在每張紙上的同一單元格中,但這與主電子表格不對應希望這是有道理的,請幫忙!
網站主持人對此評論進行了最小化
有這個工具的 MACbook 版本嗎?
網站主持人對此評論進行了最小化
親愛的請注意,我使用 VBA 代碼從多個工作表中引用相同的單元格並且它可以正常工作,但我需要修改代碼中的某些內容,並且我需要您的幫助以使主表中的值返回水平而不是垂直。 最好的問候, 穆罕默德·阿卜杜勒哈迪
網站主持人對此評論進行了最小化
親愛的,請注意,我使用 VBA 代碼從多個工作表中引用相同的單元格,它可以正常工作,但是我需要你的幫助,讓我在此代碼中檢索水平而不是垂直的主工作表中的值。 最好的祝福, :-)
網站主持人對此評論進行了最小化
嗨,謝謝它適用於我工作的工作簿。 謝謝最好的問候盧薩多
網站主持人對此評論進行了最小化
我有一個包含所有月份的電子表格。 我希望一些單元格從第一個月結轉到另一個進行(即,12 月的單元格 B12 可以鏈接到 XNUMX 月 - XNUMX 月的單元格 BXNUMX)。 我該怎麼做?
網站主持人對此評論進行了最小化
你好,


我在 A 列中有一個學生列表,他們在 G 中就讀的學校。我想要一個工作表來填充所有從可用工作表中就讀 X 學校的學生。 我該怎麼做? 提前致謝!
網站主持人對此評論進行了最小化
我已經創建了一個庫存表和開放庫存清單,我為不同的項目創建了 500 張表,所以如何一次將開放庫存放入所有表中
這裡還沒有評論
留下你的意見
以訪客身份發帖
×
評價此帖子:
0   字符
推薦地點

關注我們

版權所有©2009 - 萬維網。extendoffice.com。 | 版權所有。 供電 ExtendOffice。 |
Microsoft和Office徽標是Microsoft Corporation在美國和/或其他國家的商標或註冊商標。
受Sectigo SSL保護