如何使用Excel 2007 VBA在每列的多行/列范围上循环？

Question

我循环使用Excel 2007 VBA遍历具有多个行和列的范围。

我专门尝试遍历用户选择的范围，并对范围内的每一列执行计算，并在每一列下方输出两行。

Answer 1

您可以使用来检索当前选择的范围

Application.Selection.Address

这将为您提供一个范围值（Selection属性返回一个Range对象），该范围值看起来像“ $B$4:$J$20 ”。

既然您现在可以使用一个范围，则可以使用类似以下内容的方法遍历每列：

For Each col In userSelectedRange.Columns

   ...

Next

Columns属性再次返回一个Range对象，您可以对其进行进一步迭代或对其进行其他计算（您的确切需求对您的问题不太清楚）。

要将计算结果过帐到每列上方两行（例如小计或类似结果），请尝试使用偏移功能：

Cells.Offset(-2, 0)

如果您能够围绕所需的计算类型提供更多详细信息，我也许可以为您如何实现提供更多详细信息。