VSTO：Caling不同的Excel从窗口的工作簿使用C＃

Question

形成在同一解决方案应用我有3个项目由一个视窗形式的应用程序（WFA），并在1个解决方案两个Excel工作簿..

我想调用/通过点击WFA不同的按钮从相同的解决方案.. 同时打开工作簿和我停留在编码.. 不知道如何编码打开，激活，...等

任何人有任何想法可以帮助吗？

* PS：我是很新的VSTO/C＃.NET

我想这个.. 但不打开工作簿..

private void Button_Click(object sender, EventArgs e) 
{ 
    Microsoft.Office.Interop.Excel.Application xlApp; 
    Microsoft.Office.Interop.Excel.Workbook xlWorkBook; 
    Microsoft.Office.Interop.Excel.Worksheet xlWorkSheet; 
    object misValue = System.Reflection.Missing.Value; 

    xlApp = new Microsoft.Office.Interop.Excel.ApplicationClass(); 
    xlWorkBook = xlApp.Workbooks.Open(@"C:\Document\PROJECT\abc.xlsx"); 
    xlWorkSheet = (Microsoft.Office.Interop.Excel.xlWorkSheet)xlWorkBook.Worksheets.get_Item(1); 

    ((Microsoft.Office.Interop.Excel._Worksheet)xlWorkBook).Activate(); 

    xlWorkBook.Close(true, misValue, misValue); 
    xlApp.Quit(); 
    } 

Answer 1

您的代码简单的调整工作

Microsoft.Office.Interop.Excel.Application xlApp; 
      Microsoft.Office.Interop.Excel.Workbook xlWorkBook; 
      Microsoft.Office.Interop.Excel.Worksheet xlWorkSheet; 
      object misValue = System.Reflection.Missing.Value; 

      xlApp = new Microsoft.Office.Interop.Excel.Application(); 
      xlApp.Visible = true; 
      xlWorkBook = xlApp.Workbooks.Open(@"C:\Users\knm\Documents\Book2.xlsx"); 
      xlWorkSheet = (Microsoft.Office.Interop.Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1); 
      xlWorkSheet.Activate(); 


      xlWorkBook.Close(true, misValue, misValue); 
      xlApp.Quit(); 

Answer 2

VB.net

Private Sub Button1_Click(sender As System.Object, e As Microsoft.Office.Tools.Ribbon.RibbonControlEventArgs) Handles Button1.Click 
    Dim Dirdata As String = "\\drive\folder\Template.xlsb" 

    Dim xlApp As Microsoft.Office.Interop.Excel.Application 
    Dim xlWorkbook As Microsoft.Office.Interop.Excel.Workbook 
    Dim xlWorksheet as Microsoft.Office.Interop.Excel.Worksheet 
    xlApp = New Microsoft.Office.Interop.Excel.Application() 
    xlWorkbook = xlApp.Workbooks.Open(Dirdata, , True, , "password") 
    xlApp.Visible = True 

    xlWorksheet = xlWorkbook.Worksheets(1) 
    xlWorksheet.Activate() 

    MsgBox(xlWorkbook.Name) 

    xlWorkbook.Close(False) 

End Sub