AutoCAD VBA查找/搜索路径
AutoCAD 2010是否有人拥有AutoCAD VBA查找/搜索例程，可以放大图形中的stings，包括
街区等？与AutoCAD find命令类似。我想要一个我可以加入的常规
VBA批处理循环，用于一次搜索多个图形。我有很多画，我正在看，我认为
这对我有帮助。
非常感谢。 我不知道有任何VBA例程可以实现这一点，但一个优秀的LISP例程是Lee Mac的批量查找和替换文本。 我正在寻找一个搜索工具在VBA。不是替换例程。
放大文本以查看某个字符串是否在
绘画 像Renderman一样，你必须先搜索，然后才能替换！
这是搜索块，只需将serach更改为文本、多行文字等
Dim SS As AcadSelectionSet
Dim Count As Integer
Dim FilterDXFCode(1) As Integer
Dim FilterDXFVal(1) As Variant
Dim attribs As Variant
Dim BLOCK_NAME As String
On Error Resume Next
FilterDXFCode(0) = 0
FilterDXFVal(0) = "INSERT"
FilterDXFCode(1) = 2
FilterDXFVal(1) = "Myblockname"
Set SS = ThisDrawing.SelectionSets.Add("issued")
SS.Select acSelectionSetAll, , , FilterDXFCode, FilterDXFVal
For Cntr = 0 To SS.Count - 1
do what ever here and find string
这是对指定任务和隐含任务之间差异的极好“提醒”：眨眼：
谢谢你的代码片段，比格尔。干杯 找到并被李·麦克斯取代的只是一个搜索。
比格尔的代码完整吗？
非常感谢。
你告诉我们。。。在VBAIDE中测试时会发生什么？ 我没有实际的代码，但我使用了“Superfind”，这是一个非常强大的VBA查找和替换。不需要打开图纸，相当快的更换工具。如果你在网上搜索时找不到，请告诉我，我会发送给你。 乔伊！你好！我还需要superfind工具，如果您也能寄给我，我将不胜感激。我的电子邮件地址是francisquintos@yahoo.com.
非常感谢乔伊！
页:
[1]
2