Question

我在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

现在更容易理解了吗？

Answer 1

您可以使用几个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开始，并至少复制表中的条目数。任何多余的公式将显示为空白。

excel中的表格中的x / y值列表

1 个答案: