2013-11-14 39 views
1

從每天收到的電子郵件中導入數據時,我必須通過並清理一個包含如下所示行的行的列。我想知道的是如何將列B的數據合併到第1行,以便我可以刪除現在爲空的第2行和第3行。我已經看到用於連接等的公式,但這需要保留數據。一旦我清理了這些數據,它就會被移動到另一張紙上。如何合併多個單元格而不丟失文本數據並且不使用公式?

謝謝你的幫助。

|--------A---------|---------B--------|--------C---------| 
1 Important Data | Important Data | Important Data | 
|------------------|------------------|------------------| 
2 Empty Cell | Empty Cell | Empty Cell | 
|------------------|------------------|------------------| 
3 Empty Cell | Important Data | Empty Cell | 
|------------------|------------------|------------------| 
+0

數據中的模式是什麼?每次只有3行嗎?或者你想連接3行爲每3行一個? –

+0

你有沒有在這裏找到有用的東西? –

回答

0

您可以編寫一個用於連接的Sub,並用結果替換B1。

Sub test() 
    Dim s As String 
    Dim ws As Worksheet 
    Set ws = ActiveSheet 
    s = ws.Range("B1").Text & ws.Range("B2").Text & ws.Range("B3").Text 
    ws.Range("B1") = s 
    ws.Range("B2:B3").Clear 
End Sub 

這是本質。那麼如果你需要重複操作等,它可以適應。

相關問題