[lsp][vba] 批处理程序的几种方法.txt
来自「看看吧,很好的东西,」· 文本 代码 · 共 14 行
TXT
14 行
(vl-load-com)
(vl-load-all "c:\test.lsp")
Sub test()
Dim docs As AcadDocuments
Set docs = Documents
Dim doc As AcadDocument
Dim i As Integer
For i = 0 To docs.Count - 1
Set doc = docs.Item(i)
doc.SendCommand "macro"
Next
End Sub
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?