Excel-工作表宏之間的基本復制粘貼

Question

我需要從2張紙上進行數據的基本合並，其中第一部分（用戶名）發生變化，但是第二部分是120個項目的預設列表。 即，結合：

sheet1:USERLIST
albert
benny
cedric
dorothy
....

同

sheet2:ITEMLIST
item1
item2
item3
....
item120

因此，另一張紙上的最終輸出（在單獨的單元格中）是

sheet3
albert item1
albert item2
....
albert item120
benny item1
benny item2
....
benny item120
cedric item1
cedric item2
....
cedric item120

等等。 我知道這是一個非常基本的問題，但到目前為止我還沒有找到答案。 謝謝！

Answer 1

這可以簡單地在兩級For...Next 。

假設您有：

• [表Sheet 1]：

    USER_LIST
    A
    B
    C

• [Sheet 2中]：

    ITEM_LIST
    1
    2
    3
    4
    5

• [表Sheet 3]：

    RESULT_LIST

與此子：

Private Sub Whatever_name_you_like()
    Dim i As Integer
    Dim j As Integer
    For i = 2 To Worksheets(1).Range("A65535").End(xlUp).Row
        For j = 2 To Worksheets(2).Range("A65535").End(xlUp).Row
            Worksheets(3).Cells(Range("A65535").End(xlUp).Row + 1, 1).Value = Worksheets(1).Cells(i, 1).Value & Worksheets(2).Cells(j, 1).Value
        Next
    Next
End Sub

運行時，[Sheet3]將導致：

RESULT_LIST
A1
A2
A3
A4
A5
B1
B2
B3
B4
B5
C1
C2
C3
C4
C5

Answer 2

您不僅可以使用目標范圍內的公式來執行此操作嗎？

=Sheet1!A:A&Sheet2!A:A

只需在所有目標單元格中​​復制該公式即可。

這避免了使用VBA和循環，並利用了Excel的內置功能，因此無需啟動VBA代碼