在Excel中实现查询功能

$sn = Read-Host -Prompt "请输入员工号|序列号|资产号"
$xl = New-Object -ComObject "Excel.Application"
$cmdbwb = $xl.Workbooks.Open("F:\Ivan\HZCMDB.xlsx")
$cmdbwss = "01--GE DST", "01--BBG DST", "01--Non GE DST"
ForEach ($cmdbwsname in $cmdbwss) {
    $cmdbws = $cmdbwb.Worksheets.Item($cmdbwsname)
    $row = $cmdbws.cells.find($sn).row
    if($row -ne $null) {
[pscustomobject][ordered]@{
EmployeeNo = $cmdbws.range("A$row").text
EmployeeName = $cmdbws.range("B$row").text
SeatNo = $cmdbws.range("C$row").text
Project = $cmdbws.range("D$row").text
Model = $cmdbws.range("E$row").text
ServiceTag = $cmdbws.range("F$row").text
FinanceNo = $cmdbws.range("G$row").text
RAM = $cmdbws.range("H$row").text
Hostname = $cmdbws.range("I$row").text
}}}
$xl.Quit()
$cmdbws = $null
$cmdbwb = $null
$xl = $null
[GC]::Collect()
[Console]::Readkey() |　Out-Null
Exit

 

转载于:https://www.cnblogs.com/IvanChen/p/4488675.html