Excel.Workbook을 사용하여 Excel 통합 문서를 조작하는 방법

Question

따라서 파일 열기가있는 메서드를 Excel.Workbook 또는 Excel.Application으로 찾을 수 없으며 이유가 궁금합니다.

Excel 파일 경로가 있으므로이 파일을 조작하고 싶습니다. Excel.Application, Excel.Workbook 및 Excel.Worksheet을 사용해야 함을 이해합니다. Excel 파일에있는 파일은 ExcelFilePath입니다. 가능하게하려면 어떻게해야합니까?

Dim xlApp As Excel.Application 
Dim xlWorkBook As Excel.Workbook 
Dim xlWS As Excel.Worksheet 

xlApp = New Excel.ApplicationClass 
xlWorkBook = xlApp.Workbooks.Open(sFilePath) 
xlWS = CType(xlWorkBook.Worksheets(sheetNameOrIndex), Excel.Worksheet) 

을 그리고 당신은 그들 만이이 방법을 사용할 필요가 :

Answer 1

당신은 엑셀 API를 사용하기 위해 프로젝트에 Microsoft.Office.Interop.Excel에 대한 참조를 추가하는 최초의 필요성, 다음 변수를 입력합니다. 예를 들어 :

Dim sVar as String = xlWS.Range("C5").Value.ToString() 

Answer 2

이 시도 : 내 프로젝트 어떤 조작 통합 문서의

Dim xapp As New Microsoft.Office.Interop.Excel.Application 
    Dim wb As Workbook = xapp.Workbooks.Add 
    Dim ws As Worksheet = wb.Worksheets(1) 
    ws.Activate() 

    'Fill header of the sheet---------------------------------- 
    For i As Integer = 1 To dgvcustomer.Columns.Count 
     ws.Cells(1, i) = dgvcustomer.Columns(i - 1).HeaderText 
    Next 
    'End header------------------------------------------------ 

    Dim Dgrow, Dgcell, Dgcol As Integer 
    Dgrow = 1 
    Dgcell = 1 

    'Fill Sheet ------------------------------------------------------------------------------------------------ 

    While (Dgrow <= dgvcustomer.Rows.Count) 
     Dgcol = 1 
     While (Dgcol <= ws.UsedRange.Columns().Count) 
      ws.Cells(Dgrow + 1, Dgcol).value = dgvcustomer.Rows(Dgrow - 1).Cells(ws.Cells(1, Dgcol).value).Value 
      Dgcol += 1 
     End While 
     Dgrow += 1 
    End While 

    'End fill sheet--------------------------------------------------------------------------------------------- 

    wb.SaveAs(dlgSaveFile.FileName) 
    wb.Close() 
    xapp.Quit()