기타 [vb.net] CreateObject 를 이용한 Excel 컨트롤
페이지 정보

본문
        Dim Excel As Object = CreateObject("Excel.Application")
        Excel.Visible = True
        Dim WB As Object = Excel.Workbooks.Open(Application.StartupPath & "\csv.csv")
        Dim WS As Object = WB.Worksheets(1)
        Dim C As Object = WS.UsedRange
        Dim R As DataRow
        For i As Integer = 2 To C.rows.count
            R = D.NewRow
            For n As Integer = 1 To C.columns.count
                R("ck") = D.Rows.Count + 1
                R(C(1, n).Value.Replace(Space(1), "_")) = C(i, n).Value
            Next
        Next
- 이전글[vb.net] DataTable 열 제거(Column Removal) 19.10.11
 - 다음글[vb.net] HTML 정리 및 테그 제거 19.10.09
 
댓글목록
등록된 댓글이 없습니다.



