如何在 Excel 中將向量(單一列或欄)轉換為矩陣?
在 Excel 中,您可能會遇到需要將單一列或欄(通常稱為「向量」)轉換為指定列數與欄數的矩陣或表格格式的情況。若手動逐一複製貼上每個值到網格中,不僅耗時,還容易出錯,尤其在處理大型資料集時更是如此。為協助您提升效率並降低錯誤風險,本文介紹幾種實用方法,讓您快速將向量(單一列或欄)轉換為矩陣。每種方法適用於不同情境,您可以根據資料轉換與呈現的需求,選擇最適合的方式。
使用公式將向量/單一列或欄轉換為矩陣
Excel 公式提供了一種靈活又動態的方式,能將單一列或欄轉換為矩陣佈局,特別適合在您希望矩陣能隨源數據變動自動更新時使用。但請留意儲存格參照與矩陣大小的設定——原始資料中的空白儲存格可能會傳回零值。
🔹 將單一欄轉換為矩陣:
假設您的資料位於 C1:C20,並希望將其轉換為 4 列 × 5 欄(4×5)的矩陣,操作方式如下:
步驟 1: 在您希望矩陣起始位置左上角左側的儲存格(例如 )F1)中輸入下列公式,然後按下 Enter。
=OFFSET($C$1:$C$20,COLUMN()-COLUMN($F$1)+((ROW()-ROW($F$1))*(ROWS($C$1:$C$20)/4)),0,1,1) 此公式會參照欄位資料並重新排列,轉換為矩陣格式。

公式說明:
- $C$1:$C$20:來源欄位資料。
- $F$1:矩陣左上角的起始儲存格。
- ROWS($C$1:$C$20)/4:「4」為矩陣的列數,請依實際需求調整。
步驟 2: 向下拖曳填滿控制點至 4 列,再向右拖曳至 5 欄,即可完成矩陣。

🔹 將單一列轉換為矩陣:
若要將類似 A1:T1 的列轉換為 5 列 × 4 欄(5×4)的矩陣:
步驟 1: 在起始儲存格(例如 )E4)中輸入:
=OFFSET($A$1:$T$1,0,COLUMN()-COLUMN($E$4)+(ROW()-ROW($E$4))*(COLUMNS($A$1:$T$1)/5),1,1) 步驟 2: 接著向下拖曳 5 列、向右拖曳 4 欄,即可快速形成矩陣佈局!

公式說明:
- $A$1:$T$1:來源列資料。
- $E$4:矩陣的起始儲存格。
- COLUMNS($A$1:$T$1)/5:「5」為矩陣的列數。
⚠️ 注意事項:
- 請確保資料點數量與列數 × 欄數完全相符(例如:4×5=20)。
- 若來源區域包含空白儲存格,矩陣在這些位置可能會顯示 0.
- 此公式方法雖具動態性,但對初學者而言較不直觀,請務必確保參照的一致性。
使用 Kutools for Excel 將向量/單一列或欄轉換為矩陣
如果公式方法對您來說過於複雜或耗時——特別是不熟悉 Excel 函數或需處理大型資料集的使用者——Kutools for Excel 提供更簡單高效的解決方案!其轉換區域功能透過直覺化視覺介面,無需撰寫任何公式,即可輕鬆將單一列或欄轉換為矩陣(反之亦然),讓追求效率與易用性的您事半功倍!
步驟 1: 選取您要轉換為矩陣的列或欄範圍。
步驟 2: 按一下 Kutools > 範圍 > 轉換區域(位於 Excel 功能區中)。

步驟 3: 在轉換區域對話方塊中:
- 若要轉換橫向列,請選取單行轉區域;若為縱向欄,則選取單列轉區域。
- 在固定值方塊中,於每筆記錄的列數下方,輸入您希望矩陣擁有的欄數。例如,輸入 5 即可建立 5 欄矩陣。

步驟 4: 按一下確定。當系統提示時,請選取一個空白儲存格作為矩陣結果的輸出位置。

步驟 5: 再次點擊確定,您的原始列或欄將立即轉換為矩陣格式!

