Suggesting modifications

This commit is contained in:
Doug Finke
2015-04-18 17:10:38 -04:00
parent e3159023c6
commit f21fe248fe
4 changed files with 76 additions and 29 deletions

View File

@@ -43,6 +43,47 @@ function Import-Excel {
} }
} }
function Export-ExcelSheet {
[CmdletBinding()]
param
(
[Parameter(Mandatory = $true)]
[String]
$Path,
[String]
$OutputPath = '.\',
[String]
$SheetName,
[string]
$Encoding = 'UTF8',
[string]
$Extension = '.txt',
[string]
$Delimiter = ';'
)
$Path = (Resolve-Path $Path).Path
$xl = New-Object -TypeName OfficeOpenXml.ExcelPackage -ArgumentList $Path
$workbook = $xl.Workbook
$targetSheets = $workbook.Worksheets | Where {$_.Name -Match $SheetName}
$params = @{} + $PSBoundParameters
$params.Remove("OutputPath")
$params.Remove("SheetName")
$params.NoTypeInformation = $true
Foreach ($sheet in $targetSheets)
{
Write-Verbose "Exporting sheet: $($sheet.Name)"
$params.Path = "$($OutputPath)\$($Sheet.Name)$($Extension)"
Import-Excel $Path -Sheet $($sheet.Name) | Export-Csv @params
}
}
function Import-ExcelAllSheet function Import-ExcelAllSheet
{ {
[CmdletBinding()] [CmdletBinding()]

BIN
TestSheets.xlsx Normal file

Binary file not shown.

3
data/sheet10.txt Normal file
View File

@@ -0,0 +1,3 @@
"sheet10"
""
"sheet10"

3
data/sheet20.txt Normal file
View File

@@ -0,0 +1,3 @@
"sheet20"
""
"sheet20"