Excel表單連接不覆蓋列

Question

我有兩個excel表單。一個看起來是這樣的：

另一條是這樣的：

我想將它們合併是這樣的：

可悲的是我沒有兩個，但約150張需要合併。第2列在每一箇中都是一樣的，它具有相同的值。有任何想法嗎？

謝謝！

Answer 1

這樣的事情會起作用。您需要調整複製範圍以迎合您的電子表格

Sub Merge() 

Dim i As Integer 

i = 1 

While i <= ActiveWorkbook.Sheets.Count 

Sheets(i).Select 

Range("B3:C6").Copy 

Sheets(1).Select 

Range("B3").Select 
    Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ 
     True, Transpose:=False 

i = i + 1 

Wend 

Sheets(1).Select 

End Sub