EXCEL中,如何将2位数,如“12'这样的数与另外一个2位数如"34”,批量组合成四位数12342位数分别在B34至D41之间的24个位置(该位置的数字会更新).一共组合成23*12=276组四位数.要求如下:
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/07 12:58:48
![EXCEL中,如何将2位数,如“12'这样的数与另外一个2位数如](/uploads/image/z/1114038-54-8.jpg?t=EXCEL%E4%B8%AD%2C%E5%A6%82%E4%BD%95%E5%B0%862%E4%BD%8D%E6%95%B0%2C%E5%A6%82%E2%80%9C12%27%E8%BF%99%E6%A0%B7%E7%9A%84%E6%95%B0%E4%B8%8E%E5%8F%A6%E5%A4%96%E4%B8%80%E4%B8%AA2%E4%BD%8D%E6%95%B0%E5%A6%82%2234%E2%80%9D%2C%E6%89%B9%E9%87%8F%E7%BB%84%E5%90%88%E6%88%90%E5%9B%9B%E4%BD%8D%E6%95%B012342%E4%BD%8D%E6%95%B0%E5%88%86%E5%88%AB%E5%9C%A8B34%E8%87%B3D41%E4%B9%8B%E9%97%B4%E7%9A%8424%E4%B8%AA%E4%BD%8D%E7%BD%AE%EF%BC%88%E8%AF%A5%E4%BD%8D%E7%BD%AE%E7%9A%84%E6%95%B0%E5%AD%97%E4%BC%9A%E6%9B%B4%E6%96%B0%EF%BC%89.%E4%B8%80%E5%85%B1%E7%BB%84%E5%90%88%E6%88%9023%2A12%3D276%E7%BB%84%E5%9B%9B%E4%BD%8D%E6%95%B0.%E8%A6%81%E6%B1%82%E5%A6%82%E4%B8%8B%EF%BC%9A)
EXCEL中,如何将2位数,如“12'这样的数与另外一个2位数如"34”,批量组合成四位数12342位数分别在B34至D41之间的24个位置(该位置的数字会更新).一共组合成23*12=276组四位数.要求如下:
EXCEL中,如何将2位数,如“12'这样的数与另外一个2位数如"34”,批量组合成四位数1234
2位数分别在B34至D41之间的24个位置(该位置的数字会更新).一共组合成23*12=276组四位数.
要求如下:
EXCEL中,如何将2位数,如“12'这样的数与另外一个2位数如"34”,批量组合成四位数12342位数分别在B34至D41之间的24个位置(该位置的数字会更新).一共组合成23*12=276组四位数.要求如下:
Sub Macro1()
Dim ArrF, ArrH, ArrBoth, ArrAnser(1 To 65535, 1 To 1), i%, j%, L%
ArrF = [a1:a4]
ArrH = [B1:B4]
ArrBoth = [C1:C2]
For i = 1 To UBound(ArrF)
For j = 1 To UBound(ArrH)
L = L + 1: ArrAnser(L, 1) = ArrF(i, 1) & ArrH(j, 1)
Next j
Next i
For i = 1 To UBound(ArrF)
For j = 1 To UBound(ArrBoth)
L = L + 1: ArrAnser(L, 1) = ArrF(i, 1) & ArrBoth(j, 1)
Next j
Next i
For i = 1 To UBound(ArrBoth)
For j = 1 To UBound(ArrH)
L = L + 1: ArrAnser(L, 1) = ArrBoth(i, 1) & ArrH(j, 1)
Next j
Next i
[d1].Resize(L, 1) = ArrAnser
End Sub
四个中括号内的改成你自己的.