c# - C# 和 VBA 之间的通信

Question

应老板的要求，我创建了一组脚本，用于定期监控某些设备和进程的状态。该信息随后使用相对复杂的 VBA 模块进行处理，该模块收集所有信息、应用公式、设置范围和生成图形等。

但是有两个问题：我是一个业余程序员，所以我的 VBA 程序效率很低。这对我来说不是什么大问题（我只是在它运行的时候起床喝杯咖啡），但对于其他用户来说，这可能会很麻烦，因为那时不知道为什么要花这么长时间。我想要进度的图形表示。应用程序的配置是通过文本文件完成的。我想提供一个不错的 GUI 来设置配置。

为了实现这一点，我正在寻找一种方法让我的 C# WinForms 应用程序与我的 VBA 应用程序进行通信。我知道如何从我的 C# 应用程序运行 VBA 例程，但我不知道如何让它们实时通信。

以下是我特别想要实现的两件事：

我已经有一个日志文件保存在 VBA 例程的末尾。相反，我想将日志/调试消息实时发送到我的 C# 应用程序（不仅仅是在应用程序结束时），以便消息可以显示在我的 GUI 应用程序中，因为它们是由 VBA 应用程序生成的.
我还希望 VBA 应用程序向我的 GUI 应用程序发送有关实时进度的信息，以便我可以在我的 GUI 应用程序中创建图形进度条。

我已经考虑过通过标准输出进行通信。我知道如何使用 C#/.Net 从标准输出读取数据，但我不确定如何使用 VBA 写入 StdOut 流。

我相信很多人会指出我想要达到的目标是愚蠢和过时的（或完全没有必要），但作为一个业余程序员，这对我来说似乎是一个非常具有挑战性和有趣的项目，它可以教会我一件事或两个。

score 10 · Accepted Answer

创建一个 C# COM 可见类非常简单，而且（正如您在评论中所说）它很有趣。这是一个小样本。

在新的 C# 库项目中，添加：

using System;
using System.Runtime.InteropServices;
using System.Windows.Forms;

namespace CSharpCom
{
    [ComVisible(true)]
    [InterfaceType(ComInterfaceType.InterfaceIsIDispatch)]
    //The 3 GUIDs in this file need to be unique for your COM object.
    //Generate new ones using Tools->Create GUID in VS2010
    [Guid("18C66A75-5CA4-4555-991D-7115DB857F7A")] 
    public interface ICSharpCom
    {
        string Format(string FormatString, [Optional]object arg0, [Optional]object arg1, [Optional]object arg2, [Optional]object arg3);
        void ShowMessageBox(string SomeText);
    }

    //TODO: Change me!
    [Guid("5D338F6F-A028-41CA-9054-18752D14B1BB")] //Change this 
    [InterfaceType(ComInterfaceType.InterfaceIsIDispatch)]
    interface ICSharpComEvents
    {
        //Add event definitions here. Add [DispId(1..n)] attributes
        //before each event declaration.
    }

    [ComVisible(true)]
    [ClassInterface(ClassInterfaceType.None)]
    [ComSourceInterfaces(typeof(ICSharpComEvents))]
    //TODO: Change me!
    [Guid("C17C5EAD-AA14-464E-AD32-E9521AC17134")]
    public sealed class CSharpCom : ICSharpCom
    {
        public string Format(string FormatString, [Optional]object arg0, [Optional]object arg1, [Optional]object arg2, [Optional]object arg3)
        {
            return string.Format(FormatString, arg0, arg1, arg2, arg3);   
        }

        public void ShowMessageBox(string SomeText)
        {
            MessageBox.Show(SomeText);
        }
    }
}

您将需要进入您的项目属性，进入“签名”选项卡，选中复选框以签署您的程序集，并创建一个新的“强名称密钥文件”。这将有助于防止您注册的 DLL 出现版本控制问题。

编译它，并regasm在 Visual Studio 命令提示符下注册 DLL。您将使用 32 位或 64 位 regasm，具体取决于您使用的 Office 版本...您将在C:\windows\Microsoft.NET\Framework或C:\windows\Microsoft.NET\Framework64（分别为 32 位和 64 位）中找到 RegAsm：

