在excel中搜索多个项目并返回整个场地

时间:2016-03-18 21:00:09

标签: excel excel-vba powershell vba

我有一个包含多个工作表的excel文件,其中填充了sku和quantity列。我需要在整个工作簿中搜索多个项目并返回其数量。 products.txt包含sku ID。

ABC1234
BCDH214
LDJI983

Excel工作簿inventory.xlsx包含以下列

**sku**                  ***Quantity***
ABC1234                        2
BCDH214                        0     
LDJI983                        1 

我想针对inventory.xlsx运行prodcuts.txt并返回每个产品的数量。

这可以通过powershell完成吗?或任何其他方式来运行这种查询?

1 个答案:

答案 0 :(得分:1)

使用此处显示的代码Get Excel data without Excel,确保您已安装ACE.OLEDB provider

我创建了一个简单的xlsx:

SKU    Quantity
one    1
two    4
three  9

然后我打电话给Excel:

$path = 'd:\test\exceldb.xlsx'
$results = Get-ExcelData -Path $path -Query 'SELECT * FROM [Sheet1$]'

$stuffFromProductsTxtFile = 'one', 'two', 'three'

foreach ($sku in $stuffFromProductsTxtFile)
{
    $results.Rows | Where-Object {$_.SKU -eq $sku} | % {Write-Output "$($_.SKU) has quantity $($_.Quantity)"}
}

这给出了以下输出:

one has quantity 1
two has quantity 4
three has quantity 9

我认为,你可以根据需要改变。

对于完整性,我已复制上述MSDN博客中的示例代码:

function Get-ExcelData {
    [CmdletBinding(DefaultParameterSetName='Worksheet')]
    Param(
        [Parameter(Mandatory=$true, Position=0)]
        [String] $Path,

        [Parameter(Position=1, ParameterSetName='Worksheet')]
        [String] $WorksheetName = 'Sheet1',

        [Parameter(Position=1, ParameterSetName='Query')]
        [String] $Query = 'SELECT * FROM [Sheet1$]'
    )

    switch ($pscmdlet.ParameterSetName) {
        'Worksheet' {
            $Query = 'SELECT * FROM [{0}$]' -f $WorksheetName
            break
        }
        'Query' {
            # Make sure the query is in the correct syntax (e.g. 'SELECT * FROM [SheetName$]')
            $Pattern = '.*from\b\s*(?<Table>\w+).*'
            if($Query -match $Pattern) {
                $Query = $Query -replace $Matches.Table, ('[{0}$]' -f $Matches.Table)
            }
        }
    }

    # Create the scriptblock to run in a job
    $JobCode = {
        Param($Path, $Query)

        # Check if the file is XLS or XLSX 
        if ((Get-Item -Path $Path).Extension -eq 'xls') {
            $Provider = 'Microsoft.Jet.OLEDB.4.0'
            $ExtendedProperties = 'Excel 8.0;HDR=YES;IMEX=1'
        } else {
            $Provider = 'Microsoft.ACE.OLEDB.12.0'
            $ExtendedProperties = 'Excel 12.0;HDR=YES'
        }

        # Build the connection string and connection object
        $ConnectionString = 'Provider={0};Data Source={1};Extended Properties="{2}"' -f $Provider, $Path, $ExtendedProperties
        $Connection = New-Object System.Data.OleDb.OleDbConnection $ConnectionString

        try {
            # Open the connection to the file, and fill the datatable
            $Connection.Open()
            $Adapter = New-Object -TypeName System.Data.OleDb.OleDbDataAdapter $Query, $Connection
            $DataTable = New-Object System.Data.DataTable
            $Adapter.Fill($DataTable) | Out-Null
        }
        catch {
            # something went wrong :-(
            Write-Error $_.Exception.Message
        }
        finally {
            # Close the connection
            if ($Connection.State -eq 'Open') {
                $Connection.Close()
            }
        }

        # Return the results as an array
        return ,$DataTable
    }

    # Run the code in a 32bit job, since the provider is 32bit only
    $job = Start-Job $JobCode -RunAs32 -ArgumentList $Path, $Query
    $job | Wait-Job | Receive-Job
    Remove-Job $job
}