求助各位大佬，VSTO插入工作表

aosmmas

Sub 宏2()
Sheets("Sheet1").Select
    Sheets.Add Type:="C:\cxd.xls" ’地址路径
End Sub

就是插入工作表，VBA 宏是这样的表述的
在VSTO里怎么表达啊，超级菜鸟求大佬教教
C# VB.NET都可以，只要实现操作就行，谢谢各位大佬

bajifeng

Private Sub ba()
        Dim xls As Excel.Application
        Dim wb As Excel.Workbook
        xls = Globals.ThisWorkbook.Application
        wb = xls.ActiveWorkbook
        wb.Sheets(wb.Sheets.Count).Select
        wb.Sheets.Add(Type:="C:\cxd.xls")
    End Sub

bajifeng

>>>>>>>>>>>>>

aosmmas

bajifeng 发表于 2020-10-21 18:44
Private Sub ba()
        Dim xls As Excel.Application
        Dim wb As Excel.Workbook

谢谢大佬，那个XLS=Globals.ThisWorkbook.Application 报错呢，怎么解决呢

aosmmas

bajifeng 发表于 2020-10-21 18:46
>>>>>>>>>>>>>

谢谢大佬，System.NotImplementedException
  HResult=0x80004001
  Message=未实现该方法或操作。
  Source=<无法计算异常源>
  StackTrace:
<无法计算异常堆栈跟踪>
XLS= G---那里报错

aosmmas

bajifeng 发表于 2020-10-21 18:44
Private Sub ba()
        Dim xls As Excel.Application
        Dim wb As Excel.Workbook

谢谢大佬，XLS=那行会报错，哪里问题呀

bajifeng

顶部，需要Imports 引用excel

aosmmas

bajifeng 发表于 2020-10-22 12:30
顶部，需要Imports 引用excel

谢谢大佬耐心的解答，菜鸟很笨，完全不懂的，怎么引用呢，烦请大佬解惑，谢谢！！

bajifeng

你把你的解决方案打个压缩包，传上来，我帮你看一下错误在哪里。

bajifeng

会打包吗？ 不会看下面的演示：