当前位置：文江博客话题详情

使用 VSTO 创建 UDF，而不使用 VBA

发布于 2024-07-13 03:51:32 字数 390 浏览 9 评论 0原文

与此类似问题（但在我的情况下不是 VSTO SE），但是，我只是想确认不可能在 Visual Studio 2005 和 Excel 2003 中使用纯 VSTO 创建 UDF - 所以，绝对清楚，我的问题是：

是否可以使用 Visual Studio 2005 和 VSTO 解决方案创建 Excel 2003 UDF，而不使用任何 VBA 或其他技巧？

我知道 ManagedXLL、ExcelDNA、Excel4Net 等，但暂时不想考虑这些。

谢谢

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

柠栀 2024-07-20 03:51:32

关于是否有办法绕过 COM 或 VBA，我认为这是不可能的（至少没有任何非常肮脏的技巧）。原因是 Office 执行外部代码（即您的加载项）的唯一方法是通过 COM。甚至 VSTO 仍在使用旧的 IDExtensibility2 COM 接口。 IDTEXtensibility2 是 Microsoft Office 应用程序的所有加载项都必须实现的 COM 接口。

在 VSTO 之前，Office 加载项必须自己实现此 IDTExtensibility2 接口。在此类基于 COM 的加载项（或 COM 可见的托管加载项）中，您只需按所述添加 UDF 此处。

但是，现在使用 VSTO，有一个额外的抽象层：VSTO 使用所谓的解决方案加载器实现 IDTExtensibility2，它是 VSTO 运行时提供的 dll。这意味着您的加载项不再是 COM 可见的。因此，如果您将 UDF 添加到 VSTO 外接程序，Office 将看不到它。

Paul Stubbs 在他的博客上解释了如何使用 VSTO 和 VBA：< strong>如何在 VSTO 托管代码中创建 Excel UDF

使用 VSTO 中的函数创建一个类
 
  公共类 MyManagedFunctions 
      公共函数 GetNumber() 作为整数 
          返回 42 
      结束功能  
  结束课程 
  
将您的类连接到 VSTO 中的 VBA
私有子ThisWorkbook_Open()处理Me.Open 
      Me.Application.Run("RegisterCallback", New MyManagedFunctions) 
  结束子 
  
为托管代码创建 Hook 并为 VBA 中的函数创建包装器
在电子表格或文档的 VBA 模块中
将 ManagedObject 调暗为对象 

  公共子RegisterCallback（回调作为对象） 
      设置托管对象 = 回调 
  结束子 

  公共函数 GetNumberFromVSTO() 作为整数 
      GetNumberFromVSTO = ManagedObject.GetNumber() 
  结束功能 
  
现在您可以输入=GetNumberFromVSTO()
在单元格中，当 excel 启动单元格时
值应为 42。

Concerning whether there is a way around COM or VBA I don't think that it is possible (at least not without any very dirty tricks). The reason is that the only way Office can execute external code (i.e. you add-in) is via COM. Even VSTO is still using the old IDTExtensibility2 COM interface underneath. IDTExtensibility2 is a COM interface that all add-ins for Microsoft Office applications must implement.

Before VSTO, Office add-ins had to implement this IDTExtensibility2 interface themselves. In such a COM based add-in (or COM-visible managed add-in) you can simply add your UDF as described here.

However, now with VSTO, there is an additional layer of abstraction: VSTO uses a so-called Solution Loader implementing IDTExtensibility2, which is a dll provided by the VSTO runtime. This means that your add-in is no longer COM-visible. Hence, if you added a UDF to your VSTO add-in it won't be visible to Office.

Paul Stubbs explains on his blog how to do with VSTO and VBA: How to create Excel UDFs in VSTO managed code

Create a class with your functions in VSTO
<System.Runtime.InteropServices.ComVisible(True)>
Public Class MyManagedFunctions
    Public Function GetNumber() As Integer
        Return 42
    End Function 
End Class
Wire up your class to VBA in VSTO
Private Sub ThisWorkbook_Open() Handles Me.Open
    Me.Application.Run("RegisterCallback", New MyManagedFunctions)
End Sub
Create Hook for managed code and a wrapper for the functions in VBA
In a VBA module in your spreadsheet or document
Dim managedObject As Object

Public Sub RegisterCallback(callback As Object)
    Set managedObject = callback
End Sub

Public Function GetNumberFromVSTO() As Integer
    GetNumberFromVSTO = managedObject.GetNumber()
End Function
Now you can enter =GetNumberFromVSTO()
in a cell, when excel starts the cell
value should be 42.

回复收藏 0 原文

小傻瓜 2024-07-20 03:51:32

我不明白你为什么要这样做？

VSTO 和通过 COM 互操作（来自 .NET）公开 UDF 是两个不同的任务。
为什么要在 VSTO 项目中托管 UDF 方法？

您认为有必要在 VSTO 中使用 UDF 吗？

回复收藏 0 原文

三月梨花 2024-07-20 03:51:32

在这篇文章中，Eric Carter 继续解释了如何做你要求的事情。在顶部，他甚至链接到上述博客文章的更新。

回复收藏 0 原文

无声情话 2024-07-20 03:51:32

按照 Eric Carter 的说明创建 UDF，并将 Excel 范围作为参数传递给 UDF。您可以使用给定范围通过 VSTO 访问 Excel 的对象模型：
Excel.Range rg = param1 as Excel.Range;
Excel.Workbook wb = rg1.Worksheet.Application.ActiveWorkbook;

回复收藏 0 原文