使用 PowerShell 将 DataTable 导出到 Excel

Question

我有一个函数可以通过简单输入 TableName 和 ColumnName-Array 创建 System.Data.Datatables。填充 table 后，我想将它们添加到数据集并将其导出到 excel 文档中。

下面的代码就是这样做的，但是在导出到 excel 时，有一点我觉得有点不雅。每个 table 都必须导出到 csv，然后重新导入到 excel。

在Excel中直接使用数据表是否有更好更简洁的方法？

Function MakeTable ($TableName, $ColumnArray)
{
    $btab = New-Object System.Data.DataTable("$TableName")
    foreach($Col in $ColumnArray)
    {
        $MCol = New-Object System.Data.DataColumn $Col;
        $btab.Columns.Add($MCol)
    }
    return , $btab
}

function DataSetToExcel ($Ds, $workdirectory)
{
    $excel = New-Object -ComObject excel.application 
    $workbook = $excel.Workbooks.Add(1)
    $i = 0
    for($DsIndex=0;$DsIndex -lt $ds.Tables.Count;$DsIndex++)
    {
        $Table = $ds.tables[$Dsindex]
        if($Dsindex -ne 0)
        {
            $workbook.worksheets.Add() | Out-Null #Erstellt neues Arbeitsblatt
        }
        $Table | Export-Csv "$workdirectory\input.csv" -Encoding UTF8 -NoTypeInformation -Force -Delimiter ";"
        $inputCSV = "C:\Temp\Test\input.csv"
        $worksheet = $workbook.worksheets.Item(1)
        $worksheet.Name = $Table.TableName
        $TxtConnector = ("TEXT;" + $inputCSV)
        $Connector = $worksheet.QueryTables.add($TxtConnector,$worksheet.Range("A1"))
        $query = $worksheet.QueryTables.item($Connector.name)
        $query.TextFileOtherDelimiter = $Excel.Application.International(5)
        $query.TextFileParseType  = 1
        $query.AdjustColumnWidth = 1
        $query.Refresh() | Out-Null
        $query.Delete()
    }
    $outputXLSX = "$workdirectory\output.xlsx"
    $Workbook.SaveAs($outputXLSX,51)
    $excel.Quit()
}

function MakeTestTable ($TableName)
{
    $TestTable = MakeTable $TableName @("A","B")
    for($i=0;$i -lt 10; $i++)
    {
        $aRow = $TestTable.NewRow()
        $aRow["A"] = (10-$i).ToString()
        $aRow["B"] = $i.ToString()
        $TestTable.Rows.Add($aRow)
    }
    return , $TestTable
}

$db = New-Object System.Data.DataSet
for($cx=0;$cx -lt 10;$cx++)
{
    $tab1 = MakeTestTable "$cx"    
    $db.Tables.Add($tab1)
}
DataSetToExcel $db "C:\Temp\Test"

Answer 1

因为你用 C# 标记了它，如果你的计算机上有 excel 这将是运行，你可以使用互操作库。我将它用于我所做的项目，使用我在 this SO question 中找到的代码。

Answer 2

查看我的 PowerShell Excel 模块 on Github. You can also grab it from the PowerShell Gallery.

它也可以使用 Import-Csv 或 ConvertFrom-Csv（基本上是任何 PowerShell 对象数组）直接处理 CSV 格式。

function New-Person {

    param($First,$Last)

    $row=$dataTable.NewRow()
    $row["First"]=$First
    $row["Last"]=$Last
    $dataTable.Rows.Add($row)
}

$dataTable = New-Object System.Data.DataTable("Test")
$dataTable.Columns.Add((New-Object System.Data.DataColumn "First"))
$dataTable.Columns.Add((New-Object System.Data.DataColumn "Last"))

New-Person John Doe
New-Person Tom Doe
New-Person Jane Doe
New-Person Mary Doe

$dataTable | 
    Select First, Last | 
    Export-Excel c:\temp\people.xlsx -AutoSize -Show

使用 PowerShell 将 DataTable 导出到 Excel

Export DataTable to Excel using PowerShell

c#

datatable

excel

powershell