VSTO 学习笔记（十二）自定义公式与Ribbon

最新推荐文章于 2024-05-31 09:04:24 发布

weixin_30475039

最新推荐文章于 2024-05-31 09:04:24 发布

阅读量785

点赞数

文章标签： c# runtime 数据库

原文链接：http://www.cnblogs.com/brooks-dotnet/archive/2011/08/30/2159983.html

版权

这几天工作中在开发一个Excel插件，包含自定义公式，根据条件从数据库中查询结果。这次我们来做一个简单的测试，达到类似的目的。

即在Excel 2010中添加一个Ribbon，包含4个自定义公式：仅仅是示例公式加减乘除。

最终效果：

测试代码下载

1、解决方案包含两个项目：

ExcelAddIn：Excel 插件

ExcelUDF：Excel 自定义公式

2、首先创建一个Excel 2010 Add-in项目：

3、添加一个可视化Ribbon：

4、在Ribbon的设计视图中，设置下RibbonTab的属性：

有个ControlIdType属性，当设置为Custom时，此Ribbon显示为Office中独立的一项；当设置为Office时，此Ribbon作为Add-In中的一项出现。

5、在MyRibbon中添加一个Menu，在其中放置四个按钮：

6、创建一个类库项目：

7、编写加减乘除四个函数和COM注册、反注册函数：

View Code

using System;
using System.Runtime.InteropServices;
using Microsoft.Win32;

namespace ExcelUDF
{
    [Guid( " E72F44C7-DD4A-4FA2-BC32-4EA9925749DB " )]
    [ClassInterface(ClassInterfaceType.AutoDual)]
    [ComVisible( true )]
     public class ExcelUDF
    {
         public int Add( int a, int b)
        {
             return a + b;
        }

         public int Subtract( int a, int b)
        {
             return a - b;
        }

         public int Multiply( int a, int b)
        {
             return a * b;
        }

         public int Divide( int a, int b)
        {
             return a / b;
        }

         #region COM Related

        [ComRegisterFunction]
         public static void RegisterFunction(Type type)
        {
            Registry.ClassesRoot.CreateSubKey(GetSubKeyName(type, " Programmable " ));
            var key = Registry.ClassesRoot.OpenSubKey(GetSubKeyName(type, " InprocServer32 " ), true );
            key.SetValue( "" , Environment.SystemDirectory + @" \mscoree.dll " , RegistryValueKind.String);
        }

        [ComUnregisterFunction]
         public static void UnregisterFunction(Type type)
        {
            Registry.ClassesRoot.DeleteSubKey(GetSubKeyName(type, " Programmable " ), false );
        }

         private static string GetSubKeyName(Type type, string subKeyName)
        {
            var s = new System.Text.StringBuilder();
            s.Append( @" CLSID\{ " );
            s.Append(type.GUID.ToString().ToUpper());
            s.Append( @" }\ " );
            s.Append(subKeyName);
             return s.ToString();
        }
         #endregion
    }

8、我安装的是Excel x64，需要手动注册自定义公式的程序集，为此在项目属性中的Build Events中写入批处理脚本来自动注册：

%windir%\Microsoft.NET\Framework64\v4.0.30319\regasm /codebase "$(TargetPath)"

这样在每次编译成功后就会自动注册该自定义公式。

9、在生成管理器中配置为 x64：

10、在Ribbon项目中添加调用自定义公式的代码：

View Code

using Microsoft.Office.Tools.Ribbon;

namespace ExcelAddIn
{
     public partial class RibbonDemo
    {
         private void RibbonDemo_Load( object sender, RibbonUIEventArgs e)
        {

        }

         private void btnAdd_Click( object sender, RibbonControlEventArgs e)
        {
            Globals.ThisAddIn.Application.ActiveCell.Formula = " =Add() " ;
        }

         private void btnSubtract_Click( object sender, RibbonControlEventArgs e)
        {
            Globals.ThisAddIn.Application.ActiveCell.Formula = " =Subtract() " ;
        }

         private void btnMultiply_Click( object sender, RibbonControlEventArgs e)
        {
            Globals.ThisAddIn.Application.ActiveCell.Formula = " =Multiply() " ;
        }

         private void btnDivide_Click( object sender, RibbonControlEventArgs e)
        {
            Globals.ThisAddIn.Application.ActiveCell.Formula = " =Divide() " ;
        }
    }

11、修改Ribbon项目属性，将 Excel设置为启动的扩展程序：