mirror of
https://github.com/dfinke/ImportExcel.git
synced 2025-12-06 00:23:20 +00:00
Initial commit
This commit is contained in:
dfinke
3
.gitignore
vendored
3
.gitignore
vendored
@@ -42,7 +42,6 @@ Network Trash Folder
|
||||
Temporary Items
|
||||
.apdisk
|
||||
InstallModule.ps1
|
||||
Export-Excel.ps1
|
||||
testExport.xlsx
|
||||
test.ps1
|
||||
testPwd.xlsx
|
||||
@@ -53,3 +52,5 @@ data/Sheet10.txt
|
||||
data/Sheet20.txt
|
||||
ImportExcel-Copy.psm1
|
||||
TryCCFmt.ps1
|
||||
test.xlsx
|
||||
testCCFMT.ps1
|
||||
|
||||
196
Export-Excel.ps1
Normal file
196
Export-Excel.ps1
Normal file
@@ -0,0 +1,196 @@
|
||||
function Export-Excel {
|
||||
<#
|
||||
.Synopsis
|
||||
.Example
|
||||
gsv | Export-Excel .\test.xlsx
|
||||
.Example
|
||||
ps | Export-Excel .\test.xlsx -show\
|
||||
.Example
|
||||
ps | Export-Excel .\test.xlsx -WorkSheetname Processes -IncludePivotTable -Show -PivotRows Company -PivotData PM
|
||||
.Example
|
||||
ps | Export-Excel .\test.xlsx -WorkSheetname Processes -ChartType PieExploded3D -IncludePivotChart -IncludePivotTable -Show -PivotRows Company -PivotData PM
|
||||
.Example
|
||||
Remove-Item "c:\temp\test.xlsx" -ErrorAction Ignore
|
||||
Get-Service | Export-Excel "c:\temp\test.xlsx" -Show -IncludePivotTable -PivotRows status -PivotData @{status='count'}
|
||||
#>
|
||||
param(
|
||||
[Parameter(Mandatory=$true)]
|
||||
$Path,
|
||||
[Parameter(ValueFromPipeline=$true)]
|
||||
$TargetData,
|
||||
[string]$WorkSheetname="Sheet1",
|
||||
[string]$Title,
|
||||
[OfficeOpenXml.Style.ExcelFillStyle]$TitleFillPattern="None",
|
||||
[bool]$TitleBold,
|
||||
[int]$TitleSize=22,
|
||||
[System.Drawing.Color]$TitleBackgroundColor,
|
||||
#[string]$TitleBackgroundColor,
|
||||
[string[]]$PivotRows,
|
||||
[string[]]$PivotColumns,
|
||||
#[string[]]$PivotData,
|
||||
$PivotData,
|
||||
[string]$Password,
|
||||
[OfficeOpenXml.Drawing.Chart.eChartType]$ChartType="Pie",
|
||||
[Switch]$IncludePivotTable,
|
||||
[Switch]$IncludePivotChart,
|
||||
[Switch]$AutoSize,
|
||||
[Switch]$Show,
|
||||
[Switch]$NoClobber,
|
||||
[Switch]$FreezeTopRow,
|
||||
[Switch]$AutoFilter,
|
||||
[Switch]$BoldTopRow,
|
||||
[string]$RangeName,
|
||||
[string]$TableName
|
||||
)
|
||||
|
||||
Begin {
|
||||
try {
|
||||
$Path = $ExecutionContext.SessionState.Path.GetUnresolvedProviderPathFromPSPath($Path)
|
||||
if (Test-Path $path) {
|
||||
Write-Debug "File `"$Path`" already exists"
|
||||
}
|
||||
$pkg = New-Object OfficeOpenXml.ExcelPackage $Path
|
||||
|
||||
$ws = $pkg | Add-WorkSheet -WorkSheetname $WorkSheetname -NoClobber:$NoClobber
|
||||
|
||||
$Row = 1
|
||||
if($Title) {
|
||||
$ws.Cells[$Row, 1].Value = $Title
|
||||
|
||||
$ws.Cells[$Row, 1].Style.Font.Size = $TitleSize
|
||||
$ws.Cells[$Row, 1].Style.Font.Bold = $TitleBold
|
||||
$ws.Cells[$Row, 1].Style.Fill.PatternType = $TitleFillPattern
|
||||
if($TitleBackgroundColor) {
|
||||
$ws.Cells[$Row, 1].Style.Fill.BackgroundColor.SetColor($TitleBackgroundColor)
|
||||
}
|
||||
|
||||
$Row = 2
|
||||
}
|
||||
|
||||
} Catch {
|
||||
if($AlreadyExists) {
|
||||
throw "$WorkSheetname already exists."
|
||||
} else {
|
||||
throw $Error[0].Exception.Message
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
Process {
|
||||
|
||||
if(!$Header) {
|
||||
|
||||
$ColumnIndex = 1
|
||||
$Header = $TargetData.psobject.properties.name
|
||||
|
||||
foreach ($Name in $Header) {
|
||||
$ws.Cells[$Row, $ColumnIndex].Value = $name
|
||||
$ColumnIndex += 1
|
||||
}
|
||||
}
|
||||
|
||||
$Row += 1
|
||||
$ColumnIndex = 1
|
||||
|
||||
foreach ($Name in $Header) {
|
||||
|
||||
$targetCell = $ws.Cells[$Row, $ColumnIndex]
|
||||
|
||||
$cellValue=$TargetData.$Name
|
||||
|
||||
$r=$null
|
||||
if([double]::tryparse($cellValue, [ref]$r)) {
|
||||
$targetCell.Value = $r
|
||||
} else {
|
||||
$targetCell.Value = $cellValue
|
||||
}
|
||||
|
||||
switch ($TargetData.$Name) {
|
||||
{$_ -is [datetime]} {$targetCell.Style.Numberformat.Format = "m/d/yy h:mm"}
|
||||
}
|
||||
|
||||
$ColumnIndex += 1
|
||||
}
|
||||
}
|
||||
|
||||
End {
|
||||
$startAddress=$ws.Dimension.Start.Address
|
||||
$dataRange="{0}:{1}" -f $startAddress, $ws.Dimension.End.Address
|
||||
Write-Debug "Data Range $dataRange"
|
||||
|
||||
if (-not [string]::IsNullOrEmpty($RangeName)) {
|
||||
$ws.Names.Add($RangeName, $ws.Cells[$dataRange]) | Out-Null
|
||||
}
|
||||
if (-not [string]::IsNullOrEmpty($TableName)) {
|
||||
$ws.Tables.Add($ws.Cells[$dataRange], $TableName) | Out-Null
|
||||
}
|
||||
|
||||
if($IncludePivotTable) {
|
||||
$pivotTableName = $WorkSheetname + "PivotTable"
|
||||
$wsPivot = $pkg | Add-WorkSheet -WorkSheetname $pivotTableName -NoClobber:$NoClobber
|
||||
|
||||
$wsPivot.View.TabSelected = $true
|
||||
|
||||
$pivotTableDataName=$WorkSheetname + "PivotTableData"
|
||||
|
||||
if($Title) {$startAddress="A2"}
|
||||
$pivotTable = $wsPivot.PivotTables.Add($wsPivot.Cells["A1"], $ws.Cells[$dataRange], $pivotTableDataName)
|
||||
|
||||
if($PivotRows) {
|
||||
foreach ($Row in $PivotRows) {
|
||||
$null=$pivotTable.RowFields.Add($pivotTable.Fields[$Row])
|
||||
}
|
||||
}
|
||||
|
||||
if($PivotColumns) {
|
||||
foreach ($Column in $PivotColumns) {
|
||||
$null=$pivotTable.ColumnFields.Add($pivotTable.Fields[$Column])
|
||||
}
|
||||
}
|
||||
|
||||
if($PivotData) {
|
||||
if($PivotData -is [hashtable]) {
|
||||
$PivotData.Keys | % {
|
||||
$df=$pivotTable.DataFields.Add($pivotTable.Fields[$_])
|
||||
$df.Function = $PivotData.$_
|
||||
}
|
||||
} else {
|
||||
foreach ($Item in $PivotData) {
|
||||
$df=$pivotTable.DataFields.Add($pivotTable.Fields[$Item])
|
||||
$df.Function = 'Count'
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if($IncludePivotChart) {
|
||||
$chart = $wsPivot.Drawings.AddChart("PivotChart", $ChartType, $pivotTable)
|
||||
$chart.SetPosition(1, 0, 6, 0)
|
||||
$chart.SetSize(600, 400)
|
||||
}
|
||||
}
|
||||
|
||||
if($Password) { $ws.Protection.SetPassword($Password) }
|
||||
|
||||
if($AutoFilter) {
|
||||
$ws.Cells[$dataRange].AutoFilter=$true
|
||||
}
|
||||
|
||||
if($FreezeTopRow) {
|
||||
$ws.View.FreezePanes(2,1)
|
||||
}
|
||||
|
||||
if($BoldTopRow) {
|
||||
$range=$ws.Dimension.Address -replace $ws.Dimension.Rows, "1"
|
||||
$ws.Cells[$range].Style.Font.Bold=$true
|
||||
}
|
||||
|
||||
if($AutoSize) { $ws.Cells.AutoFitColumns() }
|
||||
|
||||
#$pkg.Workbook.View.ActiveTab = $ws.SheetID
|
||||
|
||||
$pkg.Save()
|
||||
$pkg.Dispose()
|
||||
|
||||
if($Show) {Invoke-Item $Path}
|
||||
}
|
||||
}
|
||||
200
ImportExcel.psm1
200
ImportExcel.psm1
@@ -1,5 +1,8 @@
|
||||
Add-Type -Path "$($PSScriptRoot)\EPPlus.dll"
|
||||
|
||||
. $PSScriptRoot\Export-Excel.ps1
|
||||
. $PSScriptRoot\New-ConditionalFormattingIconSet.ps1
|
||||
|
||||
function Import-Excel {
|
||||
param(
|
||||
[Alias("FullName")]
|
||||
@@ -114,203 +117,6 @@ function Add-WorkSheet {
|
||||
$ExcelPackage.Workbook.Worksheets.Add($WorkSheetname)
|
||||
}
|
||||
|
||||
function Export-Excel {
|
||||
<#
|
||||
.Synopsis
|
||||
.Example
|
||||
gsv | Export-Excel .\test.xlsx
|
||||
.Example
|
||||
ps | Export-Excel .\test.xlsx -show\
|
||||
.Example
|
||||
ps | Export-Excel .\test.xlsx -WorkSheetname Processes -IncludePivotTable -Show -PivotRows Company -PivotData PM
|
||||
.Example
|
||||
ps | Export-Excel .\test.xlsx -WorkSheetname Processes -ChartType PieExploded3D -IncludePivotChart -IncludePivotTable -Show -PivotRows Company -PivotData PM
|
||||
.Example
|
||||
Remove-Item "c:\temp\test.xlsx" -ErrorAction Ignore
|
||||
Get-Service | Export-Excel "c:\temp\test.xlsx" -Show -IncludePivotTable -PivotRows status -PivotData @{status='count'}
|
||||
#>
|
||||
param(
|
||||
[Parameter(Mandatory=$true)]
|
||||
$Path,
|
||||
[Parameter(ValueFromPipeline=$true)]
|
||||
$TargetData,
|
||||
[string]$WorkSheetname="Sheet1",
|
||||
[string]$Title,
|
||||
[OfficeOpenXml.Style.ExcelFillStyle]$TitleFillPattern="None",
|
||||
[bool]$TitleBold,
|
||||
[int]$TitleSize=22,
|
||||
[System.Drawing.Color]$TitleBackgroundColor,
|
||||
#[string]$TitleBackgroundColor,
|
||||
[string[]]$PivotRows,
|
||||
[string[]]$PivotColumns,
|
||||
#[string[]]$PivotData,
|
||||
$PivotData,
|
||||
[string]$Password,
|
||||
[OfficeOpenXml.Drawing.Chart.eChartType]$ChartType="Pie",
|
||||
[Switch]$IncludePivotTable,
|
||||
[Switch]$IncludePivotChart,
|
||||
[Switch]$AutoSize,
|
||||
[Switch]$Show,
|
||||
[Switch]$NoClobber,
|
||||
[Switch]$FreezeTopRow,
|
||||
[Switch]$AutoFilter,
|
||||
[Switch]$BoldTopRow,
|
||||
[string]$RangeName,
|
||||
[string]$TableName
|
||||
)
|
||||
|
||||
Begin {
|
||||
try {
|
||||
$Path = $ExecutionContext.SessionState.Path.GetUnresolvedProviderPathFromPSPath($Path)
|
||||
if (Test-Path $path) {
|
||||
Write-Debug "File `"$Path`" already exists"
|
||||
}
|
||||
$pkg = New-Object OfficeOpenXml.ExcelPackage $Path
|
||||
|
||||
$ws = $pkg | Add-WorkSheet -WorkSheetname $WorkSheetname -NoClobber:$NoClobber
|
||||
|
||||
$Row = 1
|
||||
if($Title) {
|
||||
$ws.Cells[$Row, 1].Value = $Title
|
||||
|
||||
$ws.Cells[$Row, 1].Style.Font.Size = $TitleSize
|
||||
$ws.Cells[$Row, 1].Style.Font.Bold = $TitleBold
|
||||
$ws.Cells[$Row, 1].Style.Fill.PatternType = $TitleFillPattern
|
||||
if($TitleBackgroundColor) {
|
||||
$ws.Cells[$Row, 1].Style.Fill.BackgroundColor.SetColor($TitleBackgroundColor)
|
||||
}
|
||||
|
||||
$Row = 2
|
||||
}
|
||||
|
||||
} Catch {
|
||||
if($AlreadyExists) {
|
||||
throw "$WorkSheetname already exists."
|
||||
} else {
|
||||
throw $Error[0].Exception.Message
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
Process {
|
||||
|
||||
if(!$Header) {
|
||||
|
||||
$ColumnIndex = 1
|
||||
$Header = $TargetData.psobject.properties.name
|
||||
|
||||
foreach ($Name in $Header) {
|
||||
$ws.Cells[$Row, $ColumnIndex].Value = $name
|
||||
$ColumnIndex += 1
|
||||
}
|
||||
}
|
||||
|
||||
$Row += 1
|
||||
$ColumnIndex = 1
|
||||
|
||||
foreach ($Name in $Header) {
|
||||
|
||||
$targetCell = $ws.Cells[$Row, $ColumnIndex]
|
||||
|
||||
$cellValue=$TargetData.$Name
|
||||
|
||||
$r=$null
|
||||
if([double]::tryparse($cellValue, [ref]$r)) {
|
||||
$targetCell.Value = $r
|
||||
} else {
|
||||
$targetCell.Value = $cellValue
|
||||
}
|
||||
|
||||
switch ($TargetData.$Name) {
|
||||
{$_ -is [datetime]} {$targetCell.Style.Numberformat.Format = "m/d/yy h:mm"}
|
||||
}
|
||||
|
||||
$ColumnIndex += 1
|
||||
}
|
||||
}
|
||||
|
||||
End {
|
||||
$startAddress=$ws.Dimension.Start.Address
|
||||
$dataRange="{0}:{1}" -f $startAddress, $ws.Dimension.End.Address
|
||||
Write-Debug "Data Range $dataRange"
|
||||
|
||||
if (-not [string]::IsNullOrEmpty($RangeName)) {
|
||||
$ws.Names.Add($RangeName, $ws.Cells[$dataRange]) | Out-Null
|
||||
}
|
||||
if (-not [string]::IsNullOrEmpty($TableName)) {
|
||||
$ws.Tables.Add($ws.Cells[$dataRange], $TableName) | Out-Null
|
||||
}
|
||||
|
||||
if($IncludePivotTable) {
|
||||
$pivotTableName = $WorkSheetname + "PivotTable"
|
||||
$wsPivot = $pkg | Add-WorkSheet -WorkSheetname $pivotTableName -NoClobber:$NoClobber
|
||||
|
||||
$wsPivot.View.TabSelected = $true
|
||||
|
||||
$pivotTableDataName=$WorkSheetname + "PivotTableData"
|
||||
|
||||
if($Title) {$startAddress="A2"}
|
||||
$pivotTable = $wsPivot.PivotTables.Add($wsPivot.Cells["A1"], $ws.Cells[$dataRange], $pivotTableDataName)
|
||||
|
||||
if($PivotRows) {
|
||||
foreach ($Row in $PivotRows) {
|
||||
$null=$pivotTable.RowFields.Add($pivotTable.Fields[$Row])
|
||||
}
|
||||
}
|
||||
|
||||
if($PivotColumns) {
|
||||
foreach ($Column in $PivotColumns) {
|
||||
$null=$pivotTable.ColumnFields.Add($pivotTable.Fields[$Column])
|
||||
}
|
||||
}
|
||||
|
||||
if($PivotData) {
|
||||
if($PivotData -is [hashtable]) {
|
||||
$PivotData.Keys | % {
|
||||
$df=$pivotTable.DataFields.Add($pivotTable.Fields[$_])
|
||||
$df.Function = $PivotData.$_
|
||||
}
|
||||
} else {
|
||||
foreach ($Item in $PivotData) {
|
||||
$df=$pivotTable.DataFields.Add($pivotTable.Fields[$Item])
|
||||
$df.Function = 'Count'
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if($IncludePivotChart) {
|
||||
$chart = $wsPivot.Drawings.AddChart("PivotChart", $ChartType, $pivotTable)
|
||||
$chart.SetPosition(1, 0, 6, 0)
|
||||
$chart.SetSize(600, 400)
|
||||
}
|
||||
}
|
||||
|
||||
if($Password) { $ws.Protection.SetPassword($Password) }
|
||||
|
||||
if($AutoFilter) {
|
||||
$ws.Cells[$dataRange].AutoFilter=$true
|
||||
}
|
||||
|
||||
if($FreezeTopRow) {
|
||||
$ws.View.FreezePanes(2,1)
|
||||
}
|
||||
|
||||
if($BoldTopRow) {
|
||||
$range=$ws.Dimension.Address -replace $ws.Dimension.Rows, "1"
|
||||
$ws.Cells[$range].Style.Font.Bold=$true
|
||||
}
|
||||
|
||||
if($AutoSize) { $ws.Cells.AutoFitColumns() }
|
||||
|
||||
#$pkg.Workbook.View.ActiveTab = $ws.SheetID
|
||||
|
||||
$pkg.Save()
|
||||
$pkg.Dispose()
|
||||
|
||||
if($Show) {Invoke-Item $Path}
|
||||
}
|
||||
}
|
||||
|
||||
function ConvertFrom-ExcelSheet {
|
||||
<#
|
||||
.Synopsis
|
||||
|
||||
Reference in New Issue
Block a user