在Excel中使用Javascript

Question

我目前正在创建一个运行蒙特卡罗模型的Excel工作簿.虽然模拟器代码目前使用的是Javascript,但考虑到团队对这种语言缺乏经验,完全移植到VBA似乎并非易事.所以,我已经能够将javascript组件合并到一个WSC文件中,该文件运行良好.(以下简化示例.)

    Sub Simulate()
        Set ATPSim = GetObject("script:http://www.example.com/ATPSim.wsc")
        'Set ATPSim = GetObject("script:C:\ATPSim.wsc")
        Dim ParamOne As Integer
        ParamOne = Range("B2").Value
        Dim ParamTwo As Double
        ParamTwo = Range("B3").Value
        Dim ParamThree As Double
        ParamThree = Range("B4").Value
        Range("B1").Value = ATPSim.simulate(ParamOne, ParamTwo, ParamThree)
    End Sub

不幸的是,这需要我托管javascript代码或依靠不熟练的用户来更新绝对路径.有自成一体的解决方案吗？我宁愿将所有内容保存在一个.xlsm文件中,该文件可以通过电子邮件发送给用户.

Answer 1

您应该能够在 COM 组件中托管 JS 并使用 WSH 来访问它。

请参阅此处的示例：如何在 Excel 宏中使用 JavaScript？