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

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

例如A公司A部门PriceA B公司，B部门，价格B C公司，C部门，价格C

---

以此类推，行的数量将是动态的。我需要打印每一组值并将其格式化为不同的单元格，但因为我不知道行数，所以我确定如何执行此操作。

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

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

将返回您所在的单个单元格的值

---

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

您能添加您已有的代码吗？