C:\windows\Microsoft.NET\Framework\v4.0.30319\RegAsm.exe /codebase /tlb CSharpCom.dll

这将在 Windows 中注册您的 DLL，因此现在在 VBA 编辑器中，您应该能够转到 Tools->References 并找到您的 COM 命名空间“CSharpCom”。选中该框，现在您应该能够在 VBA 中创建 COM 对象：

Sub TestCom()
    Dim c As CSharpCom.CSharpCom
    Set c = New CSharpCom.CSharpCom
    c.ShowMessageBox c.Format("{0} {1}!", "Hello", "World")
End Sub

您可以将表单添加到您的 COM 对象，并在 VBA 调用特定方法时打开它们；您应该能够使用它来创建带有进度条的表单。不过，要考虑的一件事是 VBA 是单线程的。这意味着在您的代码运行时，其他所有内容都会被冻结，因此事情可能会变得有些棘手。

在我的脑海中，你可以在你的 COM 可见类中创建 3 个方法：一个打开表单，一个更新进度（在 VBA 调用 COM 对象上的 update() 方法后立即调用 VBA 的 DoEvents() 方法，以允许 Office 处理屏幕更新），以及关闭它。您应该在表单上调用 Dispose()；这可以在“关闭”方法中完成，但我认为如果你的 VBA 崩溃，它可能会导致内存泄漏/问题，并且你的 close 方法永远不会被调用——只是需要考虑的其他事情。

score 5 · Accepted Answer

您可以在 VB6 项目中使用 .NET DLL，并创建您在程序集中定义的任何对象的实例。这是通过创建类型库文件 (.tlb) 为 COM 互操作（在 VB6 中使用）注册 .NET 程序集 (.dll) 来完成的。.tlb 文件包含额外信息，以便您的 VB6 项目可以使用您的 .dll。请注意，您的 VB6 项目不会引用 .dll，而是引用相应的 .tlb 文件。您可以使用 Regasm.exe 实用程序来生成和注册类型库并注册托管程序集的位置。然后只需创建一个 .NET 对象的实例，无论它是 WinForm 还是其他一些很酷的类。=）。

Dim MyDotNetObject As MyDotNetClass

Set MyDotNetObject = New MyDotNetClass
MyDotNetObject.SomeMethod(value1, value2)

''end of execution
Set MyDotNetObject = Nothing

请参阅： http: //support.microsoft.com/default.aspx ?scid=kb;en-us;817248

score 4 · Accepted Answer

我相信此链接中的代码大致可以满足您的要求：

C# 代码创建一个 COM 对象（在示例中它是 IE，但根据您的描述，您已经设法创建了 VBA 例程的实例）
它将 .Net 事件处理程序（使用 +=）附加到 COM 对象引发的事件（当标题更改时）
它定义了示例事件处理代码

http://msdn.microsoft.com/en-us/library/66ahbe6y.aspx

我不自称理解这段代码，我的目标是展示这个解决方案的复杂性！你真的应该在一个解决方案中构建它。一个完整的 VBA 解决方案将更快地开发（您只需要学习很容易的 VBA 形式），但是旧技术。一个完整的 C# 解决方案的开发速度会较慢，但随后您将开始学习 C#。

性能实际上是一个问题。如果它现在效率低下，当您有 5 倍的记录要处理时会发生什么？您应该在获得那么多记录之前解决性能问题。

score 0 · Accepted Answer

这个问题的其他答案涉及调用外部方法的 VBA 宏。但是有一个更简单的方法。您的 GUI 应用程序可以附加到工作簿SheetSelectionChange事件或工作表Change事件，这些事件将在任何值更改时触发。

因为您可能不想减慢所有速度，所以我建议添加一个额外的工作表，添加命名范围来描述每个值的含义，然后挂钩工作表更改事件以在这些值更改时拦截并更新您的 GUI。

c# - C# 和 VBA 之间的通信

4 回答 4

Related

Reference