读取数据并直接写入 Excel 示例

Question

我目前有一个例程，它从 SELECT 语句读取行/列并写入 SQL 表。

我们当时正在考虑读取 SQL 表并更新一个空的 Excel 工作表。我想做的是读取数据，然后将数据直接更新到 Excel 中。

我的程序目前执行以下操作：

1. 打开工作簿。
2. 访问不同的工作表。
3. 另存为新工作簿名称。
4. 关闭 Excel。

我只需要一个例子：

1. 将允许第一行作为列名
2. 然后将数据读出到每一行的各个单元格中。

Answer 1

我也不推荐使用 COM Interop。

您可以在此处找到有关 exporting dataset to Excel in C# 的示例。

它需要一个名为 EasyXLS 的 Excel 工具。

Answer 2

要打开文件，您可以这样做：

Dim exAppl As New Excel.Application    
exAppl.Visible = True
Dim exMappe As Excel.Workbook = exAppl.Workbooks.Open("C:\... .xlsx", , False)

您可以使用

访问单元格

Console.WriteLine(exAppl.Range("A2").Value())

或者当你想扔它时使用类似的东西：

For i As Integer = 1 To exAppl.Rows.Count

    Dim a As Excel.Range = exAppl.Rows(i)

    For j As Integer = 1 To a.Columns.Count
        Dim b As Excel.Range = a.Columns(j)
        Console.WriteLine(b.Value)
    Next
Next