1、可以先利用宏錄制來自動生成代碼，然后再進行修改。操作方法如下：第一步，打開一個excel應用，新建一個白空表格，并錄入數據。

2、第二步，點擊excel應用程序窗口狀態欄中左側的“宏錄制”按鈕。

3、第三步，然后在表1中，選中左上角第一個有數據的單元格。

4、第四步，接著按下CTRL+SHIFT鍵，再分別先后按下方向右鍵、方向下鍵，選中表1中全部數據。

5、第五步，再接著按下ctrl+C復制選中數據，切換到表2中，在要保存數據的行的第一個單元中點擊一下，再ctrl+V粘貼。

6、第六步，再次點下 excel應用程序狀態欄左側的宏錄制按鈕，停止宏錄制。

7、第七步，按下組全鍵：ALT+F11，打開vba編輯窗口，展開模塊，雙擊打開模塊1，在右側就可以看到剛錄制的宏代碼了，這個代碼基本就能解決前面提出的問題了。