2017-01-13 91 views
-4

我有這個表格在Excel合併Excel中的行與重複

enter image description here ,我想該行與2列的值相等合併獲得此表 enter image description here

我不知道如何要做什麼:你能幫助我嗎?我已經閱讀了Excel教程,但是我發現只有關於刪除行的說明

+0

我不認爲你可以使用公式來做到這一點 你需要在VBA中編寫一些代碼。 查找VBA書並開始試驗 – dgorti

回答

1

我不想爲你做這件事,因爲你甚至沒有試圖解決它。但我太無聊了。 試試這個。

Sub mergeSmilar() 

    'mydata starts from 1 
    Dim i As Integer 
    i = 2 

    Do While (i <= Range("A" & Rows.Count).End(xlUp).Row) 


     If (Range("A" & i) = Range("A" & i - 1)) And (Range("B" & i) = Range("B" & i - 1)) Then 
      'row i should be merged to the i-1 row 
      For j = 3 To 7 ' change 7 to number of columns you need to merge 
       If (Trim(Cells(i - 1, j)) = "") Then 
        Cells(i - 1, j) = Cells(i, j) 
       End If 
      Next j 
      Range("A" & i).EntireRow.Delete 
      Else 
      i = i + 1 
     End If 

    Loop 

End Sub