2016-01-05 114 views
-1

當我在Excel中複製多行並將它們粘貼到文本框中時,它們將粘貼到一行中。有沒有辦法保持多行(可能通過將文本框鏈接到Excel單元格或其他東西)?在excel中複製多行單元格並將它們作爲多行粘貼到excel中的文本框中

+0

複製通過VBA或複製,而不VBA ? – Chrismas007

+0

如果項目從第2行開始存儲在A列中,則可以在B2中創建一個公式,類似於'= B1&CHAR(10)&A2',並將其複製下來。 B列中的最後一個單元格將將項目作爲單獨的行,並在頂部添加一個額外的回車符,您可以將其刪除。在VBA中這樣做更加優雅,但如果是「一次性」事件,這個手動過程就足夠了。 – Demetri

+0

@ user14706這不是如何工作。我們不爲人們定製解決方案。相反,你應該顯示你已經嘗試過的代碼以及你被卡住的地方。 – Chrismas007

回答

0

雖然這是事實,我們不只是提供解決方案作爲一項規則,但我認爲這是一個有趣的益智,所以這裏是一個替代的解決方案VBA:

Function AdjustRange(Rng As Range) As String 

    Dim x As Variant, y As Variant 

    For Each x In Rng.Rows 
     For Each y In x.Columns 
      AdjustRange = AdjustRange & y & Chr(9) 
     Next y 
     AdjustRange = Left(AdjustRange , Len(AdjustRange) - 1) 
     AdjustRange = AdjustRange & Chr(10) 
    Next x 
    AdjustRange = Left(AdjustRange , Len(AdjustRange) - 1) 

End Function 
相關問題