2013-03-14 42 views
0

我在將一列中的多個數據行移動時遇到了一些問題。在excel行中移動數據在單列下多個

它目前是如何

enter image description here

這是我怎麼想它

enter image description here

我已經tryed現在找到了解決這一問題有一段時間了,但我似乎無法找到任何這樣做。

預先感謝您

+0

你是第二個圖像似乎沒有工作(對我來說無論如何)你能檢查鏈接嗎? – NickSlash 2013-03-14 22:03:40

+0

似乎現在工作在leaste,他們都顯示(謝謝你的人添加他們) http://img854.imageshack.us/img854/6537/howiwouldlikeit.jpg是第二個圖像的直接鏈接 – 2013-03-14 22:10:40

回答

1

選擇性粘貼,移調是接近你想要的唯一的事情,但不會爲你做。我認爲你將不得不寫一個宏或手動。

0

正在想辦法用工作表功能做到這一點,但空白。使用VBA可能要簡單得多。

這是一個相當簡單的方法來做到這一點。它看起來爲Sheet1,輸出爲Sheet2(因爲如果您嘗試輸出到同一工作表而不先緩存所有值,它將覆蓋一些值)。

這個工程由於是怎麼Sheet.Cells對象(?)存儲數據,這是A1,B1..Y1,Z1,A2,B2..Y2,Z2 其中YZ行中的最後一個單元格。 (基本上與你的結果相反)

Sub Main() 
Dim S1 As Worksheet 
Dim S2 As Worksheet 
Dim Cell As Variant 
Dim Row As Long 

    Set S1 = ThisWorkbook.Worksheets("Sheet1") ' Source Sheet 
    Set S2 = ThisWorkbook.Worksheets("Sheet2") ' Destination Sheet 

    Row = 1 ' Start Output on this row 

    For Each Cell In S1.UsedRange.Cells 

     S2.Cells(Row, 1).Value = Cell.Value 
     Row = Row + 1 

    Next Cell 

End Sub 
+0

謝謝你完美的工作!非常喜歡 – 2013-03-14 22:30:02