API中的工作表模板文件路径位置？
我已经创建了一个VBA模块，它将简单地设置我们所有的搜索路径、文件名和文件位置(支持路径)。我需要的几乎所有东西都在Preferences集合中，但是我找不到设置工作表模板文件路径位置的方法。有人知道吗？
Preferences.Files.???? = "Path"
感谢马克
**** Hidden Message ***** debug.print路径，你会发现yadayada； yadayada；即用；
分隔的一个长字符串，如果你添加到它的工作正常。
设置首选项=ThisDrawing.Application.Preferences
支持路径=Preferences.Files.SupportPath
debug.print支持路径 我认为他正在寻找这个(见下图)，在这种情况下，你发布的内容不会显示特定的路径。
从我所看到的，没有办法(通过VBA)设置路径。我确信它被埋在注册表的某个地方，你可以修改它指向你的SS模板文件。只是大声说出自己的想法。
嗨，马特
，是的，谢谢你，这正是我所说的，我在任何地方都找不到它。
如今，AutoCAD似乎非常擅长添加出色的新功能，但未能在VBA中提供它们。对于我如何以编程方式添加该路径，您还有其他建议吗？
谢谢
马克 如果您知道如何通过LSP或VBA更改注册表，您可以用这种方式修改它。
我在 HKCU \软件\ Autodesk \ AutoCAD \ r 17.0 \ ACAD-5106:409 \配置文件\[您的配置文件名称]\首选项\ AecProject50 \图纸集模板中找到了该设置
这是针对ABS 2007.1的。 不，我确实知道如何做这件事，也许我可以张贴一个新帖子来请求一些帮助？
标记 FWIW，
我是如何通过 lisp：
(vla-put-pagesetupoverridestemplatefile
(vla-get-files
(vla-get-preferences
(vlax-get-acad-object)
)
)
"c:\\"
)
或者 this：
(setenv "AlternativePageSetUpsTemplate" "C:\\")
Ron 来做到这一点
的
Ron，
你是说Page Setup Overide吗？
那是指工作表模板文件位置吗？
如果是这样，我确实在VBA中看到了
标记
Ron：这是VBA中的，但是，这是用于＜br＞工作表创建和页面设置覆盖的默认模板＜br＞我需要上面的方法＜br＞图纸集模板文件位置＜br＞再次感谢＜br＞标记 将它放在一个模块中(我认为它来自Randall Rath)代码3]
这为我更改了密钥，但我没有使用工作表集来测试它。
Sub SetSheetSet()
Dim CadStart As String
Dim KeyName As String
Dim valueName As String
Dim DefaultData As String
Dim dataValue As String
'This is my key "HKEY_CURRENT_USER\Software\Autodesk\AutoCAD\R17.0\ACAD-5005:409\Profiles\Lex2007\General"
KeyName = "Software\Autodesk\AutoCAD\R17.0\ACAD-5005:409\Profiles\Lex2007\General"
valueName = "SheetSetTemplatePath"
dataValue = "YourTemplatePath"
WriteStringValue HKEY_CURRENT_USER, KeyName, valueName, dataValue
Debug.Print ReadRegVal(HKEY_CURRENT_USER, KeyName, valueName, DefaultData)
End Sub
页:
[1]
2