修法布施得聰明智慧，多分享讓生活更美好。上次分享了《Excel怎樣把多列的數據按列順序轉換成單列》，介紹了把多列的數據按列順序轉換成單列處理方法，下面通過一實例如圖（百度知道問題）分享把多列數據轉成首

修法布施得聰明智慧，多分享讓生活更美好。上次分享了《Excel怎樣把多列的數據按列順序轉換成單列》，介紹了把多列的數據按列順序轉換成單列處理方法，下面通過一實例如圖（百度知道問題）分享把多列數據轉成首列與其他列合成兩列處理方法。

步驟1：打開Excel并另存文件

首先打開Microsoft Office Excel 2007，上例文件另存文件名《Excel怎樣把多列數據轉成首列與其他列合成兩列 .xlsm》（演示文件，下面代碼復制到能運行宏的工作簿都可以）如圖。

步驟2：打開宏編輯界面

然后按下快捷鍵ALT F11打開VBE（宏）編輯界面，然后點菜單欄【插入】下拉中列表中點【模塊（M）】如圖。

步驟3：插入宏代碼

然后插入了一個模塊1，在代碼框中復制如下代碼：

```

Sub 多列轉兩列()

Dim myr As Range, r As Long, c As Long, i As Long, j As Long, mb(), k As Long

Set myr Selection

r

c

ReDim mb(1 To (c - 1) * r, 1 To 2)

For i 2 To c

For j 1 To r

k k 1

mb(k, 1) myr.Cells(j, 1).Value

mb(k, 2) myr.Cells(j, i).Value

Next j

Next i

Set myr (prompt:"選擇轉出兩列一個單元格", Type:8)

(k, 2) mb

End Sub

```

步驟4：運行宏代碼

以上操作動態過程如下：

步驟5：輸出結果

回到工作表窗口，首先選數據單元格區域，然后運行【多列轉兩列】宏（菜單欄中點【視圖】中下列表中【宏】列表【查看宏(V)】打開宏對方框，選該宏名，執行），提示“選擇轉出兩列一個單元格”，選好后輸出結果，運行過程如下圖。

結束語

如果覺得這篇經驗幫到了您，請點擊下方的“投票點贊”或者“收藏”支持我！還有疑問的話可以點擊下方的“我有疑問”，謝謝啦！