快捷導(dǎo)航

C#?創(chuàng)建vba用的類庫

更新時(shí)間：2026年04月22日 10:14:12 作者：fengyehongWorld

本文詳細(xì)介紹了如何在VBA中使用C#編寫的COM組件,首先創(chuàng)建一個(gè)C#項(xiàng)目,定義ComVisible特性和生成GUID,然后修改.csproj文件并編譯生成.dll文件,之后將該.dll文件注冊到系統(tǒng),最后在VBA代碼中使用CreateObject方法創(chuàng)建該對象并調(diào)用其方法

一. 需求

??寫vba代碼的時(shí)候，會想下面這樣使用CreateObject創(chuàng)建一個(gè)對象，然后使用其中的方法

Sub SendGetRequest()
    Const url = "https://api.github.com"
    ' 創(chuàng)建http請求對象
    Dim http As Object
    Set http = CreateObject("WinHttp.WinHttpRequest.5.1")
    ' 發(fā)送get請求
    http.Open "GET", url, False
    http.Send
    Debug.Print http.ResponseText
End Sub

??先要求在vba中使用CreateObject("ToolLib.ToolCom")創(chuàng)建一個(gè)對象，然后使用其中的方式。

Sub MainSub()
    Dim obj As Object
    Set obj = CreateObject("ToolLib.ToolCom")
    MsgBox obj.Hello("World")
    MsgBox obj.Add(3, 5)
End Sub

??用C# 寫一個(gè)能被VBA調(diào)用的COM組件，把.NET類暴露成COM可見對象。

C#寫類
標(biāo)記為COM可見
編譯成DLL
注冊到系統(tǒng)（regasm）
VBA 通過CreateObject調(diào)用

二. 初始化項(xiàng)目

??創(chuàng)建一個(gè)類庫

dotnet new classlib -n ToolLib

??修改.csproj文件如下所示

<Project Sdk="Microsoft.NET.Sdk">
  <PropertyGroup>
	<!-- 推薦用 .NET Framework -->
    <TargetFramework>net48</TargetFramework>
	<!-- 關(guān)閉自動(dòng)注冊 -->
    <RegisterForComInterop>false</RegisterForComInterop>
	<!-- 關(guān)閉自動(dòng)生成AssemblyInfo -->
	<GenerateAssemblyInfo>false</GenerateAssemblyInfo>
	<!-- 不輸出調(diào)試信息 -->
    <DebugType>none</DebugType>
  </PropertyGroup>
</Project>

三. 項(xiàng)目代碼

3.1Tool.cs主類

??Tool.cs

[ComVisible(true)]：設(shè)置Com可見, 否則vba無法使用
[Guid("xxxxx-xxxx-xxxx-xxxxxxx")]：類庫的唯一標(biāo)識符，可以使用 Visual Studio 生成。

using System.Runtime.InteropServices;
namespace ToolLib
{
	[ComVisible(true)]
	[Guid("1D4C98EC-D988-4D6C-8DD6-189E238D7B4E")]
	[InterfaceType(ComInterfaceType.InterfaceIsDual)]
	public interface IToolCom
	{
		int Add(int a, int b);
		string Hello(string name);
	}
	[ComVisible(true)]
	[Guid("6143FB0B-9C17-4859-860C-6DA4A466ECD1")]
	// 顯示聲明ProgId, 便于vba通過 CreateObject("ToolLib.ToolCom") 創(chuàng)建對象
	[ProgId("ToolLib.ToolCom")]
	[ClassInterface(ClassInterfaceType.None)]
	public class ToolCom : IToolCom
	{
		public int Add(int a, int b)
		{
			return a + b;
		}
		public string Hello(string name)
		{
			return $"Hello, {name}";
		}
	}
}

??生成GUID的方法

3.2AssemblyInfo.cs配置類

using System.Reflection;
using System.Runtime.InteropServices;
// 文件→屬性→詳細(xì)信息→文件說明
[assembly: AssemblyTitle("ToolLib_Test")]
// vba→工具→引用 時(shí)顯示的信息
[assembly: AssemblyDescription("FengYeHong VBA COM Library")]
[assembly: AssemblyCompany("FengYeHong-Company")]
// 文件→屬性→詳細(xì)信息→產(chǎn)品名稱
[assembly: AssemblyProduct("ToolLib_for_vba")]
// 非常重要
// 類型庫 GUID
[assembly: Guid("9F3E7D2C-1234-4A56-8888-ABCDEF123456")]
// 文件→屬性→詳細(xì)信息→產(chǎn)品版本
[assembly: AssemblyVersion("1.0.0.1")]