VBA多区间判定不在范围内处理该数据(主要是没学过字典、数组)

朝天子灬星辰 · 发表于 2023-4-4 17:27

蓝桥玄霜发表于 2023-4-4 10:48
建议做一个最终效果看看，不然不明白你想要得到什么结果。

文档有详细描述，烦请查看。谢谢！

朝天子灬星辰 · 发表于 2023-4-4 17:28

3190496160 发表于 2023-4-4 10:53
别人不是做你的工作的，所以，求助务必具体描述你的需求，才可能得到别人的帮助

文档有详细描述，烦请查看。谢谢！

朝天子灬星辰 · 发表于 2023-4-4 17:33

准提部林发表于 2023-4-4 13:02
先猜一回//

我把详细说明加载在文档，麻烦看一下。谢谢！

准提部林 · 发表于 2023-4-5 09:50

朝天子灬星辰发表于 2023-4-4 17:33
我把详细说明加载在文档，麻烦看一下。谢谢！

數值格式又不一樣//

Xl0000056.rar (16.51 KB, 下载次数: 5)

朝天子灬星辰 · 发表于 2023-4-5 10:51

准提部林发表于 2023-4-5 09:50
數值格式又不一樣//

感谢大哥的帮助。
我测试了一下，如果4个断点区间，暂时只能识别第一排。

朝天子灬星辰 · 发表于 2023-4-5 10:58

朝天子灬星辰发表于 2023-4-5 10:51
感谢大哥的帮助。
我测试了一下，如果4个断点区间，暂时只能识别第一排。

我调试了第一行：[ab6].End(4)，好像可以。烦请指正！

准提部林 · 发表于 2023-4-5 10:58

朝天子灬星辰发表于 2023-4-5 10:51
感谢大哥的帮助。
我测试了一下，如果4个断点区间，暂时只能识别第一排。

目前有符合的斷點
52150 ~ 52200
53050 ~ 53100

桩号都是以10為進位的~~

准提部林 · 发表于 2023-4-5 11:00

代碼很簡單,
自行改看看吧!!!

准提部林 · 发表于 2023-4-5 12:26

朝天子灬星辰发表于 2023-4-5 10:58
我调试了第一行：[ab6].End(4)，好像可以。烦请指正！

合併格用太多, 若是固定行數, 直接用指定位址
For Each xR In Range("B38:B95")

For Each xR In Range("AC38:AC95")

		自动登录	找回密码
密码			免费注册

[求助] VBA多区间判定不在范围内处理该数据(主要是没学过字典、数组)