excel - 具有多个范围的循环?VBA
问题描述
我想做一个具有多个范围的 for 循环,但我找不到“设置”范围的方法,你能帮我吗?
这是我的一个范围的代码:
Dim mycell As Range
Dim myrange As Range
Set myrange = src.Worksheets("Feuil1").Range("G1:500")
For Each mycell In myrange
data = mycell.Value
Next mycell
但是如何在 for 循环中同时处理两个范围以及在 if 条件中的一个范围和另一个 if 条件中的另一个范围之后呢?
解决方案
如果要循环两个不同(相同大小)的范围,则可以使用For...Next
循环:
Dim i As Long, data1, data2
Dim myrange1 As Range, myrange2 As Range
Set myrange1 = src.Worksheets("Feuil1").Range("G1:G500")
Set myrange2 = src.Worksheets("Feuil1").Range("J1:J500")
For i = 1 to myrange1.Cells.Count
data1 = myrange1.Cells(i).Value
data2 = myrange2.Cells(i).Value
'do something with data1 and data2
Next i
推荐阅读
- java - Java - 将 Yaml 解析为 Json
- mysql - 如何返回数据读取器的值(ASP.NET MVC)
- azure - 部署到 Azure 时,Service Fabric 示例应用程序缺少日志消息
- c# - 以编程方式在 Visual Studio 中打开项目时如何自动关闭或隐藏此 asp.net 主页窗口
- oracle - oracle:推迟外键检查不起作用
- python - Django// 如何在模板中显示复杂的深度数据
- javascript - 提交输入时,为什么不对控制台做出任何反应?
- django - 我无法解决的 Chrome 浏览器的 CSRF Cookie 错误
- apache-kafka - 多个 kafka 生产者设置:消除延迟/陈旧的写入
- android - androidx ViewModel MutableLiveData LiveData