使用 Kutools,無需繁瑣公式或手動填滿操作,是追求速度、簡便與精準的用戶理想之選。請注意,此方法需安裝 Kutools 增益集,可能不適用於所有環境。
使用 VBA 程式碼將向量/單一列或欄轉換為矩陣
對於追求更高彈性、希望自動化流程,或需處理大型資料集的使用者來說,VBA 巨集無疑是理想選擇。它可自訂矩陣大小、大幅減少重複的手動操作,即使面對數千筆資料,依然運作高效。此方法特別適合用於重複性報表製作、批次資料重構,或打造可重複使用的 Excel 工具——而且完全無需依賴外部增益集。
⚠ 重要提示:執行此指令碼前,務必先儲存活頁簿並啟用巨集。若資料量無法完整填滿矩陣尺寸,多餘的儲存格將自動留空,以避免資料遺失。
步驟 1: 按下 Alt + F11,開啟 Microsoft Visual Basic for Applications 編輯器。點選插入→ 模組,並貼上以下程式碼:
Sub VectorToMatrix()
Dim vecRange As Range
Dim outCell As Range
Dim totalElements As Long
Dim matrixRows As Long, matrixCols As Long
Dim i As Long, j As Long, idx As Long
Dim xTitleId
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set vecRange = Application.InputBox("Select the vector (single row or column) to convert:", xTitleId, Type:=[[PH_58]])
If vecRange Is Nothing Then Exit Sub
matrixRows = Application.InputBox("Enter number of rows for the matrix:", xTitleId, , , , , , [[PH_57]])
If matrixRows <= [[PH_56]] Then Exit Sub
matrixCols = Application.InputBox("Enter number of columns for the matrix:", xTitleId, , , , , , [[PH_55]])
If matrixCols <= [[PH_54]] Then Exit Sub
totalElements = vecRange.Cells.Count
If matrixRows * matrixCols < totalElements Then
MsgBox "Matrix size does not fit all values from vector!", vbExclamation
Exit Sub
End If
Set outCell = Application.InputBox("Select the top-left cell for output matrix:", xTitleId, Type:=[[PH_53]])
If outCell Is Nothing Then Exit Sub
idx = 1
For i = 1 To matrixRows
For j = 1 To matrixCols
If idx <= totalElements Then
outCell.Cells(i, j).Value = vecRange.Cells(idx).Value
idx = idx + 1
Else
outCell.Cells(i, j).Value = ""
End If
Next j
Next i
End Sub 步驟 2: 若要執行程式碼,請將游標置於巨集中,然後按下 F5 鍵,或點擊
執行按鈕,再依照提示操作:
- 選取向量範圍—請選擇要轉換的單一列或欄。
- 輸入矩陣的列數與欄數。
- 選取矩陣左上角的輸出儲存格。
確認後,巨集將自動把所選向量的值填入目標矩陣。若矩陣尺寸過小,指令碼會在進行任何變更前先行中止,並發出警告。
為什麼選擇 VBA?此方法極適合用於批次處理、可重複使用的邏輯,以及處理那些使用公式或增益集過於繁瑣的大量資料任務。若您經常需要將向量轉換為不同尺寸的矩陣,或跨多個工作表執行此操作,VBA 能大幅節省您的時間與精力!
疑難排解:請確保所選輸入範圍為單一列或欄,且矩陣列數 × 欄數的乘積不小於來源值的數量。執行前務必先儲存檔案,因為此巨集將直接寫入您的工作表!
相關文章:
最佳 Office 生產力工具
| 🤖 | KUTOOLS AI 助手:基於以下內容徹底革新數據分析:智慧執行 | 產生程式碼| 建立自訂公式 | 分析資料並產生圖表| 呼叫增強函數…… |
| 熱門功能:尋找、醒目提示或標記重複值 | 刪除空白行 | 合併列或儲存格而不遺失資料 | 不使用公式的四捨五入…… | |
| 高級 LOOKUP:多重條件 VLookup | 多重數值 VLookup | 跨多個工作表 VLookup | 模糊查找…… | |
| 高級下拉列表:快速建立下拉式清單 | 相依式下拉式清單 | 多選下拉式清單…… | |
| 欄位管理員:新增指定數量的欄位|移動欄位|切換隱藏欄位的可見狀態|比較範圍與欄位…… | |
| 精選功能:網格聚焦 | 設計視圖 |增強編輯欄 | 工作簿與工作表管理員 | 資源庫(自動文字)| 日期提取 | 合併工作表 | 加密/解密儲存格 | 依清單傳送電子郵件 | 超級篩選 | 特殊篩選(篩選粗體儲存格/斜體/刪除線……) ...... | |
| 頂尖 15 工具組:12 文字工具(添加文本,刪除特定字符,……)| 50+ 圖表 類型(甘特圖,……)| 40+ 實用公式(基於生日計算年齡,……)| 19 插入工具(插入二維碼,從路徑插入圖片,……)| 12 轉換工具(金額轉大寫,匯率轉換,……)| 7 合併和拆分工具(高級合併行,分割儲存格,……)|……以及更多 |
運用 Kutools for Excel 強化您的 Excel 技能,體驗前所未有的高效能!Kutools for Excel 提供超過 300 項進階功能,大幅提升生產力並節省寶貴時間。立即點擊,取得您最需要的功能……
Office Tab 為 Office 帶來分頁式介面,讓您的工作更輕鬆自在!
- 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能,以及 Access、Visio 與 Project。
- 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
- 每天為您提升 50% 的工作效率,並省下數百次滑鼠點擊!
所有 Kutools 增益集,一個安裝程式
Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集,以及 Office Tab Pro,非常適合需要跨多個 Office 應用程式協作的團隊使用!
- 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集,以及 Office Tab Pro
- 一個安裝程式,一個授權— 數分鐘內即可完成設定(支援 MSI)
- 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
- 30 天完整功能試用— 無需註冊,無需信用卡
- 超值之選— 比單獨購買各增益集更省費用