搜索，尝试自己解决问题，然后再问一个关于你尝试的具体问题，展示你尝试过的东西。要求完整解决方案而不演示解决方案的问题通常会被否决和关闭。您可以使用一些简单的excel公式来解决此问题。没有必要学习VBA。有什么解决方案可以在谷歌表单上找到吗？也许有查询功能

---

搜索，尝试自己解决问题，然后再问一个关于你尝试的具体问题，展示你尝试过的东西。要求完整解决方案而不演示解决方案的问题通常会被否决和关闭。您可以使用一些简单的excel公式来解决此问题。没有必要学习VBA。有什么解决方案可以在谷歌表单上找到吗？也许有查询功能？Stack Overflow是编程爱好者的网站。在这里获得帮助的最好方法是先尝试一些东西。如果你陷入困境，做一些研究，尝试自己解决问题，然后再问一个关于你的尝试的具体问题，展示你的尝试。要求完整解决方案而不演示解决方案的问题通常会被否决和关闭。您可以使用一些简单的excel公式来解决此问题。没有必要学习VBA。有什么解决方案可以在谷歌表单上找到吗？也许是有查询功能的？

U-0001

U-0002 

B01

B02

B03

U-0001 B01

U-0001 B02

U-0001 B03

U-0002 B01

U-0002 B02

U-0002 B03

Sub combineTwoCol()

    ' i,j,k are counters for first col, second col and the answer col in order.
    k = 1
    For i = 1 To 1000
        For j = 1 To 10
            Cells(k, "C").Value = Cells(i, "A").Value
            Cells(k, "D").Value = Cells(j, "B").Value 
            k = k + 1
        Next j
    Next i
End Sub

'this return to the variable the last row in column A
LastRowColA = Range("A65536").End(xlUp).Row

=IF(ROW()-ROW($A$1)<COUNTA(A:A)*COUNTA(B:B),OFFSET($A$1,(ROW()-ROW($A$1))/COUNTA(B:B),0)&" "&OFFSET($B$1,MOD(ROW()-ROW($A$1),COUNTA(B:B)),0),"")