在ACAD中拾取文字并在Excel中定位单元格

eachy · 发表于 2016-2-2 14:42:40

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

Excel ActiveX 中查找文字的方法是 Find ，对应的对象有 WorksheetFunction 和 Range，一般使用 Range 对象，Excel 手册中 VBA 例子是这样

示例
本示例在工作表的单元格区域 A1:A500 中查找包含值 2 的所有单元格，并将这些单元格的值更改为 5。

With Worksheets(1).Range("a1:a500")
Set c = .Find(2, lookin:=xlValues)
If Not c Is Nothing Then
      firstAddress = c.Address
      Do
         c.Value = 5
         Set c = .FindNext(c)
      Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With

中 AutoCAD 中使用 ActiveX 的代码如下

游客，如果您要查看本帖隐藏内容请回复

HLCAD · 发表于 2016-2-2 23:11:21

好久不见网站热闹了，真心希望能见到往日繁华。

cad大渣渣 · 发表于 2016-2-2 23:27:38

受教许多。。

279491611 · 发表于 2016-2-3 10:01:17

谢谢分享，受教了！:)

dnbcgrass · 发表于 2016-2-3 22:29:46

学习学习:lol

q3_2006 · 发表于 2016-2-13 16:56:52

想看E大帖子真不容易...现在才能登录...

shenfjliu · 发表于 2016-2-13 17:27:43

看看，学习学习

auva · 发表于 2016-2-14 19:49:52

回复看看前辈的好东西！

viphappy · 发表于 2016-2-15 16:06:08

回复看看，学习学习

liuyj · 发表于 2016-2-15 20:34:34

收藏起来慢慢学

lijiao · 发表于 2016-2-18 10:02:56

大safs噶是的哈东方红煽风点火撒范德萨福建省特如

shenfjliu · 发表于 2016-2-18 23:23:47

收藏起来慢慢学

sicky111 · 发表于 2016-2-18 23:59:38

是LISP吗

soc99@163.com · 发表于 2016-2-19 21:55:11

下载学习学习，谢谢分享。

zzyong00@163.co · 发表于 2016-2-29 22:30:42

看看..........................

账号		自动登录	找回密码
密码			立即注册

[原创] 在ACAD中拾取文字并在Excel中定位单元格

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

本帖被以下淘专辑推荐:

相关帖子