Excel 自动化插件 UDF 无法访问

Question

我创建了以下自动化插件：

namespace AutomationAddin
{
    [Guid("6652EC43-B48C-428a-A32A-5F2E89B9F305")]

    [ClassInterface(ClassInterfaceType.AutoDual)]
    [ComVisible(true)]
    public class MyFunctions
    {
        public MyFunctions()
        {
        }

        #region UDFs
        public string ToUpperCase(string input)
        {
            return input.ToUpper();
        }
        #endregion

        [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 2003，转到工具->加载项，单击自动化按钮，加载项出现在列表中。我添加它，它显示在插件列表中。但是，功能本身不会出现。如果我输入它，它就不起作用，并且如果我查看函数向导，我的插件不会显示为类别，并且函数也不在列表中。

我在 Windows 7 x86 上使用 Excel 2003。我使用 Visual Studio 2010 构建了该项目。该插件在使用 Visual Studio 2008 构建的 Windows XP 上运行良好。

Answer 1

事实证明 CLR 无法正常工作，安装了补丁后现在可以正常工作了。