如何使用C#从Excel工作表中删除VB代码?

Bas*_*dov 2 c# vb6 excel automation

有谁知道如何使用C#从Excel工作簿中删除所有 VB代码?此代码不起作用.它删除了第一个(最后一个)VBComponent,但在第二个上升了ArgumentException.

        VBProject project = workbook.VBProject;
        int componentsCount = project.VBComponents.Count;

        for (int i = componentsCount; i >= 1; i--)
        {
            VBComponent component = project.VBComponents.Item(i);
            project.VBComponents.Remove(component);
        } 
Run Code Online (Sandbox Code Playgroud)

有什么建议?:)

Bas*_*dov 5

我在Sam的帮助下解决了这个问题.我怀疑每个Excel工作簿都有一些不可删除的VBComponents,因此我们可以清除它们的内容,而不是删除它们.它现在有效.谢谢山姆.

            VBProject project = workbook.VBProject;

        for (int i = project.VBComponents.Count; i >= 1; i--)
        {
            VBComponent component = project.VBComponents.Item(i);
            try
            {
                project.VBComponents.Remove(component);
            }
            catch(ArgumentException)
            {
                continue;
            }
        }

        for (int i = project.VBComponents.Count; i >= 1; i--)
        {
            VBComponent component = project.VBComponents.Item(i);
                component.CodeModule.DeleteLines(1, component.CodeModule.CountOfLines);
        }
Run Code Online (Sandbox Code Playgroud)

不要忘记以后保存你的工作簿:)