Question

我有一份运动员的工作表，其名字全部出现在一行中。我想获取这些名称（也就是整列）下面的所有数据，以便我可以操纵数据。我的问题是我不熟悉Excel VBA中的可用方法或功能，所以我只是走了这么远：

Dim MyArray(0 to 9) as String

MyArray(0) = "Molly"
MyArray(1) = "Jane"
MyArray(2) = "Louis"
MyArray(3) = "Omar"
MyArray(4) = "Wendy"
MyArray(5) = "Greg"
MyArray(6) = "Tina"
MyArray(7) = "Andrew"
MyArray(8) = "Jen"
MyArray(9) = "Lucy"

我正在考虑创建一个脚本，该脚本将查看所有名称并选择名称与Array中的值匹配的列。

编辑：我已经上传了一个示例WS here以供参考（请原谅我，如果这不符合SO标准，仍然试图弄清楚这个网站是如何运作的，我不会有足够的代表发布图像：D）。我对操纵＆＃34; Total＆＃34;中的数字感兴趣行，并需要展示它（以及它所属的特定名称）。我想在WS中弹出这些名称的所有实例上迭代这个操作，因此需要一个循环的分类

再次感谢提示/帮助！

Answer 1

您可以循环遍历列。下面的代码假设列和＆amp;您的数组的顺序相同，并且您对第1页的每列的前10行感兴趣。

With Worksheets (1)
For x = 1 to (UBound (MyArray) +1)
    ' Select column
    Range (.Cells (1, x), .Cells (10, x)).Select
    ' Do whatever you want with the data
    '
Next x
End With

你可以使用If语句来更聪明地检查每列中的第一个单元格是否与名称等匹配，但至少它是一个开始！

将Array中的值与工作表中的列匹配

1 个答案: