想要迭代 Excel VBA 中所选内容中的每一行。
我有:
Dim rng As Range
Dim s As String
Set rng = Application.Selection
Debug.Print "c :" & rng.Address
这会打印
c :$B$22:$C$29
如何从第 22 行到第 29 行循环/解析出开始行和结束行?
在单独的 int 变量中获取开始列和结束列?
最佳答案
在 Excel 中循环访问一系列单元格的通用解决方案:
Sub LoopSelection()
Dim cel As Range
Dim selectedRange As Range
Set selectedRange = Application.Selection
For Each cel In selectedRange.Cells
Debug.Print cel.Address, cel.Value
Next cel
End Sub
从最左上角的单元格开始迭代,然后向下迭代。
关于vba - Excel VBA : selected cells loop,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/21526863/