excel - 打印集合中的条目

Question

我有一个包含 x 个项目的集合。我只需要将该集合的内容输出到 Excel 列中。

For Each item In myCollection
'Insert code here

Next item  

知道我该怎么做吗？

Answer 1

您可以将起始行或列从 1 更改为您想要的任何值。您还可以通过将“r = r + 1”替换为“c = c + 1”来增加列来插入单元格。

注意:将“Sheet1”更改为您的工作表名称，这只是我使用的默认名称，因为我不知道您的实际工作表的名称。

Dim r As Integer
Dim c As Integer
r = 1 'Row 1
c = 1 'Column A
For Each item In myCollection
    ThisWorkbook.Worksheets("Sheet1").Cells(r, c).Value = item
    'Increment Row by 1
    r = r + 1
Next item