使用 Excel 加载项答案

【问题标题】：Working on Excel add ins使用 Excel 加载项
【发布时间】：2013-01-22 23:32:53
【问题描述】：

我正在使用以下代码开发一个 excel 插件。我创建了一个类库并添加了以下代码

using System;
using System.Collections.Generic;
 using System.Linq;
 using System.Text;
  using System.Runtime.InteropServices;
  using Microsoft.Win32;

  namespace MyCustomAutomation
  {

// Replace the Guid below with your own guid that

// you generate using Create GUID from the Tools menu

[Guid("5268ABE2-9B09-439d-BE97-2EA60E103EF6")]
[ClassInterface(ClassInterfaceType.AutoDual)]
[ComVisible(true)]
public class MyFunctions
{
    public MyFunctions()
    {

    }

    public double MultiplyNTimes(double number1, double number2, double timesToMultiply)
    {
        double result = number1;
        for (double i = 0; i < timesToMultiply; i++)
        {
            result = result * number2;
        }

        return result;


    }


    [ComRegisterFunctionAttribute]
    public static void RegisterFunction(Type type)
    {

        Registry.ClassesRoot.CreateSubKey(

          GetSubKeyName(type, "Programmable"));

        RegistryKey key = Registry.ClassesRoot.OpenSubKey(

          GetSubKeyName(type, "InprocServer32"), true);

        key.SetValue("",

          System.Environment.SystemDirectory + @"\mscoree.dll",

          RegistryValueKind.String);
    }

    [ComUnregisterFunctionAttribute]
    public static void UnregisterFunction(Type type)
    {

        Registry.ClassesRoot.DeleteSubKey(

          GetSubKeyName(type, "Programmable"), false);
    }

    private static string GetSubKeyName(Type type,

      string subKeyName)
    {

        System.Text.StringBuilder s =

          new System.Text.StringBuilder();

        s.Append(@"CLSID\{");

        s.Append(type.GUID.ToString().ToUpper());

        s.Append(@"}\");

        s.Append(subKeyName);

        return s.ToString();

    }
   }
  }

我安装了它，该函数在 excel 中运行良好。我可以使用返回值的 MultiplyNTimes 函数。但是我的问题是，当我从单元格调用函数时，结果显示在同一个单元格本身中，而我希望结果在被调用单元格以外的任何单元格中播放。我完全无能为力，因为我无法到达任何方向。请帮忙

【问题讨论】：

那么你希望结果放在哪个单元格呢？
假设公式是用 A1 写的，我希望答案写在 B1 或 C1 中。
让公式设置其他单元格对于 Excel 用户来说是完全违反直觉的。也许你应该重新考虑你的设计。

标签： c# vsto excel-2007 add-in user-defined-functions

【解决方案1】：

要将结果保存在另一个单元格中，只需将结果作为数组返回。因此，作为 MultiplyNTimes 函数的另一个版本的示例，它可以写成：

 public double[] MultiplyNTimesNextCell(double number1, double number2, double timesToMultiply)
{
       // result[0] is the value returned on the first cell
       // result[1] is the value returned on the next cell
       double[] result = new double[] {0, number1};
       for (double i = 0; i < timesToMultiply; i++)
       {
            // hardcoded to result[1] where to return the result
            result[1] = result[1] * number2;
       }

        return result;
}

然后在Excel中使用该函数时，必须使用数组公式语法，也就是说如果在A1中输入该函数，然后同时选中A1和B1单元格，然后按F2，再按Ctrl+Shift+Enter

另外请注意，我只是在输入公式的单元格中使用了 0 来返回。如果您希望将其更改为不同类型的另一个值，您可以使用对象数组作为结果数据类型。

例如，你可以这样重写它：

public object[] MultiplyNTimesObj(double number1, double number2, double timesToMultiply)
{
     object[] result = new object[] { "MultiplyNTimesObj=", number1 };
     for (double i = 0; i < timesToMultiply; i++)
     {
         result[1] = (double)result[1] * number2;
     }

     return result;
}

【讨论】：