圖1 原工資表

圖2 轉換后效果
　　“條條大路通羅馬”，不過路有遠近之分，方法也有難易之別，這里給大家提供三種最簡單易用的方法。
　　方法一：宏命令控制法
　　對于Office家族的宏功能，大家或許早有耳聞，但由于需要使用VBA進行編程，所以宏一直讓許多人望而卻步，不過要使用一個現成的宏就簡單多了。首先打開要處理的Excel表，選擇“工具→宏→Visual Basic 編輯器”，在編輯器左邊的窗口中用鼠標雙擊Sheet1，會出現代碼編輯窗口，在代碼編輯窗口輸入如下代碼（為了不破壞原有的工資表，所以這里采用了將 Sheet1的內容復制到Sheet2的方法，所以最后的生成結果是在Sheet2中顯示）：
Sub MakeSalaryList()
Dim i As Integer
Dim endrow As Integer
'測出數據的最后一行
endrow = Sheet1.Range("a65536").End(xlUp).Row - 1
'把標題貼過去
Worksheets(1).Range("1:1").Copy (Worksheets(2).Cells(1, 1))
For i = 3 To endrow
'把每條數據抬頭貼過去
Worksheets(1).Range("2:2").Copy (Worksheets(2).Cells(3 * i - 7, 1))
'把數據貼過去
Worksheets(1).Range(Cells(i, 1), Cells(i, 256)).Copy (Worksheets(2).Cells(3 * i - 6, 1))
Next i
End Sub

　　關閉編輯器，將自動返回到剛才的Excel表，選擇“工具→宏→宏”，將彈出如下對話框：
　　（見圖３）