VBA連接2列

Question

如何連接列A和B以創建列C？

A B 
abc jkl 
def mno 
ghi pqr 

C欄應該是這樣的：

C 
abc 
def 
ghi 
jkl 
mno 
pqr 

Answer 1

是你正在尋找

Sub testing() 
Dim lrow1 As Long 
Dim lrow2 As Long 

With ActiveSheet 
lrow1 = .Range("A" & Rows.Count).End(xlUp).Row 
lrow2 = .Range("B" & Rows.Count).End(xlUp).Row 

.Range("A1:A" & lrow1).Copy .Range("C1") 
.Range("B1:B" & lrow2).Copy .Range("C" & lrow1 + 1) 

End With 

End Sub 

什麼我運行這個宏的.got下面的結果