LightTools中VBA宏的编写入门（1）

yinlovetian

在Lighttools的使用中往往需要多次增加或者减少一个值（很小的量）然后获取一些图像和数据，此时可使用宏或者借助外部的 EXCEL\VB\c++\MATLAB或者其它，现以EXCEL中的VB语言编程实现二者之间的链接，后续更新一些小技术完成数据和图像的输出(matlab如果可以的话，再抽时间完成)。本次目标完成二者之间的通讯，并完成LT说明中的例子：
1 打开excel，并再如下图中将 开发工具 勾选上，并点击确认，回到excel页面。

   
2 点击开发工具------->Visual Basic，进入VB编辑界面，如果第一次进来是没有我图中的前两项文件；
然后点击 选中的project并点击工具------->引用，找到LightTools 4.0 Type Libary（尽量选择高版本），点击确定。

3 打开一个LT文件（新），如下

4 回到VB界面，点击 运行-------> 宏，新建test宏，然后输入如下代码（保证只有一个LT在运行不然会报错？），点击运行（要保存一下Excel），
最后LT中实现了创建一个立方体。

至此已完成excel和LT的通讯，后续实现LT光学仿真，并输出数据到excel中。

yz9527

我用WPS 表格做不出来！是不是太菜了！

啥都学不会

请问，如果同时打开了多个Lighttools文件，需要使用PID对打开的不同lighttools文件进行交互，如何实现呢？我记得是先命名一个PID，大概是下面这两行，但是我尝试了不可行
Dim myPID As Long

Set lt = New LTAPI4
Set js = New LTCOM64.JSNET
myPID = 2524
Set lt = js.GetLTAPI4FromPID(myPID)
后面接操作指令，但是运行报错

yinlovetian

啥都学不会 发表于 2023-12-6 23:01
请问，如果同时打开了多个Lighttools文件，需要使用PID对打开的不同lighttools文件进行交互，如何实现呢？ ...

Note: The program must reference LightTools type library 2.0 or higher and LTLocator 2.0 type library.

zqw334455

啥都学不会 发表于 2023-12-6 23:01
请问，如果同时打开了多个Lighttools文件，需要使用PID对打开的不同lighttools文件进行交互，如何实现呢？ ...

你好，这个问题解决了吗

桃酱

为啥我运行了宏，然后LT也啥反应都没有？

yinlovetian

还缺少一个库

桃酱

yinlovetian 发表于 2024-1-20 13:46
还缺少一个库

重新试了下，显示错误还是“错误: Unknown variable "Block3PtXYZ".  是版本问题吗，还是啥？我的是LT23.03，EXCEL存的是“Microsoft Excel 启用宏的工作表 (.xlsm)”格式

arthas

桃酱 发表于 2024-1-20 15:44
重新试了下，显示错误还是“错误: Unknown variable "Block3PtXYZ".  是版本问题吗，还是啥？我的是LT23. ...

我也是报这个错误，不知道咋回事

banxia123

桃酱 发表于 2024-1-20 15:44
重新试了下，显示错误还是“错误: Unknown variable "Block3PtXYZ".  是版本问题吗，还是啥？我的是LT23. ...

少打了空格
lt.Cmd "Block3Pt " & lt.Coord3(0, 0, 0) & lt.Coord3(0, 1, 0) & lt.Coord3(0, 0, 2)