代码之家 › 专栏 › 技术社区 › Duncan Bayne

从.NET中的VBA函数访问返回值?

office-interop vba excel .net c#

Duncan Bayne · 技术社区 · 15 年前

我在VBA中有以下代码(位于Excel 2007工作簿中):

Public Function Multiply(a As Double, b As Double) As Double
    Multiply = a * b
End Function

如果我从其他VBA代码调用乘法,它将返回正确的值。但是,当我从Cé调用multiple时:

var excel = new Application {Visible = true};
excel.Workbooks.Open(filename);
var returned = excel.Run("Sheet1.Multiply", (Double) a, (Double) b);

... 乘法发生了(我可以通过在VBA中向乘法函数添加跟踪来验证这一点),但是返回的值在我的C代码中不可用; returned null .

3 回复 | 直到 15 年前

shA.t Rami Jamleh 10 年前

是否尝试将函数移到Excel中的常规模块(而不是工作表模块)?

AjV Jsy 11 年前

一个简单的例子:

电子表格.xlsm 有 Module1 包含:

Public Function test() As String
  test = "hello 1234"
End Function

objExcel

Dim result = objExcel.Run("Module1.test")
MsgBox(result)

... 生产 hello 1234

因为我最初是用 ? module1.test() (成功) objExcel.Run("Module1.test()") 去工作-但我犯了个错误: Cannot run the macro .... The macro may not be available in this workbook or all macros may be disabled.

-4

AeroX arpit desai 12 年前

尝试将乘法函数修改为如下代码:

Public Function Multiply(a As Double, b As Double) As Double
    return a * b
End Function

推荐文章

Kram Kramer · 通过vba自动调整文本大小以适应形状

1 年前

Swapnil Supekar · 将二维阵列转换为一维阵列,并将一维阵列粘贴到另一张图纸上

1 年前

Eric · 我有邮政编码替换问题Excel VBA

1 年前

Chasester · VBA使用嵌套的DIV抓取URL

1 年前

jkp · 特殊字符复选标记

1 年前

Iron Man · 代码插入和复制到错误的工作表

1 年前

NoFafo · 将文本框放入数组进行格式化

1 年前

Smokestack · 过滤器范围C3:G3并粘贴到其他单元格

1 年前

Julie S. · Excel VBA for循环的代码帮助,用于检查多个ListBoxes是否有值?

1 年前

Kram Kramer · 如何通过vba代码将Chart xAxes字体颜色从黑色更改为红色?

1 年前