我在excel中有一张表，其中包含第1行x1，x2 ... xn中的值和第A y1，y2 ... yn列中的值。我需要在另一个电子表格的列A中填充值“ x1 / y1”，“ x1 / y2” ...“ xn / yn”。有没有一种方法可以在VBA中创建脚本而无需这样做？到目前为止，我只使用=Sheet1!A2&"/"Sheet1!&B1并将其左右拖动，然后将结果手动复制到A列，但是随着表的增长，它变得相当麻烦。
编辑： 让我改一下一下，这样我的Sheet1看起来就更容易理解
| x1 | x2 | ... | xn | y1 | | | | | y2 | | | | | ... yn | | | | |
现在我需要在Sheet2中填充列A，这样看起来就像
x1/y1 x1/y2 ... x2/y1 x2/y2 ... xn/yn
现在更容易理解了吗？
答案 0 :(得分：0)
您可以使用几个Index公式来完成
=IF(ROW() <= COUNTA(Sheet1!$A:$A) * COUNTA(Sheet1!$1:$1), INDEX(Sheet1!$1:$1,INT((ROW()-1)/COUNTA(Sheet1!$A:$A))+2)&"/"&INDEX(Sheet1!$A:$A,MOD(ROW()-1,COUNTA(Sheet1!$A:$A))+2),"")
从Sheet2!A1开始，并至少复制表中的条目数。任何多余的公式将显示为空白。