arrays - 将单个数组值打印到单元格的 Excel 宏

Question

我已经搜索了这样做的答案，但没有找到类似的情况。我有一组数据要放入数组中，然后将其打印到另一组单元格中。

前任。A公司，A部门，PriceA B公司，B部门，PriceB C公司，C部门，PriceC

依此类推，行数将是动态的。我需要打印每组值并将它们格式化为不同的单元格，但是因为我不知道行数，所以我确定该怎么做。

Answer 1

如果您的数据集每次都从同一区域开始，并且数据之间没有空单元格，您总是可以执行以下操作：

Dim rngData As Range

Set rngData = Range("A2").End(xlDown)

在上面的示例中，我假设您的数据从单元格 A2 开始并保留在 A 列中，数据之间没有空格。这相当于选择单元格 A2 并按住 shift 然后按下。它将选择所有单元格。然后，您可以遍历范围内的每个单元格，并使用 For ... 每个循环执行您需要的任何操作，例如：

For Each C in rngData
'Do whatever you want for each cell
Next C

您可以像使用单元格一样使用 C。例如，C.Value将返回您所在的单个单元格的值。

这是相当广泛的，因为我不确定您的数据是如何设置的，但我希望您觉得这很有用。