使用Excel VBA 来运行Aardio代码
By
the100s
at 2021-11-06 • 1人收藏 • 1416人看过
首先我们打开COM组件范例“创建ActiveX EXE”,然后进行发布。打开发布目录,运行AardioCOM.exe并点击是注册控件。
打开 WPS,新建带宏的文件,打开VBA编辑器,点击“工具”--“引用”--勾选控件。
回到表格界面,用WPS的开发工具给单元格画一个按钮,指定宏代码。
按钮代码(VBA):
Private Sub CommandButton1_Click() Dim sample, num Set sample = CreateObject("AardioTestControl.Sample") 'num = sample.Add(1, 3) 'MsgBox num code = ActiveSheet.Range("e6").Text re = sample.Aardio(code) ActiveSheet.Range("e7").value = re End Sub
找一个范例,复制全部Aardio代码到e6单元格。
把Aardio的lib文件夹复制,到AardioCOM.exe的发布目录下粘贴出来。(因为控件需要引用别的库文件)。
最后运行效果如图:
各种范例都可贴来一试,非常6
登录后方可回帖