首页 > 解决方案 > 如何循环遍历单元格值?

问题描述

我被困在循环单元格值中。

它是关于通过使用 VBA 从 Excel 文件中导出数据来形成 Word 文件。

我想遍历某些单元格(Ax ~ Ay)并将这些单元格中的文本导出到 Word。

wDoc.Content.InsertAfter Range("A1")
wDoc.Content.InsertAfter Range("A2")
wDoc.Content.InsertAfter Range("A3")

我想循环通过单元格 A1~ max。

我认为该循环与其他类型的 for 循环类似,但我想不出如何仅更改 for 循环中单元格的数字部分。

首先我认为这类似于将变量分配给单元格的数字部分,然后使用“for”但是,它不起作用,因为我猜我为单元格分配了“”。

标签: excelvbaloops

解决方案


只需从 1 到 3 循环(根据您要循环的行号

Dim iRow As Long
For iRow = 1 To 3
    wDoc.Content.InsertAfter ThisWorkbook.Worksheets("Sheet1").Range("A" & iRow).Value
Next iRow

请注意,如果Range不指定它应该在哪个工作簿和工作表中,则永远不要使用 a。


推荐阅读