mirror of
https://github.com/dfinke/ImportExcel.git
synced 2025-12-06 00:23:20 +00:00
890906ff10
Export-Excel.ps1
1. No code seems to act on the "NoClobber" parameter, I had previously
added a "ClearSheet" parameter which removes the worksheet and any past
data (before if there were fewer rows or columns in the new data, the
old would not be over-written)
2. I have made the whole of the process{} block in export-Excel subject
to IF ($target data) .... this way things which are processed in the
end{} block can be done in a seperate call to Export-Excel without the
need to load data. Because of this there should be no need for the Open
and Close -ExcelPackage functions going forward, but I've left them in
place for now
3. Fixed a bug when setting the target range it was previously setting
the end of the range to be the number of columns which failed if the
data was inserted at a column other than one.
4. I've moved the top left corner of a pivot chart so it sits closer to
the data.
5. I've change the check for inserting a pivot table so if
-InsertPivotChart is specified it implies -insertPivotTable.
Formatting.
6. The previous check in was not up-to date and contained some issues
with conditional formatting which I had fixed in the past.
7. Fixed a peformance bug in set-format where a foreach intended to
allow the same format to be applied to multiple ranges would format a
large blocks of cells one-by-one if it was the only range passed. .
8. Improved online help for the formatting commands.
Export charts
9. My current project is importing a lot of data into Excel and needs to
take Excel charts out as JPG files. I've thrown in the Export-Charts
script as "something for the pot", even though the connection with the
rest of work is loose,
51 lines
2.5 KiB
PowerShell
51 lines
2.5 KiB
PowerShell
<#
|
|
.Synopsis
|
|
Exports the charts in an Excel spreadSheet
|
|
.Example
|
|
Export-Charts .\test,xlsx
|
|
Exports the charts in test.xlsx to JPEG files in the current directory.
|
|
|
|
.Example
|
|
Export-Charts -path .\test,xlsx -destination [System.Environment+SpecialFolder]::MyDocuments -outputType PNG -passthrough
|
|
Exports the charts to PNG files in MyDocuments , and returns file objects representing the newly created files
|
|
|
|
#>
|
|
Param (
|
|
#Path to the Excel file whose chars we will export.
|
|
$Path = "C:\Users\public\Documents\stats.xlsx",
|
|
#If specified, output file objects representing the image files.
|
|
[switch]$passthru,
|
|
#Format to write - JPG by default
|
|
[ValidateSet("JPG","PNG","GIF")]
|
|
$OutputType = "JPG",
|
|
#Folder to write image files to (defaults to same one as the Excel file is in)
|
|
$Destination
|
|
)
|
|
|
|
#if no output folder was specified, set destination to the folder where the Excel file came from
|
|
if (-not $Destination) {$Destination = Split-Path -Path $path -Parent }
|
|
|
|
#Call up Excel and tell it to open the file.
|
|
try { $excelApp = New-Object -ComObject "Excel.Application" }
|
|
catch { Write-Warning "Could not start Excel application - which usually means it is not installed." ; return }
|
|
|
|
try { $excelWorkBook = $excelApp.Workbooks.Open($path) }
|
|
catch { Write-Warning "Could not start Excel application - which usually means it is not installed." ; return }
|
|
|
|
|
|
#For each worksheet, for each chart, jump to the chart, create a filename of "WorksheetName_ChartTitle.jpg", and export the file.
|
|
foreach ($excelWorkSheet in $excelWorkBook.Worksheets) {
|
|
#note somewhat unusual way of telling excel we want all the charts.
|
|
foreach ($excelchart in $excelWorkSheet.ChartObjects([System.Type]::Missing)) {
|
|
#if you don't go to the chart the image will be zero size !
|
|
$excelApp.Goto($excelchart.TopLeftCell,$true)
|
|
$imagePath = Join-Path -Path $Destination -ChildPath ($excelWorkSheet.Name + "_" + ($excelchart.Chart.ChartTitle.Text -split "\s\d\d:\d\d,")[0] + ".$OutputType")
|
|
if ( $excelchart.Chart.Export($imagePath, $OutputType, $false) ) { # Export returs true/false for success/failure
|
|
if ($passThru) {Get-Item -Path $imagePath } # when succesful return a file object (-passthru) or print a verbose message, write warning for any failures
|
|
else {Write-Verbose -Message "Exported $imagePath"}
|
|
}
|
|
else {Write-Warning -Message "Failure exporting $imagePath" }
|
|
}
|
|
}
|
|
|
|
$excelApp.Quit() |