tweak readme

Readme only

.gitignore

@@ -42,6 +42,7 @@ Network Trash Folder
 Temporary Items
 .apdisk
 testExport.xlsx
+test.xlsx
 test.ps1
 testPwd.xlsx
 test.csv
@@ -55,4 +56,5 @@ test.xlsx
 testCCFMT.ps1
 testHide.ps1
 ImportExcel.zip
-*.xlsx
+.vscode/launch.json
+

.vscode/spellright.dict

@@ -0,0 +1,34 @@
+databar
+appveyor
+SqlDataToExcel
+xlsm
+jameseholt
+params
+robinmalik
+scriptblock
+headsphere
+xelsirko
+importexcel
+Mihalicz
+idx
+Möller
+redoz
+dir
+pivotables
+WorkSheetname
+Lachance-Guillemette
+ints
+pscookiemonster
+ps
+pwd
+Nuget
+EPPLus
+intellisense
+PivtoTableName
+New-Excelchart
+paypal
+dll
+enums
+Numberformat
+ChartDefiniton
+hashtables

AddConditionalFormatting.ps1

@@ -0,0 +1,214 @@
+Function Add-ConditionalFormatting {
+    <#
+      .Synopsis
+        Adds conditional formatting to worksheet.
+      .Description
+        Conditional formatting allows excel to
+        * Mark cells with Icons depending on their value
+        * Show a databar whose length indicates the value or a 2 or 3 color scale where the color indicate the relative value
+        * Change the color, font, or number format of cells which meet given criteria
+        Add-ConditionalFormatting allows these to be set; for fine tuning of the rules you can use the -PassThru switch,
+        which will return the rule so that you can modify things which are specific to that type of rule,
+        for example the values which correspond to each icon in an Icon set.
+      .Example
+        >
+        PS> $excel = $avdata | Export-Excel -Path (Join-path $FilePath "\Machines.XLSX" ) -WorksheetName "Server Anti-Virus" -AutoSize -FreezeTopRow -AutoFilter -PassThru
+        Add-ConditionalFormatting -WorkSheet $excel.Workbook.Worksheets[1] -Address "b2:b1048576" -ForeGroundColor "RED"     -RuleType ContainsText -ConditionValue "2003"
+        Add-ConditionalFormatting -WorkSheet $excel.Workbook.Worksheets[1] -Address "i2:i1048576" -ForeGroundColor "RED"     -RuleType ContainsText -ConditionValue "Disabled"
+        $excel.Workbook.Worksheets[1].Cells["D1:G1048576"].Style.Numberformat.Format = [cultureinfo]::CurrentCulture.DateTimeFormat.ShortDatePattern
+        $excel.Workbook.Worksheets[1].Row(1).style.font.bold = $true
+        $excel.Save() ; $excel.Dispose()
+
+        Here Export-Excel is called with the -passThru parameter so the Excel Package object is stored in $Excel
+        The desired worksheet is selected and the then columns" B" and "I" are conditionally formatted (excluding the top row) to show red text if
+        the columns contain "2003" or "Disabled respectively. A fixed date format is then applied to columns D..G, and the top row is formatted.
+        Finally the workbook is saved and the Excel object closed.
+      .Example
+        >
+        >PS  $r = Add-ConditionalFormatting -WorkSheet $excel.Workbook.Worksheets[1] -Range "B1:B100" -ThreeIconsSet Flags -Passthru
+        $r.Reverse = $true ;   $r.Icon1.Type = "Num"; $r.Icon2.Type = "Num" ; $r.Icon2.value = 100 ; $r.Icon3.type = "Num" ;$r.Icon3.value = 1000
+
+        Again Export-Excel has been called with -passthru leaving a package object in $Excel
+        This time B1:B100 has been conditionally formatted with 3 icons, using the flags icon set.
+        Add-ConditionalFormatting does not provide access to every option in the formatting rule, so passthru has been used and the
+        rule is modified to apply the flags in reverse order, and boundaries for the number which will set the split are set to 100 and 1000
+      .Example
+        Add-ConditionalFormatting -WorkSheet $sheet -Range "D2:D1048576" -DataBarColor Red
+
+        This time $sheet holds an ExcelWorkseet object and databars are add to all of column D except for the tip row.
+      .Example
+        Add-ConditionalFormatting -Address $worksheet.cells["FinishPosition"] -RuleType Equal    -ConditionValue 1 -ForeGroundColor Purple -Bold -Priority 1 -StopIfTrue
+
+        In this example a named range is used to select the cells where the formula should apply. If a cell in the "FinishPosition" range is 1, then the text is turned to Bold & Purple.
+        This rule is moved to first in the priority list, and where cells have a value of 1, no other rules will be processed.
+    #>
+    Param (
+        #A block of cells to format - you can use a named range with -Address $ws.names[1] or  $ws.cells["RangeName"]
+        [Parameter(Mandatory = $true, Position = 0)]
+        [Alias("Range")]
+        $Address ,
+        #The worksheet where the format is to be applied
+        [OfficeOpenXml.ExcelWorksheet]$WorkSheet ,
+        #A standard named-rule - Top / Bottom / Less than / Greater than / Contains etc.
+        [Parameter(Mandatory = $true, ParameterSetName = "NamedRule", Position = 1)]
+        [OfficeOpenXml.ConditionalFormatting.eExcelConditionalFormattingRuleType]$RuleType ,
+        #Text colour for matching objects
+        [Parameter(ParameterSetName = "NamedRule")]
+        [Alias("ForeGroundColour")]
+        [System.Drawing.Color]$ForeGroundColor,
+        #Colour for databar type charts
+        [Parameter(Mandatory = $true, ParameterSetName = "DataBar")]
+        [Alias("DataBarColour")]
+        [System.Drawing.Color]$DataBarColor,
+        #One of the three-icon set types (e.g. Traffic Lights)
+        [Parameter(Mandatory = $true, ParameterSetName = "ThreeIconSet")]
+        [OfficeOpenXml.ConditionalFormatting.eExcelconditionalFormatting3IconsSetType]$ThreeIconsSet,
+        #A four-icon set name
+        [Parameter(Mandatory = $true, ParameterSetName = "FourIconSet")]
+        [OfficeOpenXml.ConditionalFormatting.eExcelconditionalFormatting4IconsSetType]$FourIconsSet,
+        #A five-icon set name
+        [Parameter(Mandatory = $true, ParameterSetName = "FiveIconSet")]
+        [OfficeOpenXml.ConditionalFormatting.eExcelconditionalFormatting5IconsSetType]$FiveIconsSet,
+        #Use the icon set in reverse order, or reverse the orders of Two- & Three-Color Scales
+        [Parameter(ParameterSetName = "NamedRule")]
+        [Parameter(ParameterSetName = "ThreeIconSet")]
+        [Parameter(ParameterSetName = "FourIconSet")]
+        [Parameter(ParameterSetName = "FiveIconSet")]
+        [switch]$Reverse,
+        #A value for the condition (for example 2000 if the test is 'lessthan 2000'; Formulas should begin with "=" )
+        [Parameter(ParameterSetName = "NamedRule")]
+        $ConditionValue,
+        #A second value for the conditions like "between x and Y"
+        [Parameter(ParameterSetName = "NamedRule")]
+        $ConditionValue2,
+        #Background colour for matching items
+        [Parameter(ParameterSetName = "NamedRule")]
+        [System.Drawing.Color]$BackgroundColor,
+        #Background pattern for matching items
+        [Parameter(ParameterSetName = "NamedRule")]
+        [OfficeOpenXml.Style.ExcelFillStyle]$BackgroundPattern = [OfficeOpenXml.Style.ExcelFillStyle]::None ,
+        #Secondary colour when a background pattern requires it
+        [Parameter(ParameterSetName = "NamedRule")]
+        [System.Drawing.Color]$PatternColor,
+        #Sets the numeric format for matching items
+        [Parameter(ParameterSetName = "NamedRule")]
+        $NumberFormat,
+        #Put matching items in bold face
+        [Parameter(ParameterSetName = "NamedRule")]
+        [switch]$Bold,
+        #Put matching items in italic
+        [Parameter(ParameterSetName = "NamedRule")]
+        [switch]$Italic,
+        #Underline matching items
+        [Parameter(ParameterSetName = "NamedRule")]
+        [switch]$Underline,
+        #Strikethrough text of matching items
+        [Parameter(ParameterSetName = "NamedRule")]
+        [switch]$StrikeThru,
+        #Prevent the processing of subsequent rules
+        [Parameter(ParameterSetName = "NamedRule")]
+        [switch]$StopIfTrue,
+        #Set the sequence for rule processing
+        [int]$Priority,
+        #If specified pass the rule back to the caller to allow additional customization.
+        [switch]$Passthru
+    )
+
+    #Allow conditional formatting to work like Set-ExcelRange (with single ADDRESS parameter), split it to get worksheet and range of cells.
+    If ($Address -is [OfficeOpenXml.Table.ExcelTable]) {
+            $WorkSheet = $Address.Address.Worksheet
+            $Address   = $Address.Address.Address
+    }
+    elseif  ($Address.Address -and $Address.Worksheet -and -not $WorkSheet) { #Address is a rangebase or similar
+        $WorkSheet = $Address.Worksheet[0]
+        $Address   = $Address.Address
+    }
+    elseif ($Address -is [String] -and $WorkSheet -and $WorkSheet.Names[$Address] ) { #Address is the name of a named range.
+        $Address = $WorkSheet.Names[$Address].Address
+    }
+    if (($Address -is [OfficeOpenXml.ExcelRow]    -and -not $WorkSheet) -or
+        ($Address -is [OfficeOpenXml.ExcelColumn] -and -not $WorkSheet) ){  #EPPLUs Can't get the worksheet object from a row or column object, so bail if that was tried
+        Write-Warning -Message "Add-ConditionalFormatting does not support Row or Column objects as an address; use a worksheet and/or specify 'R:R' or 'C:C' instead. "; return
+    }
+    elseif ($Address -is [OfficeOpenXml.ExcelRow]) {  #But if we have a column or row object and a worksheet (I don't know *why*) turn them into a string for the range
+            $Address = "$($Address.Row):$($Address.Row)"
+    }
+    elseif ($Address -is [OfficeOpenXml.ExcelColumn]) {
+        $Address = [OfficeOpenXml.ExcelAddress]::new(1,$address.ColumnMin,1,$address.ColumnMax).Address -replace '1',''
+        if ($Address -notmatch ':') {$Address = "$Address`:$Address"}
+    }
+    if ( $Address -is [string] -and $Address -match "!") {$Address = $Address -replace '^.*!',''}
+    #By this point we should have a worksheet object whose ConditionalFormatting collection we will add to. If not, bail.
+    if (-not $worksheet -or $WorkSheet -isnot [OfficeOpenXml.ExcelWorksheet]) {write-warning "You need to provide a worksheet object." ; return}
+    #region create a rule of the right type
+    if     ($RuleType -match 'IconSet$') {Write-warning -Message "You cannot configure a IconSet rule in this way; please use -$RuleType <SetName>." ; return}
+    if     ($PSBoundParameters.ContainsKey("ThreeIconsSet" )      ) {$rule =  $WorkSheet.ConditionalFormatting.AddThreeIconSet($Address , $ThreeIconsSet)}
+    elseif ($PSBoundParameters.ContainsKey("FourIconsSet"  )      ) {$rule =  $WorkSheet.ConditionalFormatting.AddFourIconSet( $Address , $FourIconsSet )}
+    elseif ($PSBoundParameters.ContainsKey("FiveIconsSet"  )      ) {$rule =  $WorkSheet.ConditionalFormatting.AddFiveIconSet( $Address , $FiveIconsSet )}
+    elseif ($PSBoundParameters.ContainsKey("DataBarColor"  )      ) {$rule =  $WorkSheet.ConditionalFormatting.AddDatabar(     $Address , $DataBarColor )}
+    else                                                            {$rule = ($WorkSheet.ConditionalFormatting)."Add$RuleType"($Address )                }
+    if     ($Reverse)  {
+            if     ($rule.type -match 'IconSet$'   )                {$rule.reverse = $true}
+            elseif ($rule.type -match 'ColorScale$')                {$temp =$rule.LowValue.Color ; $rule.LowValue.Color = $rule.HighValue.Color; $rule.HighValue.Color = $temp}
+            else   {Write-Warning -Message "-Reverse was ignored because $ruletype does not support it."}
+    }
+    #endregion
+    #region set the rule conditions
+    #for lessThan/GreaterThan/Equal/Between conditions make sure that strings are wrapped in quotes. Formulas should be passed with = which will be stripped.
+    if     ($RuleType -match "Than|Equal|Between" ) {
+        if ($ConditionValue) {
+                $number = $Null
+                #if the condition type is not a value type, but parses as a number, make it the number
+                if ($ConditionValue -isnot [System.ValueType] -and [Double]::TryParse($ConditionValue, [System.Globalization.NumberStyles]::Any, [System.Globalization.NumberFormatInfo]::CurrentInfo, [Ref]$number) ) {
+                         $ConditionValue  = $number
+                } #else if it is not a value type, or a formula, or wrapped in quotes, wrap it in quotes.
+                elseif (($ConditionValue -isnot [System.ValueType])-and ($ConditionValue  -notmatch '^=') -and ($ConditionValue  -notmatch '^".*"$') ) {
+                         $ConditionValue  = '"' + $ConditionValue +'"'
+                }
+        }
+        if ($ConditionValue2) {
+                $number = $Null
+                if ($ConditionValue -isnot [System.ValueType] -and [Double]::TryParse($ConditionValue2, [System.Globalization.NumberStyles]::Any, [System.Globalization.NumberFormatInfo]::CurrentInfo, [Ref]$number) ) {
+                         $ConditionValue2 = $number
+                }
+                elseif (($ConditionValue -isnot [System.ValueType]) -and ($ConditionValue2 -notmatch '^=') -and ($ConditionValue2 -notmatch '^".*"$') ) {
+                         $ConditionValue2  = '"' + $ConditionValue2 + '"'
+                }
+        }
+    }
+    #But we don't usually want quotes round containstext | beginswith type rules. Can't be Certain they need to be removed, so warn the user their condition might be wrong
+    if     ($RuleType -match "Text|With" -and $ConditionValue -match '^".*"$'  ) {
+            Write-Warning -Message "The condition will look for the quotes at the start and end."
+    }
+    if     ($PSBoundParameters.ContainsKey("ConditionValue" ) -and
+            $RuleType -match "Top|Botom"                          ) {$rule.Rank      = $ConditionValue }
+    if     ($PSBoundParameters.ContainsKey("ConditionValue" ) -and
+            $RuleType -match "StdDev"                             ) {$rule.StdDev    = $ConditionValue }
+    if     ($PSBoundParameters.ContainsKey("ConditionValue" ) -and
+            $RuleType -match "Than|Equal|Expression"              ) {$rule.Formula   = ($ConditionValue  -replace '^=','') }
+    if     ($PSBoundParameters.ContainsKey("ConditionValue" ) -and
+            $RuleType -match "Text|With"                          ) {$rule.Text      = ($ConditionValue  -replace '^=','') }
+    if     ($PSBoundParameters.ContainsKey("ConditionValue" ) -and
+            $PSBoundParameters.ContainsKey("ConditionValue2") -and
+            $RuleType -match "Between"                            ) {
+                                                                     $rule.Formula   = ($ConditionValue  -replace '^=','');
+                                                                     $rule.Formula2  = ($ConditionValue2 -replace '^=','')
+    }
+    if     ($PSBoundParameters.ContainsKey("StopIfTrue")          ) {$rule.StopIfTrue = $StopIfTrue }
+    if     ($PSBoundParameters.ContainsKey("Priority")            ) {$rule.Priority   = $Priority }
+    #endregion
+    #region set the rule format
+    if     ($PSBoundParameters.ContainsKey("NumberFormat"     )   ) {$rule.Style.NumberFormat.Format        = (Expand-NumberFormat  $NumberFormat)             }
+    if     ($Underline                                            ) {$rule.Style.Font.Underline             = [OfficeOpenXml.Style.ExcelUnderLineType]::Single }
+    elseif ($PSBoundParameters.ContainsKey("Underline"        )   ) {$rule.Style.Font.Underline             = [OfficeOpenXml.Style.ExcelUnderLineType]::None   }
+    if     ($PSBoundParameters.ContainsKey("Bold"             )   ) {$rule.Style.Font.Bold                  = [boolean]$Bold       }
+    if     ($PSBoundParameters.ContainsKey("Italic"           )   ) {$rule.Style.Font.Italic                = [boolean]$Italic     }
+    if     ($PSBoundParameters.ContainsKey("StrikeThru"       )   ) {$rule.Style.Font.Strike                = [boolean]$StrikeThru }
+    if     ($PSBoundParameters.ContainsKey("ForeGroundColor"  )   ) {$rule.Style.Font.Color.color           = $ForeGroundColor     }
+    if     ($PSBoundParameters.ContainsKey("BackgroundColor"  )   ) {$rule.Style.Fill.BackgroundColor.color = $BackgroundColor     }
+    if     ($PSBoundParameters.ContainsKey("BackgroundPattern")   ) {$rule.Style.Fill.PatternType           = $BackgroundPattern   }
+    if     ($PSBoundParameters.ContainsKey("PatternColor"     )   ) {$rule.Style.Fill.PatternColor.color    = $PatternColor        }
+    #endregion
+    #Allow further tweaking by returning the rule, if passthru specified
+    if     ($Passthru)  {$rule}
+}

Charting.ps1

@@ -9,7 +9,7 @@ function DoChart {
      )
 
      if($targetData[0] -is [System.ValueType]) {
-         $chart = New-ExcelChart -YRange "A1:A$($targetData.count)" -Title $title -ChartType $ChartType
+         $chart = New-ExcelChartDefinition -YRange "A1:A$($targetData.count)" -Title $title -ChartType $ChartType
      } else {
          $xyRange = Get-XYRange $targetData
 
@@ -19,7 +19,7 @@ function DoChart {
          $Y = $xyRange.YRange.ExcelColumn
          $YRange = "{0}2:{0}{1}" -f $Y,($targetData.count+1)
 
-         $chart = New-ExcelChart -XRange $xRange -YRange $yRange -Title $title -ChartType $ChartType `
+         $chart = New-ExcelChartDefinition -XRange $xRange -YRange $yRange -Title $title -ChartType $ChartType `
             -NoLegend:$NoLegend -ShowCategory:$ShowCategory -ShowPercent:$ShowPercent
      }
 

ColorCompletion.ps1

@@ -0,0 +1,41 @@
+Function ColorCompletion {
+    param($commandName, $parameterName, $wordToComplete, $commandAst, $fakeBoundParameter)
+    [System.Drawing.KnownColor].GetFields() | Where-Object {$_.IsStatic -and $_.name -like "$wordToComplete*" } |
+        Sort-Object name | ForEach-Object {New-CompletionResult $_.name $_.name
+    }
+}
+
+if (Get-Command -Name register-argumentCompleter -ErrorAction SilentlyContinue) {
+    Register-ArgumentCompleter -CommandName Export-Excel               -ParameterName TitleBackgroundColor   -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Add-ConditionalFormatting  -ParameterName BackgroundColor        -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Add-ConditionalFormatting  -ParameterName DataBarColor           -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Add-ConditionalFormatting  -ParameterName ForeGroundColor        -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Add-ConditionalFormatting  -ParameterName PatternColor           -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Compare-Worksheet          -ParameterName AllDataBackgroundColor -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Compare-Worksheet          -ParameterName BackgroundColor        -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Compare-Worksheet          -ParameterName FontColor              -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Compare-Worksheet          -ParameterName TabColor               -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Join-Worksheet             -ParameterName TitleBackgroundColor   -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Merge-Worksheet            -ParameterName AddBackgroundColor     -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Merge-Worksheet            -ParameterName ChangeBackgroundColor  -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Merge-Worksheet       `    -ParameterName DeleteBackgroundColor  -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Merge-MulipleSheets        -ParameterName KeyFontColor           -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Merge-MulipleSheets        -ParameterName AddBackgroundColor     -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Merge-MulipleSheets        -ParameterName ChangeBackgroundColor  -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Merge-MulipleSheets   `    -ParameterName DeleteBackgroundColor  -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Merge-MulipleSheets        -ParameterName KeyFontColor           -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName New-ConditionalText        -ParameterName PatternColor           -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName New-ConditionalText        -ParameterName BackgroundColor        -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName New-ConditionalText        -ParameterName ConditionalTextColor   -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Set-ExcelRange             -ParameterName BackgroundColor        -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Set-ExcelRange             -ParameterName FontColor              -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Set-ExcelRange             -ParameterName BorderColor            -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Set-ExcelRange             -ParameterName PatternColor           -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Set-ExcelColumn            -ParameterName BackgroundColor        -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Set-ExcelColumn            -ParameterName FontColor              -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Set-ExcelColumn            -ParameterName PatternColor           -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Set-ExcelRow               -ParameterName BackgroundColor        -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Set-ExcelRow               -ParameterName FontColor              -ScriptBlock $Function:ColorCompletion
+    Register-ArgumentCompleter -CommandName Set-ExcelRow               -ParameterName PatternColor           -ScriptBlock $Function:ColorCompletion
+
+}

ConvertExcelToImageFile.ps1

@@ -0,0 +1,74 @@
+Function Convert-XlRangeToImage {
+    <#
+      .Synopsis
+        Gets the specified part of an Excel file and exports it as an image
+      .Description
+        Excel allows charts to be exported directly to a file, but can't do this with the rest of a sheet. To work round this this function
+        * Opens a copy of Excel and loads a file
+        * Selects a worksheet and then a range of cells in that worksheet
+        * Copies the select to the clipboard
+        * Saves the clipboard contents as an image file (it will save as .JPG unless the file name ends .BMP or .PNG)
+        * Copies a single cell to the clipboard (to prevent the "you have put a lot in the clipboard" message appearing)
+        * Closes Excel
+    #>
+    Param (
+        #Path to the Excel file
+        [parameter(Mandatory=$true)]
+        $Path,
+        #Worksheet name - if none is specified "Sheet1" will be assumed
+        $workSheetname = "Sheet1" ,
+        #Range of cells within the sheet, e.g "A1:Z99"
+        [parameter(Mandatory=$true)]
+        $range,
+        #A bmp, png or jpg file where the result will be saved
+        $destination = "$pwd\temp.png",
+        #If specified opens the image in the default viewer.
+        [switch]$show
+    )
+        $extension   = $destination -replace '^.*\.(\w+)$' ,'$1'
+        if ($extension -in @('JPEG','BMP','PNG'))  {
+            $Format = [system.Drawing.Imaging.ImageFormat]$extension
+        }       #if we don't recognise the extension OR if it is JPG with an E, use JPEG format
+        else { $Format = [system.Drawing.Imaging.ImageFormat]::Jpeg}
+        Write-Progress -Activity "Exporting $range of $workSheetname in $Path" -Status "Starting Excel"
+        $xlApp  = New-Object -ComObject "Excel.Application"
+        Write-Progress -Activity "Exporting $range of $workSheetname in $Path" -Status "Opening Workbook and copying data"
+        $xlWbk  = $xlApp.Workbooks.Open($Path)
+        $xlWbk.Worksheets($workSheetname).Select()
+        $xlWbk.ActiveSheet.Range($range).Select() | Out-Null
+        $xlApp.Selection.Copy()                   | Out-Null
+        Write-Progress -Activity "Exporting $range of $workSheetname in $Path" -Status "Saving copied data"
+        # Get-Clipboard came in with PS5. Older versions can use [System.Windows.Clipboard] but it is ugly.
+        $image  = Get-Clipboard -Format Image
+        $image.Save($destination, $Format)
+        Write-Progress -Activity "Exporting $range of $workSheetname in $Path" -Status "Closing Excel"
+        $xlWbk.ActiveSheet.Range("a1").Select()   | Out-Null
+        $xlApp.Selection.Copy()                   | Out-Null
+        $xlApp.Quit()
+        Write-Progress -Activity "Exporting $range of $workSheetname in $Path" -Completed
+        if ($show) {Start-Process -FilePath $destination}
+        else       {Get-Item      -Path     $destination}
+}
+<#
+del demo*.xlsx
+
+$workSheetname = 'Processes'
+$Path          = "$pwd\demo.xlsx"
+$myData        = Get-Process | Select-Object -Property Name,WS,CPU,Description,company,startTime
+
+$excelPackage  = $myData | Export-Excel -KillExcel -Path $Path -WorkSheetname $workSheetname -ClearSheet -AutoSize -AutoFilter -BoldTopRow -FreezeTopRow -PassThru
+$workSheet     = $excelPackage.Workbook.Worksheets[$workSheetname]
+$range         = $workSheet.Dimension.Address
+Set-Format                -WorkSheet $workSheet -Range "b:b"      -NumberFormat "#,###"            -AutoFit
+Set-Format                -WorkSheet $workSheet -Range "C:C"      -NumberFormat "#,##0.00"         -AutoFit
+Set-Format                -WorkSheet $workSheet -Range "F:F"      -NumberFormat "dd MMMM HH:mm:ss" -AutoFit
+Add-ConditionalFormatting -WorkSheet $workSheet -Range "c2:c1000" -DataBarColor Blue
+Add-ConditionalFormatting -WorkSheet $workSheet -Range "b2:B1000" -RuleType GreaterThan -ConditionValue '104857600' -ForeGroundColor "Red" -Bold
+
+Export-Excel -ExcelPackage $excelPackage -WorkSheetname $workSheetname
+
+Convert-XlRangeToImage -Path $Path -workSheetname $workSheetname -range $range -destination  "$pwd\temp.png"  -show
+#>
+
+
+#Convert-XlRangeToImage -Path $Path -workSheetname $workSheetname -range $range -destination  "$pwd\temp.png"  -show

ConvertFromExcelData.ps1

@@ -1,25 +1,25 @@
 function ConvertFrom-ExcelData {
     <#
-    .SYNOPSIS
-    Reads data from a sheet, and for each row, calls a custom scriptblock with a list of property names and the row of data.
+      .SYNOPSIS
+        Reads data from a sheet, and for each row, calls a custom scriptblock with a list of property names and the row of data.
 
-    
-    .EXAMPLE
-    ConvertFrom-ExcelData .\testSQLGen.xlsx {
-        param($propertyNames, $record)
+        
+      .EXAMPLE
+        ConvertFrom-ExcelData .\testSQLGen.xlsx {
+            param($propertyNames, $record)
 
-        $reportRecord = @()
-        foreach ($pn in $propertyNames) {
-            $reportRecord += "{0}: {1}" -f $pn, $record.$pn
+            $reportRecord = @()
+            foreach ($pn in $propertyNames) {
+                $reportRecord += "{0}: {1}" -f $pn, $record.$pn
+            }
+            $reportRecord +=""
+            $reportRecord -join "`r`n"
         }
-        $reportRecord +=""
-        $reportRecord -join "`r`n"
-}
 
-First: John
-Last: Doe
-The Zip: 12345
-....
+        First: John
+        Last: Doe
+        The Zip: 12345
+        ....
     #>
     param(
         [Alias("FullName")]

ConvertFromExcelToSQLInsert.ps1

@@ -1,4 +1,75 @@
 function ConvertFrom-ExcelToSQLInsert {
+    <#
+      .SYNOPSIS
+        Generate SQL insert statements from Excel spreadsheet.
+      .DESCRIPTION
+        Generate SQL insert statements from Excel spreadsheet.
+      .PARAMETER TableName
+        Name of the target database table.
+      .PARAMETER Path
+        Path to an existing .XLSX file
+        This parameter is passed to Import-Excel as is.
+      .PARAMETER WorkSheetname
+        Specifies the name of the worksheet in the Excel workbook to import. By default, if no name is provided, the first worksheet will be imported.
+        This parameter is passed to Import-Excel as is.
+      .PARAMETER StartRow
+        The row from where we start to import data, all rows above the StartRow are disregarded. By default this is the first row.
+        When the parameters ‘-NoHeader’ and ‘-HeaderName’ are not provided, this row will contain the column headers that will be used as property names. When one of both parameters are provided, the property names are automatically created and this row will be treated as a regular row containing data.
+      .PARAMETER Header
+        Specifies custom property names to use, instead of the values defined in the column headers of the TopRow.
+        If you provide fewr header names than there is data in the worksheet, then only the data with a corresponding header name will be imported and the data without header name will be disregarded.
+        If you provide more header names than there is data in the worksheet, then all data will be imported and all objects will have all the property names you defined in the header names. As such, the last properties will be blank as there is no data for them.
+      .PARAMETER NoHeader
+        Automatically generate property names (P1, P2, P3, ..) instead of the ones defined in the column headers of the TopRow.
+        This switch is best used when you want to import the complete worksheet ‘as is’ and are not concerned with the property names.
+      .PARAMETER DataOnly
+        Import only rows and columns that contain data, empty rows and empty columns are not imported.
+      .PARAMETER ConvertEmptyStringsToNull
+        If specified, cells without any data are replaced with NULL, instead of an empty string.
+        This is to address behviors in certain DBMS where an empty string is insert as 0 for INT column, instead of a NULL value.
+
+      .EXAMPLE
+        Generate SQL insert statements from Movies.xlsx file, leaving blank cells as empty strings:
+
+        ----------------------------------------------------------
+        | File: Movies.xlsx            -           Sheet: Sheet1 |
+        ----------------------------------------------------------
+        |           A            B            C                  |
+        |1     Movie Name      Year         Rating               |
+        |2     The Bodyguard   1992           9                  |
+        |3     The Matrix      1999           8                  |
+        |4     Skyfall         2012           9                  |
+        |5     The Avengers    2012                              |
+        ----------------------------------------------------------
+
+        PS C:\> Import-Excel -TableName "Movies" -Path 'C:\Movies.xlsx'
+        INSERT INTO Movies ('Movie Name', 'Year', 'Rating') Values('The Bodyguard', '1992', '9');
+        INSERT INTO Movies ('Movie Name', 'Year', 'Rating') Values('The Matrix', '1999', '8');
+        INSERT INTO Movies ('Movie Name', 'Year', 'Rating') Values('Skyfall', '2012', '9');
+        INSERT INTO Movies ('Movie Name', 'Year', 'Rating') Values('The Avengers', '2012', '');
+
+      .EXAMPLE
+        Generate SQL insert statements from Movies.xlsx file, specify NULL instead of an empty string.
+
+        ----------------------------------------------------------
+        | File: Movies.xlsx            -           Sheet: Sheet1 |
+        ----------------------------------------------------------
+        |           A            B            C                  |
+        |1     Movie Name      Year         Rating               |
+        |2     The Bodyguard   1992           9                  |
+        |3     The Matrix      1999           8                  |
+        |4     Skyfall         2012           9                  |
+        |5     The Avengers    2012                              |
+        ----------------------------------------------------------
+
+        PS C:\> ConvertFrom-ExcelToSQLInsert -TableName "Movies" -Path "C:\Movies.xlsx" -ConvertEmptyStringsToNull
+        INSERT INTO Movies ('Movie Name', 'Year', 'Rating') Values('The Bodyguard', '1992', '9');
+        INSERT INTO Movies ('Movie Name', 'Year', 'Rating') Values('The Matrix', '1999', '8');
+        INSERT INTO Movies ('Movie Name', 'Year', 'Rating') Values('Skyfall', '2012', '9');
+        INSERT INTO Movies ('Movie Name', 'Year', 'Rating') Values('The Avengers', '2012', NULL);
+
+    #>
+    [CmdletBinding()]
     param(
         [Parameter(Mandatory = $true)]
         $TableName,
@@ -8,39 +79,40 @@ function ConvertFrom-ExcelToSQLInsert {
         $Path,
         [Alias("Sheet")]
         $WorkSheetname = 1,
-        [int]$HeaderRow = 1,
+        [Alias('HeaderRow', 'TopRow')]
+        [ValidateRange(1, 9999)]
+        [Int]$StartRow,
         [string[]]$Header,
         [switch]$NoHeader,
-        [switch]$DataOnly
+        [switch]$DataOnly,
+        [switch]$ConvertEmptyStringsToNull,
+        [switch]$UseMSSQLSyntax
     )
 
     $null = $PSBoundParameters.Remove('TableName')
+    $null = $PSBoundParameters.Remove('ConvertEmptyStringsToNull')
+    $null = $PSBoundParameters.Remove('UseMSSQLSyntax')
+
     $params = @{} + $PSBoundParameters
 
     ConvertFrom-ExcelData @params {
         param($propertyNames, $record)
 
         $ColumnNames = "'" + ($PropertyNames -join "', '") + "'"
-        $values = foreach ($propertyName in $PropertyNames) { $record.$propertyName }
-        $targetValues = "'" + ($values -join "', '") + "'"
+        if($UseMSSQLSyntax) {
+            $ColumnNames = "[" + ($PropertyNames -join "], [") + "]"
+        }
+
+        $values = foreach ($propertyName in $PropertyNames) {
+            if ($ConvertEmptyStringsToNull.IsPresent -and [string]::IsNullOrEmpty($record.$propertyName)) {
+                'NULL'
+            }
+            else {
+                "'" + $record.$propertyName + "'"
+            }
+        }
+        $targetValues = ($values -join ", ")
 
         "INSERT INTO {0} ({1}) Values({2});" -f $TableName, $ColumnNames, $targetValues
     }
-    # $data = Import-Excel @params    
-    
-    # $PropertyNames = $data[0].psobject.Properties |
-    #     Where-Object {$_.membertype -match 'property'} |
-    #     Select-Object -ExpandProperty name
-    
-    # $ColumnNames = "'" + ($PropertyNames -join "', '") + "'"
-
-    # foreach ($record in $data) {
-    #     $values = $(foreach ($propertyName in $PropertyNames) {
-    #             $record.$propertyName
-    #         })
-
-    #     $targetValues = "'" + ($values -join "', '") + "'"
-
-    #     "INSERT INTO {0} ({1}) Values({2});" -f $TableName, $ColumnNames, $targetValues
-    # }
 }

Copy-ExcelWorkSheet.ps1

@@ -1,22 +1,110 @@
 function Copy-ExcelWorkSheet {
+    <#
+      .SYNOPSIS
+        Copies a worksheet between workbooks or within the same workbook.
+      .DESCRIPTION
+         Copy-ExcelWorkSheet takes Source and Destination workbook parameters; each can be the path to an XLSx file, an ExcelPackage object or an ExcelWorkbook object.
+         The Source worksheet is specified by name or number (starting from 1), and the destination worksheet can be explicitly named,
+         or will follow the name of the source if no name is specified.
+      .EXAMPLE
+        C:\> Copy-ExcelWorkSheet -SourceWorkbook Test1.xlsx  -DestinationWorkbook Test2.xlsx
+        This is the simplest version of the command: no source worksheet is specified so Copy-ExcelWorksheet uses the first sheet in the workbook
+        No Destination sheet is specified so the new worksheet will be the same as the one which is being copied.
+      .EXAMPLE
+        C:\> Copy-ExcelWorkSheet -SourceWorkbook Server1.xlsx -sourceWorksheet "Settings" -DestinationWorkbook Settings.xlsx -DestinationWorkSheet "Server1"
+        Here the Settings page from Server1's workbook is copied to the 'Server1" page of a "Settings" workbook.
+      .EXAMPLE
+         C:\> $excel = Open-ExcelPackage   .\test.xlsx
+         C:\> Copy-ExcelWorkSheet -SourceWorkbook  $excel -SourceWorkSheet "first" -DestinationWorkbook $excel -Show -DestinationWorkSheet Duplicate
+         This opens the workbook test.xlsx and copies the worksheet named "first" to a new worksheet named "Duplicate",
+         because -Show is specified the file is saved and opened in Excel
+      .EXAMPLE
+         C:\> $excel = Open-ExcelPackage .\test.xlsx
+         C:\> Copy-ExcelWorkSheet -SourceWorkbook  $excel -SourceWorkSheet 1 -DestinationWorkbook $excel  -DestinationWorkSheet Duplicate
+         C:\> Close-ExcelPackage $excel
+         This is almost the same as the previous example, except source sheet is specified by position rather than name and
+         because -Show is not specified, so other steps can be carried using the package object, at the end the file is saved by Close-ExcelPackage
+
+    #>
     [CmdletBinding()]
     param(
+        #An ExcelWorkbook or ExcelPackage object or the path to an XLSx file where the data is found.
         [Parameter(Mandatory=$true)]
         $SourceWorkbook,
-        [Parameter(Mandatory=$true)]
-        $SourceWorkSheet,
+        #Name or number (starting from 1) of the worksheet in the source workbook (defaults to 1).
+        $SourceWorkSheet = 1 ,
+        #An ExcelWorkbook or ExcelPackage object or the path to an XLSx file where the data should be copied.
         [Parameter(Mandatory=$true)]
         $DestinationWorkbook,
+        #Name of the worksheet in the destination workbook; by default the same as the source worksheet's name. If the sheet exists it will be deleted and re-copied.
         $DestinationWorkSheet,
+        #if the destination is an excel package or a path, launch excel and open the file on completion.
         [Switch]$Show
     )
-
-    Write-Verbose "Copying $($SourceWorkSheet) from $($SourceWorkbook) to $($DestinationWorkSheet) in $($DestinationWorkbook)"
-
-    if(!$DestinationWorkSheet) {
-        $DestinationWorkSheet = $SourceWorkSheet
+    #Special case - give the same path for source and destination worksheet
+    if ($SourceWorkbook -is [System.String] -and $SourceWorkbook -eq $DestinationWorkbook) {
+        if (-not $DestinationWorkSheet) {Write-Warning -Message "You must specify a destination worksheet name if copying within the same workbook."; return}
+        else {
+            Write-Verbose -Message "Copying "
+            $excel = Open-ExcelPackage -Path $SourceWorkbook
+            if (-not $excel.Workbook.Worksheets[$Sourceworksheet]) {
+                Write-Warning -Message "Could not find Worksheet $sourceWorksheet in $sourceWorkbook"
+                Close-ExcelPackage -ExcelPackage $excel -NoSave
+                return
+            }
+            elseif ($excel.Workbook.Worksheets[$Sourceworksheet].name -eq $DestinationWorkSheet) {
+                Write-Warning -Message "The destination worksheet name is the same as the source. "
+                Close-ExcelPackage -ExcelPackage $excel -NoSave
+                return
+            }
+            else {
+                $null = Add-WorkSheet -ExcelPackage $Excel -WorkSheetname $DestinationWorkSheet -CopySource ($excel.Workbook.Worksheets[$SourceWorkSheet])
+                Close-ExcelPackage -ExcelPackage $excel -Show:$Show
+                return
+            }
+        }
+    }
+    else {
+        if     ($SourceWorkbook -is [OfficeOpenXml.ExcelWorkbook]) {$sourcews=$SourceWorkbook.Worksheets[$SourceWorkSheet]}
+        elseif ($SourceWorkbook -is [OfficeOpenXml.ExcelPackage] ) {$sourcews=$SourceWorkbook.Workbook.Worksheets[$SourceWorkSheet]}
+        else {
+                $SourceWorkbook = (Resolve-Path $SourceWorkbook).ProviderPath
+                try {
+                    Write-Verbose "Opening worksheet '$Worksheetname' in Excel workbook '$SourceWorkbook'."
+                    $Stream    = New-Object -TypeName System.IO.FileStream -ArgumentList $SourceWorkbook, 'Open', 'Read' ,'ReadWrite'
+                    $Package1  = New-Object -TypeName OfficeOpenXml.ExcelPackage -ArgumentList $Stream
+                    $sourceWs = $Package1.Workbook.Worksheets[$SourceWorkSheet]
+                }
+                catch           {Write-Warning -Message "Could not open $SourceWorkbook" ; return}
+        }
+        if     (-not $sourceWs) {Write-Warning -Message "Could not find worksheet '$Sourceworksheet' in the source workbook." ; return}
+        else {
+                try {
+                    if     ($DestinationWorkbook -is [OfficeOpenXml.ExcelWorkbook]) {
+                            $wb = $DestinationWorkbook
+                    }
+                    elseif ($DestinationWorkbook -is [OfficeOpenXml.ExcelPackage] ) {
+                            $wb = $DestinationWorkbook.workbook
+                            if ($show) {$package2 =$DestinationWorkbook}
+                    }
+                    else   {
+                            $package2 = Open-ExcelPackage -Create  -Path $DestinationWorkbook
+                            $wb = $package2.Workbook
+                    }
+                    if (-not  $DestinationWorkSheet) {$DestinationWorkSheet = $SourceWs.Name}
+                    if ($wb.Worksheets[$DestinationWorkSheet]) {
+                            Write-Verbose "Destination workbook already has a sheet named '$DestinationWorkSheet', deleting it."
+                            $wb.Worksheets.Delete($DestinationWorkSheet)
+                    }
+                    Write-Verbose "Copying $($SourceWorkSheet) from $($SourceWorkbook) to $($DestinationWorkSheet) in $($DestinationWorkbook)"
+                    $null = Add-WorkSheet -ExcelWorkbook $wb -WorkSheetname $DestinationWorkSheet -CopySource  $sourceWs
+                    if ($package1) {Close-ExcelPackage -ExcelPackage $Package1 -NoSave     }
+                    if ($package2) {Close-ExcelPackage -ExcelPackage $Package2 -Show:$show }
+                    if ($show -and $DestinationWorkbook -is  [OfficeOpenXml.ExcelWorkbook]) {
+                                 Write-Warning -Message "-Show only works if the Destination workbook is given as a file path or an ExcelPackage object."
+                    }
+                }
+                catch           {Write-Warning -Message "Could not write to sheet '$DestinationWorkSheet' in the destination workbook" ; return}
+        }
     }
-
-    Import-Excel -Path $SourceWorkbook -WorkSheetname $SourceWorkSheet |
-        Export-Excel -Path $DestinationWorkbook -WorkSheetname $DestinationWorkSheet -Show:$Show
 }

DoTests.ps1

@@ -0,0 +1,22 @@
+##
+#   Used in Appveyor.yml
+##
+
+$PSVersionTable.PSVersion
+
+## Create the zip before the tests run
+## Otherwise the EPPlus.dll is in use after the Pester run
+$ModuleVersion = (Get-Content -Raw .\ImportExcel.psd1)  | Invoke-Expression | ForEach-Object ModuleVersion
+
+$dest = "ImportExcel-{0}-{1}.zip" -f $ModuleVersion, (Get-Date).ToString("yyyyMMddHHmmss")
+Compress-Archive -Path . -DestinationPath .\$dest
+
+if ((Get-Module -ListAvailable pester) -eq $null) {
+    Install-Module -Name Pester -Repository PSGallery -Force -Scope CurrentUser
+}
+
+$result = Invoke-Pester -Script $PSScriptRoot\__tests__ -Verbose -PassThru
+
+if ($result.FailedCount -gt 0) {
+    throw "$($result.FailedCount) tests failed."
+}

Examples/AddWorkSheet/AddWorkSheet.ps1

@@ -0,0 +1,12 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$xlSourcefile = "$env:TEMP\Source.xlsx"
+
+Remove-Item $xlSourcefile -ErrorAction Ignore
+
+#Put some simple data in a worksheet and Get an excel package object to represent the file
+$excel = 1..10 | Export-Excel $xlSourcefile -PassThru
+#Add a new worksheet named 'NewSheet' and copying the sheet that was just made (Sheet1) to the new sheet
+Add-WorkSheet -ExcelPackage $excel -WorkSheetname "NewSheet" -CopySource $excel.Workbook.Worksheets["Sheet1"]
+#Save and open in Excel
+Close-ExcelPackage -ExcelPackage $excel -Show

Examples/Charts/MultiSeries.ps1

@@ -1,12 +1,14 @@
-rm temp.xlsx -ErrorAction Ignore
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-$data = invoke-sum (ps) company handles,pm,VirtualMemorySize
+Remove-Item temp.xlsx -ErrorAction Ignore
 
-$c = New-ExcelChart -Title Stats `
+$data = Invoke-Sum -data (Get-Process) -dimension Company -measure Handles, PM, VirtualMemorySize
+
+$c = New-ExcelChartDefinition -Title "ProcessStats" `
     -ChartType LineMarkersStacked `
-    -Header "Stuff" `
-    -XRange "Processes[Company]" `
-    -YRange "Processes[PM]","Processes[VirtualMemorySize]"
- 
-$data | 
-    Export-Excel temp.xlsx -AutoSize -TableName Processes -Show -ExcelChartDefinition $c
+    -XRange "Processes[Name]" `
+    -YRange "Processes[PM]","Processes[VirtualMemorySize]" `
+    -SeriesHeader "PM","VM"
+
+$data |
+    Export-Excel -Path temp.xlsx -AutoSize -TableName Processes -ExcelChartDefinition $c  -Show

Examples/Charts/MultiSeries1.ps1

@@ -1,16 +1,19 @@
-rm temp.xlsx -ErrorAction Ignore
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+Remove-Item temp.xlsx -ErrorAction Ignore
 
 $data = @"
 A,B,C,Date
 2,1,1,2016-03-29
 5,10,1,2016-03-29
-"@ | ConvertFrom-Csv 
+"@
 
-$c = New-ExcelChart -Title Impressions `
-    -ChartType Line -Header "Something" `
+$c = New-ExcelChartDefinition -Title Impressions `
+    -ChartType Line   `
     -XRange "Impressions[Date]" `
     -YRange @("Impressions[B]","Impressions[A]") `
-    -SeriesHeader 'B data','A data'
+    -SeriesHeader 'B data','A data' `
+    -Row 0 -Column 0
 
-$data | 
-    Export-Excel temp.xlsx -AutoSize -TableName Impressions -Show -ExcelChartDefinition $c
+$data | ConvertFrom-Csv |   Export-Excel -path temp.xlsx -AutoSize -TableName Impressions
+Export-Excel -path temp.xlsx -worksheetName chartPage -ExcelChartDefinition $c  -show

Examples/Charts/MultipleCharts.ps1

@@ -1,19 +1,19 @@
-rm *.xlsx 
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+Remove-Item -Path Tools.xlsx
 
 $data = @"
 ID,Product,Quantity,Price,Total
 12001,Nails,37,3.99,147.63
 12002,Hammer,5,12.10,60.5
 12003,Saw,12,15.37,184.44
-12010,Drill,20,8,160  
+12010,Drill,20,8,160
 12011,Crowbar,7,23.48,164.36
-"@ | ConvertFrom-Csv 
+"@
 
-$xRange = "Product"
+$c1 = New-ExcelChartDefinition -YRange "Price"   -XRange "Product" -Title "Item price"   -NoLegend -Height 225
+$c2 = New-ExcelChartDefinition -YRange "Total   "-XRange "Product" -Title "Total sales"  -NoLegend -Height 225 -Row 9  -Column 15
+$c3 = New-ExcelChartDefinition -YRange "Quantity"-XRange "Product" -Title "Sales volume" -NoLegend -Height 225 -Row 15
 
-$yRange="Price";    $c1 = New-ExcelChart -YRange $yRange -XRange $xRange -Title $yRange -Height 225
-$yRange="Total";    $c2 = New-ExcelChart -YRange $yRange -XRange $xRange -Title $yRange -Row 9 -Column 15 -Height 225 
-$yRange="Quantity"; $c3 = New-ExcelChart -YRange $yRange -XRange $xRange -Title $yRange -Row 15 -Height 225 
-
-$data | 
-    Export-Excel -ExcelChartDefinition $c1,$c2,$c3 Tools.xlsx -Show -AutoFilter -AutoNameRange -AutoSize
+$data | ConvertFrom-Csv |
+    Export-Excel -Path  "Tools.xlsx" -AutoFilter -AutoNameRange -AutoSize -ExcelChartDefinition $c1,$c2,$c3  -Show

Examples/Charts/plot.ps1

@@ -1,3 +1,5 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 function plot {
     param(
         $f,
@@ -7,18 +9,18 @@ function plot {
 
     $minx=[math]::Round($minx,1)
     $maxx=[math]::Round($maxx,1)
-    
-    $file = 'C:\temp\plot.xlsx'    
-    rm $file -ErrorAction Ignore
 
-    $c = New-ExcelChart -XRange X -YRange Y -ChartType Line -NoLegend -Title Plot -Column 2 -ColumnOffSetPixels 35
-    
+    $file = 'C:\temp\plot.xlsx'
+    Remove-Item $file -ErrorAction Ignore
+
+   # $c = New-ExcelChart -XRange X -YRange Y -ChartType Line -NoLegend -Title Plot -Column 2 -ColumnOffSetPixels 35
+
     $(for ($i = $minx; $i -lt $maxx-.1; $i+=.1) {
         [pscustomobject]@{
             X=$i.ToString("N1")
             Y=(&$f $i)
         }
-    }) | Export-Excel $file -Show -AutoNameRange -ExcelChartDefinition $c 
+    }) | Export-Excel $file -Show -AutoNameRange -LineChart -NoLegend  #-ExcelChartDefinition $c
 }
 
 function pi {[math]::pi}

Examples/ConditionalFormatting/CodeGenExamples.ps1

@@ -1,5 +1,5 @@
 echo Last7Days LastMonth LastWeek NextMonth NextWeek ThisMonth ThisWeek Today Tomorrow Yesterday |
-    % {
+    Foreach-Object {
     $text = @"
 `$f = ".\testExport.xlsx"
 

Examples/ConditionalFormatting/ConditionalText.ps1

@@ -1,11 +1,13 @@
-$file = ".\conditionalTextFormatting.xlsx"
-rm $file -ErrorAction Ignore
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-Get-Service | 
-    Select Status, Name, DisplayName, ServiceName |
+$file = "$env:temp\conditionalTextFormatting.xlsx"
+Remove-Item $file -ErrorAction Ignore
+
+Get-Service |
+    Select-Object Status, Name, DisplayName, ServiceName |
     Export-Excel $file -Show -AutoSize -AutoFilter -ConditionalText $(
-        New-ConditionalText stop 
-        New-ConditionalText runn darkblue cyan
-        New-ConditionalText -ConditionalType EndsWith svc wheat green 
-        New-ConditionalText -ConditionalType BeginsWith windows darkgreen wheat        
+        New-ConditionalText stop                                                  #Stop is the condition value, the rule is defaults to 'Contains text' and the default Colors are used
+        New-ConditionalText runn darkblue cyan                                    #runn is the condition value, the rule is defaults to 'Contains text'; the foregroundColur is darkblue and the background is cyan
+        New-ConditionalText -ConditionalType EndsWith svc wheat green             #the rule here is 'Ends with' and the value is 'svc' the forground is wheat and the background dark green
+        New-ConditionalText -ConditionalType BeginsWith windows darkgreen wheat   #this is 'Begins with "Windows"' the forground is dark green and the background wheat
     )

Examples/ConditionalFormatting/ContainsBlanks.ps1

@@ -1,15 +1,19 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+#Define a "Contains blanks" rule. No format is specified so it default to dark-red text on light-pink background.
 $ContainsBlanks = New-ConditionalText -ConditionalType ContainsBlanks
 
 $data = $(
     New-PSItem a b c (echo p1 p2 p3)
-    New-PSItem 
+    New-PSItem
     New-PSItem d e f
-    New-PSItem 
-    New-PSItem 
-    New-PSItem g h i 
+    New-PSItem
+    New-PSItem
+    New-PSItem g h i
 )
 
-$file ="c:\temp\testblanks.xlsx"
+$file ="$env:temp\testblanks.xlsx"
 
-rm $file -ErrorAction Ignore
+Remove-Item $file -ErrorAction Ignore
+#use the conditional format definition created above
 $data | Export-Excel $file -show -ConditionalText $ContainsBlanks

Examples/ConditionalFormatting/Databar.ps1

@@ -0,0 +1,32 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$path = "$env:temp\test.xlsx"
+Remove-Item -Path $path -ErrorAction Ignore
+
+#Export processes, and get an ExcelPackage object representing the file.
+$excel = Get-Process |
+    Select-Object -Property Name,Company,Handles,CPU,PM,NPM,WS |
+    Export-Excel -Path $path -ClearSheet -WorkSheetname "Processes" -PassThru
+
+$sheet = $excel.Workbook.Worksheets["Processes"]
+
+#Apply fixed formatting to columns. Set-Format is an Alias for Set-Excel Range, -NFormat is an alias for numberformat
+$sheet.Column(1) | Set-ExcelRange -Bold -AutoFit
+$sheet.Column(2) | Set-Format -Width 29 -WrapText
+$sheet.Column(3) | Set-Format -HorizontalAlignment Right -NFormat "#,###"
+
+Set-ExcelRange -Range -Address $sheet.Cells["E1:H1048576"]  -HorizontalAlignment Right -NFormat "#,###"
+#Set-Format is an alias for Set-ExcelRange
+Set-Format -Range   $sheet.Column(4)  -HorizontalAlignment Right -NFormat "#,##0.0" -Bold
+#In Set-ExcelRange / Set-Format "-Address" is an alias for "-Range"
+Set-Format -Address $sheet.Row(1) -Bold -HorizontalAlignment Center
+
+#Create a Red Data-bar for the values in Column D
+Add-ConditionalFormatting -WorkSheet $sheet -Address "D2:D1048576" -DataBarColor Red
+# Conditional formatting applies to "Addreses" aliases allow either "Range" or "Address" to be used in Set-ExcelRange or Add-Conditional formatting.
+Add-ConditionalFormatting -WorkSheet $sheet -Range  "G2:G1048576" -RuleType GreaterThan -ConditionValue "104857600"  -ForeGroundColor Red
+
+foreach ($c in 5..9) {Set-Format -Address $sheet.Column($c)  -AutoFit }
+
+#Create a pivot and save the file.
+Export-Excel -ExcelPackage $excel -WorkSheetname "Processes" -IncludePivotChart -ChartType ColumnClustered -NoLegend -PivotRows company  -PivotData @{'Name'='Count'}  -Show

Examples/ConditionalFormatting/FormatCalculations.ps1

@@ -1,11 +1,13 @@
-$f = ".\testExport.xlsx"
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-rm $f -ErrorAction Ignore
+$f = "$env:TEMP\testExport.xlsx"
+
+Remove-Item $f -ErrorAction Ignore
 
 $data = $(
 
     New-PSItem North 111 (echo Region Amount )
-    New-PSItem East 111 
+    New-PSItem East 111
     New-PSItem West 122
     New-PSItem South 200
 
@@ -14,11 +16,13 @@ $data = $(
     New-PSItem SouthWest 136
     New-PSItem South 127
 
-    New-PSItem NorthByNory 100 
-    New-PSItem NothEast 110 
-    New-PSItem Westerly 120 
+    New-PSItem NorthByNory 100
+    New-PSItem NothEast 110
+    New-PSItem Westerly 120
     New-PSItem SouthWest 118
-) 
+)
+# in this example instead of doing $variable = New-Conditional text <parameters> .... ; Export-excel -conditionalText $variable <other parameters>
+# the syntax is used is Export-excel -conditionalText (New-Conditional text <parameters>) <other parameters>
 
 
 #$data  | Export-Excel $f -Show -AutoSize -ConditionalText (New-ConditionalText -ConditionalType AboveAverage)

Examples/ConditionalFormatting/GetProcess.ps1

@@ -1,8 +1,12 @@
-rm .\testExport.xlsx -ErrorAction Ignore
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-ps | where Company | select Company, Name, PM, Handles, *mem* |
+Remove-Item "$env:TEMP\testExport.xlsx" -ErrorAction Ignore
 
-    Export-Excel .\testExport.xlsx -Show -AutoSize -AutoNameRange `
+Get-Process | Where-Object Company | Select-Object Company, Name, PM, Handles, *mem* |
+
+#This example creates a 3 Icon set for the values in the "PM column, and Highlights company names (anywhere in the data) with different colors
+
+    Export-Excel "$env:TEMP\testExport.xlsx" -Show -AutoSize -AutoNameRange `
         -ConditionalFormat $(
             New-ConditionalFormattingIconSet -Range "C:C" `
                 -ConditionalFormat ThreeIconSet -IconType Arrows

Examples/ConditionalFormatting/Highlight-Last7Days.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $f = ".\testExport.xlsx"
 
-rm $f -ErrorAction Ignore
+Remove-Item $f -ErrorAction Ignore
 
 .\GenDates.ps1 |
     Export-Excel $f -Show -AutoSize -ConditionalText $(

Examples/ConditionalFormatting/Highlight-LastMonth.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $f = ".\testExport.xlsx"
 
-rm $f -ErrorAction Ignore
+Remove-Item $f -ErrorAction Ignore
 
 .\GenDates.ps1 |
     Export-Excel $f -Show -AutoSize -ConditionalText $(

Examples/ConditionalFormatting/Highlight-LastWeek.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $f = ".\testExport.xlsx"
 
-rm $f -ErrorAction Ignore
+Remove-Item $f -ErrorAction Ignore
 
 .\GenDates.ps1 |
     Export-Excel $f -Show -AutoSize -ConditionalText $(

Examples/ConditionalFormatting/Highlight-NextMonth.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $f = ".\testExport.xlsx"
 
-rm $f -ErrorAction Ignore
+Remove-Item $f -ErrorAction Ignore
 
 .\GenDates.ps1 |
     Export-Excel $f -Show -AutoSize -ConditionalText $(

Examples/ConditionalFormatting/Highlight-NextWeek.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $f = ".\testExport.xlsx"
 
-rm $f -ErrorAction Ignore
+Remove-Item $f -ErrorAction Ignore
 
 .\GenDates.ps1 |
     Export-Excel $f -Show -AutoSize -ConditionalText $(

Examples/ConditionalFormatting/Highlight-ThisMonth.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $f = ".\testExport.xlsx"
 
-rm $f -ErrorAction Ignore
+Remove-Item $f -ErrorAction Ignore
 
 .\GenDates.ps1 |
     Export-Excel $f -Show -AutoSize -ConditionalText $(

Examples/ConditionalFormatting/Highlight-ThisWeek.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $f = ".\testExport.xlsx"
 
-rm $f -ErrorAction Ignore
+Remove-Item $f -ErrorAction Ignore
 
 .\GenDates.ps1 |
     Export-Excel $f -Show -AutoSize -ConditionalText $(

Examples/ConditionalFormatting/Highlight-Today.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $f = ".\testExport.xlsx"
 
-rm $f -ErrorAction Ignore
+Remove-Item $f -ErrorAction Ignore
 
 .\GenDates.ps1 |
     Export-Excel $f -Show -AutoSize -ConditionalText $(

Examples/ConditionalFormatting/Highlight-Tomorrow.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $f = ".\testExport.xlsx"
 
-rm $f -ErrorAction Ignore
+Remove-Item $f -ErrorAction Ignore
 
 .\GenDates.ps1 |
     Export-Excel $f -Show -AutoSize -ConditionalText $(

Examples/ConditionalFormatting/Highlight-Yesterday.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $f = ".\testExport.xlsx"
 
-rm $f -ErrorAction Ignore
+Remove-Item $f -ErrorAction Ignore
 
 .\GenDates.ps1 |
     Export-Excel $f -Show -AutoSize -ConditionalText $(

Examples/ConditionalFormatting/HighlightDuplicates.ps1

@@ -1,23 +1,25 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $f = ".\testExport.xlsx"
 
-rm $f -ErrorAction Ignore
+Remove-Item $f -ErrorAction Ignore
 
 $data = $(
 
     New-PSItem North 111 (echo Region Amount )
-    New-PSItem East 11 
-    New-PSItem West 12 
-    New-PSItem South 1000 
+    New-PSItem East 11
+    New-PSItem West 12
+    New-PSItem South 1000
 
-    New-PSItem NorthEast 10 
-    New-PSItem SouthEast 14 
-    New-PSItem SouthWest 13 
-    New-PSItem South 12 
+    New-PSItem NorthEast 10
+    New-PSItem SouthEast 14
+    New-PSItem SouthWest 13
+    New-PSItem South 12
 
-    New-PSItem NorthByNory 100 
-    New-PSItem NothEast 110 
-    New-PSItem Westerly 120 
-    New-PSItem SouthWest 11 
-) 
+    New-PSItem NorthByNory 100
+    New-PSItem NothEast 110
+    New-PSItem Westerly 120
+    New-PSItem SouthWest 11
+)
 
 $data  | Export-Excel $f -Show -AutoSize -ConditionalText (New-ConditionalText -ConditionalType DuplicateValues)

Examples/ConditionalFormatting/MonthlyTemperatuesDatabar.ps1

@@ -0,0 +1,25 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+Remove-Item -Path .\test.xlsx -ErrorAction Ignore
+
+$excel = @"
+Month,New York City,Austin Texas,Portland Oregon
+Jan,39,61,46
+Feb,42,65,51
+Mar,50,73,56
+Apr,62,80,61
+May,72,86,67
+Jun,80,92,73
+Jul,85,95,80
+Aug,84,96,80
+Sep,76,90,75
+Oct,65,82,63
+Nov,54,71,52
+Dec,44,63,46
+"@ | ConvertFrom-csv |
+    Export-Excel -Path .\test.xlsx -WorkSheetname Sheet1 -AutoNameRange -AutoSize -Title "Monthly Temperatures" -PassThru
+
+$sheet = $excel.Workbook.Worksheets["Sheet1"]
+Add-ConditionalFormatting -WorkSheet $sheet -Range "B1:D14" -DataBarColor CornflowerBlue
+
+Close-ExcelPackage $excel -Show

Examples/ConditionalFormatting/RangeFormatting.ps1

@@ -1,16 +1,17 @@
-ipmo ImportExcel -Force
-$f = ".\testExport.xlsx"
-rm $f -ErrorAction Ignore
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-function Get-DateOffset ($days=0) {    
+$f = ".\testExport.xlsx"
+Remove-Item $f -ErrorAction Ignore
+
+function Get-DateOffset ($days=0) {
     (Get-Date).AddDays($days).ToShortDateString()
 }
 
 $(
     New-PSItem (Get-DateOffset -1) (Get-DateOffset 1) (echo Start End)
-    New-PSItem (Get-DateOffset) (Get-DateOffset 7) 
-    New-PSItem (Get-DateOffset -10) (Get-DateOffset -1) 
-) | 
+    New-PSItem (Get-DateOffset) (Get-DateOffset 7)
+    New-PSItem (Get-DateOffset -10) (Get-DateOffset -1)
+) |
 
     Export-Excel $f -Show -AutoSize -AutoNameRange -ConditionalText $(
         New-ConditionalText -Range Start -ConditionalType Yesterday -ConditionalTextColor Red

Examples/ConditionalFormatting/SalesReportWithDatabar.ps1

@@ -0,0 +1,22 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+Remove-Item -Path .\test.xlsx -ErrorAction Ignore
+
+$excel = @"
+Month,Sales
+Jan,1277
+Feb,1003
+Mar,1105
+Apr,952
+May,770
+Jun,621
+"@ | ConvertFrom-csv |
+     Export-Excel -Path .\test.xlsx -WorkSheetname Sheet1 -AutoNameRange -PassThru
+
+$sheet = $excel.Workbook.Worksheets["Sheet1"]
+Add-ConditionalFormatting -WorkSheet $sheet -Range "B1:B7" -DataBarColor LawnGreen
+
+Set-Format -Address $sheet.Cells["A8"] -Value "Total"
+Set-Format -Address $sheet.Cells["B8"] -Formula "=Sum(Sales)"
+
+Close-ExcelPackage $excel -Show

Examples/ConditionalFormatting/TextComparisons.ps1

@@ -1,6 +1,4 @@
-cls
-
-ipmo ..\..\ImportExcel.psd1 -Force
+try {ipmo ..\..\ImportExcel.psd1 -Force} catch {}
 
 $data = $(
     New-PSItem 100 (echo test testx)
@@ -10,8 +8,8 @@ $data = $(
     New-PSItem 500
 )
 
-$file1 = "tryComparison1.xlsx"
-$file2 = "tryComparison2.xlsx"
+$file1 = "$env:Temp\tryComparison1.xlsx"
+$file2 = "$env:Temp\tryComparison2.xlsx"
 
 rm $file1 -ErrorAction Ignore
 rm $file2 -ErrorAction Ignore
@@ -22,6 +20,6 @@ $data | Export-Excel $file1 -Show -ConditionalText $(
 )
 
 $data | Export-Excel $file2 -Show -ConditionalText $(
-    New-ConditionalText -ConditionalType GreaterThanOrEqual 275 
+    New-ConditionalText -ConditionalType GreaterThanOrEqual 275
     New-ConditionalText -ConditionalType LessThanOrEqual 250 -BackgroundColor cyan
 )

Examples/ConvertFrom/ConvertFrom.ps1

@@ -1,3 +1,4 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
 ConvertFrom-ExcelToSQLInsert People .\testSQLGen.xlsx
 

Examples/CustomReporting/CustomReport.ps1

@@ -0,0 +1,72 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$f = ".\dashboard.xlsx"
+Remove-Item $f -ErrorAction Ignore
+
+$data = @"
+From,To,RDollars,RPercent,MDollars,MPercent,Revenue,Margin
+Atlanta,New York,3602000,.0809,955000,.09,245,65
+New York,Washington,4674000,.105,336000,.03,222,16
+Chicago,New York,4674000,.0804,1536000,.14,550,43
+New York,Philadelphia,12180000,.1427,-716000,-.07,321,-25
+New York,San Francisco,3221000,.0629,1088000,.04,436,21
+New York,Phoneix,2782000,.0723,467000,.10,674,33
+"@ | ConvertFrom-Csv
+
+$data | Export-Excel $f -AutoSize
+
+$excel = Open-ExcelPackage $f
+
+$sheet1 = $excel.Workbook.Worksheets["sheet1"]
+
+$sheet1.View.ShowGridLines = $false
+$sheet1.View.ShowHeaders = $false
+
+Set-Format -Address $sheet1.Cells["C:C"] -NumberFormat "$#,##0" -WrapText -HorizontalAlignment Center
+Set-Format -Address $sheet1.Cells["D:D"] -NumberFormat "#.#0%"  -WrapText -HorizontalAlignment Center
+
+Set-Format -Address $sheet1.Cells["E:E"] -NumberFormat "$#,##0" -WrapText -HorizontalAlignment Center
+Set-Format -Address $sheet1.Cells["F:F"] -NumberFormat "#.#0%"  -WrapText -HorizontalAlignment Center
+
+Set-Format -Address $sheet1.Cells["G:H"] -WrapText -HorizontalAlignment Center
+
+## Insert Rows/Columns
+$sheet1.InsertRow(1, 1)
+
+foreach ($col in Write-Output 2 4 6 8 10 12 14) {
+    $sheet1.InsertColumn($col, 1)
+    $sheet1.Column($col).width = .75
+}
+
+Set-Format -Address $sheet1.Cells["E:E"] -Width 12
+Set-Format -Address $sheet1.Cells["I:I"] -Width 12
+
+$BorderBottom = "Thick"
+$BorderColor = "Black"
+
+Set-Format -Address $sheet1.Cells["A2"]    -BorderBottom $BorderBottom -BorderColor $BorderColor
+
+Set-Format -Address $sheet1.Cells["C2"]    -BorderBottom $BorderBottom -BorderColor $BorderColor
+Set-Format -Address $sheet1.Cells["E2:G2"] -BorderBottom $BorderBottom -BorderColor $BorderColor
+Set-Format -Address $sheet1.Cells["I2:K2"] -BorderBottom $BorderBottom -BorderColor $BorderColor
+Set-Format -Address $sheet1.Cells["M2:O2"] -BorderBottom $BorderBottom -BorderColor $BorderColor
+
+Set-Format -Address $sheet1.Cells["A2:C8"] -FontColor GrayText
+
+$HorizontalAlignment = "Center"
+Set-Format -Address $sheet1.Cells["F1"] -HorizontalAlignment $HorizontalAlignment -Bold -Value Revenue
+Set-Format -Address $sheet1.Cells["J1"] -HorizontalAlignment $HorizontalAlignment -Bold -Value Margin
+Set-Format -Address $sheet1.Cells["N1"] -HorizontalAlignment $HorizontalAlignment -Bold -Value Passenger
+
+Set-Format -Address $sheet1.Cells["E2"] -Value '($)'
+Set-Format -Address $sheet1.Cells["G2"] -Value '%'
+Set-Format -Address $sheet1.Cells["I2"] -Value '($)'
+Set-Format -Address $sheet1.Cells["K2"] -Value '%'
+
+Set-Format -Address $sheet1.Cells["C10"] -HorizontalAlignment Right -Bold -Value "Grand Total Calculation"
+Set-Format -Address $sheet1.Cells["E10"] -Formula "=Sum(E3:E8)" -Bold
+Set-Format -Address $sheet1.Cells["I10"] -Formula "=Sum(I3:I8)" -Bold
+Set-Format -Address $sheet1.Cells["M10"] -Formula "=Sum(M3:M8)" -Bold
+Set-Format -Address $sheet1.Cells["O10"] -Formula "=Sum(O3:O8)" -Bold
+
+Close-ExcelPackage $excel -Show

Examples/ExcelToSQLInsert/DemoSQLInsert.ps1

@@ -0,0 +1,6 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+ConvertFrom-ExcelToSQLInsert -TableName "Movies" -Path ".\Movies.xlsx" -ConvertEmptyStringsToNull
+''
+'# UseMSSQLSyntax'
+ConvertFrom-ExcelToSQLInsert -UseMSSQLSyntax -TableName "Movies" -Path ".\Movies.xlsx" -ConvertEmptyStringsToNull

Examples/Fibonacci/ShowFibonacci.ps1

@@ -1,15 +1,17 @@
 param ($fibonacciDigits=10)
 
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $file = "fib.xlsx"
-rm "fib.xlsx" -ErrorAction Ignore
+Remove-Item "fib.xlsx" -ErrorAction Ignore
 
 $(
     New-PSItem 0
     New-PSItem 1
-    
+
     (
         2..$fibonacciDigits |
-            ForEach {
+            ForEach-Object {
                 New-PSItem ('=a{0}+a{1}' -f ($_+1),$_)
             }
     )

Examples/FormatCellStyles/ApplyFormatInScriptBlock.ps1

@@ -1,12 +1,16 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$xlfile = "$env:temp\testFmt.xlsx"
+
 Get-Process |
-    Select-Object Company,Handles,PM, NPM| 
+    Select-Object Company,Handles,PM, NPM|
     Export-Excel $xlfile -Show  -AutoSize -CellStyleSB {
         param(
             $workSheet,
             $totalRows,
             $lastColumn
         )
-                
+
         Set-CellStyle $workSheet 1 $LastColumn Solid Cyan
 
         foreach($row in (2..$totalRows | Where-Object {$_ % 2 -eq 0})) {

Examples/FormatCellStyles/PassInScriptBlock.ps1

@@ -1,9 +1,14 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$xlfile = "$env:temp\testFmt.xlsx"
+Remove-Item $xlfile -ErrorAction Ignore
+
 $RandomStyle = {
     param(
         $workSheet,
         $totalRows,
         $lastColumn
-    )    
+    )
 
     2..$totalRows | ForEach-Object{
         Set-CellStyle $workSheet $_ $LastColumn Solid (Write-Output LightGreen Gray Red|Get-Random)
@@ -11,5 +16,5 @@ $RandomStyle = {
 }
 
 Get-Process |
-    Select-Object Company,Handles,PM, NPM| 
+    Select-Object Company,Handles,PM, NPM|
     Export-Excel $xlfile -Show  -AutoSize -CellStyleSB $RandomStyle

Examples/GenerateData/GenDataForCustomReport.ps1

@@ -0,0 +1,38 @@
+if(!(gcm ig -ErrorAction SilentlyContinue)) {
+
+    "Use ``Install-Module NameIT`` to get the needed module from the gallery to support running this script"
+
+    return
+} 
+
+$sign=@{sign=echo + -}
+$location=@{location=echo Atlanta Newark Washington Chicago Philadelphia Houston Phoneix}
+
+$(1..6 | Foreach-Object {
+    
+    $from=$to=""
+    while($from -eq $to) {
+        $from=ig "[location]" -CustomData $location
+        $to=ig "[location]" -CustomData $location
+    }    
+
+    [double]$a=ig "########"
+    [double]$b=ig ".####"
+    [double]$c=ig "#######"
+    [double]$d=ig "[sign].##" -CustomData $sign
+    [double]$e=ig "###" 
+    [double]$f=ig "[sign]##" -CustomData $sign
+
+    #"{0},{1},{2},{3},{4},{5},{6},{7}" -f $from, $to, $a, $b, $c, $d, $e, $f
+
+    [PSCustomObject][Ordered]@{
+        From=$from
+        To=$to
+        RDollars=$a
+        RPercent=$b
+        MDollars=$c
+        MPercent=$d
+        Revenue=$e
+        Margin=$f
+    }
+} | ConvertTo-Csv -NoTypeInformation)  -replace '"','' # | Export-Excel

Examples/HyperLinks/First10Races.csv

@@ -0,0 +1,101 @@
+Race,Date,FinishPosition,Driver,GridPosition,Team,Points
+Australian,25/03/2018,1,Sebastian Vettel,3,Ferrari,25
+Australian,25/03/2018,2,Lewis Hamilton,1,Mercedes,18
+Australian,25/03/2018,3,Kimi Räikkönen,2,Ferrari,15
+Australian,25/03/2018,4,Daniel Ricciardo,8,Red Bull Racing-TAG Heuer,12
+Australian,25/03/2018,5,Fernando Alonso,10,McLaren-Renault,10
+Australian,25/03/2018,6,Max Verstappen,4,Red Bull Racing-TAG Heuer,8
+Australian,25/03/2018,7,Nico Hülkenberg,7,Renault,6
+Australian,25/03/2018,8,Valtteri Bottas,15,Mercedes,4
+Australian,25/03/2018,9,Stoffel Vandoorne,11,McLaren-Renault,2
+Australian,25/03/2018,10,Carlos Sainz,9,Renault,1
+Bahrain,08/04/2018,1,Sebastian Vettel,1,Ferrari,25
+Bahrain,08/04/2018,2,Valtteri Bottas,3,Mercedes,18
+Bahrain,08/04/2018,3,Lewis Hamilton,9,Mercedes,15
+Bahrain,08/04/2018,4,Pierre Gasly,5,STR-Honda,12
+Bahrain,08/04/2018,5,Kevin Magnussen,6,Haas-Ferrari,10
+Bahrain,08/04/2018,6,Nico Hülkenberg,7,Renault,8
+Bahrain,08/04/2018,7,Fernando Alonso,13,McLaren-Renault,6
+Bahrain,08/04/2018,8,Stoffel Vandoorne,14,McLaren-Renault,4
+Bahrain,08/04/2018,9,Marcus Ericsson,17,Sauber-Ferrari,2
+Bahrain,08/04/2018,10,Esteban Ocon,8,Force India-Mercedes,1
+Chinese,15/04/2018,1,Daniel Ricciardo,6,Red Bull Racing-TAG Heuer,25
+Chinese,15/04/2018,2,Valtteri Bottas,3,Mercedes,18
+Chinese,15/04/2018,3,Kimi Räikkönen,2,Ferrari,15
+Chinese,15/04/2018,4,Lewis Hamilton,4,Mercedes,12
+Chinese,15/04/2018,5,Max Verstappen,5,Red Bull Racing-TAG Heuer,10
+Chinese,15/04/2018,6,Nico Hülkenberg,7,Renault,8
+Chinese,15/04/2018,7,Fernando Alonso,13,McLaren-Renault,6
+Chinese,15/04/2018,8,Sebastian Vettel,1,Ferrari,4
+Chinese,15/04/2018,9,Carlos Sainz,9,Renault,2
+Chinese,15/04/2018,10,Kevin Magnussen,11,Haas-Ferrari,1
+Azerbaijan,29/04/2018,1,Lewis Hamilton,2,Mercedes,25
+Azerbaijan,29/04/2018,2,Kimi Räikkönen,6,Ferrari,18
+Azerbaijan,29/04/2018,3,Sergio Pérez,8,Force India-Mercedes,15
+Azerbaijan,29/04/2018,4,Sebastian Vettel,1,Ferrari,12
+Azerbaijan,29/04/2018,5,Carlos Sainz,9,Renault,10
+Azerbaijan,29/04/2018,6,Charles Leclerc,13,Sauber-Ferrari,8
+Azerbaijan,29/04/2018,7,Fernando Alonso,12,McLaren-Renault,6
+Azerbaijan,29/04/2018,8,Lance Stroll,10,Williams-Mercedes,4
+Azerbaijan,29/04/2018,9,Stoffel Vandoorne,16,McLaren-Renault,2
+Azerbaijan,29/04/2018,10,Brendon Hartley,19,STR-Honda,1
+Spanish,13/05/2018,1,Lewis Hamilton,1,Mercedes,25
+Spanish,13/05/2018,2,Valtteri Bottas,2,Mercedes,18
+Spanish,13/05/2018,3,Max Verstappen,5,Red Bull Racing-TAG Heuer,15
+Spanish,13/05/2018,4,Sebastian Vettel,3,Ferrari,12
+Spanish,13/05/2018,5,Daniel Ricciardo,6,Red Bull Racing-TAG Heuer,10
+Spanish,13/05/2018,6,Kevin Magnussen,7,Haas-Ferrari,8
+Spanish,13/05/2018,7,Carlos Sainz,9,Renault,6
+Spanish,13/05/2018,8,Fernando Alonso,8,McLaren-Renault,4
+Spanish,13/05/2018,9,Sergio Pérez,15,Force India-Mercedes,2
+Spanish,13/05/2018,10,Charles Leclerc,14,Sauber-Ferrari,1
+Monaco,27/05/2018,1,Daniel Ricciardo,1,Red Bull Racing-TAG Heuer,25
+Monaco,27/05/2018,2,Sebastian Vettel,2,Ferrari,18
+Monaco,27/05/2018,3,Lewis Hamilton,3,Mercedes,15
+Monaco,27/05/2018,4,Kimi Räikkönen,4,Ferrari,12
+Monaco,27/05/2018,5,Valtteri Bottas,5,Mercedes,10
+Monaco,27/05/2018,6,Esteban Ocon,6,Force India-Mercedes,8
+Monaco,27/05/2018,7,Pierre Gasly,10,STR-Honda,6
+Monaco,27/05/2018,8,Nico Hülkenberg,11,Renault,4
+Monaco,27/05/2018,9,Max Verstappen,20,Red Bull Racing-TAG Heuer,2
+Monaco,27/05/2018,10,Carlos Sainz,8,Renault,1
+Canadian,10/06/2018,1,Sebastian Vettel,1,Ferrari,25
+Canadian,10/06/2018,2,Valtteri Bottas,2,Mercedes,18
+Canadian,10/06/2018,3,Max Verstappen,3,Red Bull Racing-TAG Heuer,15
+Canadian,10/06/2018,4,Daniel Ricciardo,6,Red Bull Racing-TAG Heuer,12
+Canadian,10/06/2018,5,Lewis Hamilton,4,Mercedes,10
+Canadian,10/06/2018,6,Kimi Räikkönen,5,Ferrari,8
+Canadian,10/06/2018,7,Nico Hülkenberg,7,Renault,6
+Canadian,10/06/2018,8,Carlos Sainz,9,Renault,4
+Canadian,10/06/2018,9,Esteban Ocon,8,Force India-Mercedes,2
+Canadian,10/06/2018,10,Charles Leclerc,13,Sauber-Ferrari,1
+French,24/06/2018,1,Lewis Hamilton,1,Mercedes,25
+French,24/06/2018,2,Max Verstappen,4,Red Bull Racing-TAG Heuer,18
+French,24/06/2018,3,Kimi Räikkönen,6,Ferrari,15
+French,24/06/2018,4,Daniel Ricciardo,5,Red Bull Racing-TAG Heuer,12
+French,24/06/2018,5,Sebastian Vettel,3,Ferrari,10
+French,24/06/2018,6,Kevin Magnussen,9,Haas-Ferrari,8
+French,24/06/2018,7,Valtteri Bottas,2,Mercedes,6
+French,24/06/2018,8,Carlos Sainz,7,Renault,4
+French,24/06/2018,9,Nico Hülkenberg,12,Renault,2
+French,24/06/2018,10,Charles Leclerc,8,Sauber-Ferrari,1
+Austrian,01/07/2018,1,Max Verstappen,4,Red Bull Racing-TAG Heuer,25
+Austrian,01/07/2018,2,Kimi Räikkönen,3,Ferrari,18
+Austrian,01/07/2018,3,Sebastian Vettel,6,Ferrari,15
+Austrian,01/07/2018,4,Romain Grosjean,5,Haas-Ferrari,12
+Austrian,01/07/2018,5,Kevin Magnussen,8,Haas-Ferrari,10
+Austrian,01/07/2018,6,Esteban Ocon,11,Force India-Mercedes,8
+Austrian,01/07/2018,7,Sergio Pérez,15,Force India-Mercedes,6
+Austrian,01/07/2018,8,Fernando Alonso,20,McLaren-Renault,4
+Austrian,01/07/2018,9,Charles Leclerc,17,Sauber-Ferrari,2
+Austrian,01/07/2018,10,Marcus Ericsson,18,Sauber-Ferrari,1
+British,08/07/2018,1,Sebastian Vettel,2,Ferrari,25
+British,08/07/2018,2,Lewis Hamilton,1,Mercedes,18
+British,08/07/2018,3,Kimi Räikkönen,3,Ferrari,15
+British,08/07/2018,4,Valtteri Bottas,4,Mercedes,12
+British,08/07/2018,5,Daniel Ricciardo,6,Red Bull Racing-TAG Heuer,10
+British,08/07/2018,6,Nico Hülkenberg,11,Renault,8
+British,08/07/2018,7,Esteban Ocon,10,Force India-Mercedes,6
+British,08/07/2018,8,Fernando Alonso,13,McLaren-Renault,4
+British,08/07/2018,9,Kevin Magnussen,7,Haas-Ferrari,2
+British,08/07/2018,10,Sergio Pérez,12,Force India-Mercedes,1

Examples/HyperLinks/Hyperlinks.ps1

@@ -1,7 +1,8 @@
-#$(
-#    New-PSItem 'Every Man a King' http://orisonswettmarden.wwwhubs.com/ccount/click.php?id=2
-#    New-PSItem 'Be Good to Yourself' http://orisonswettmarden.wwwhubs.com/ccount/click.php?id=3
-#    New-PSItem 'Character : The Grandest Thing in the World' http://orisonswettmarden.wwwhubs.com/ccount/click.php?id=4
-#    New-PSItem 'The Conquest of Worry' http://orisonswettmarden.wwwhubs.com/ccount/click.php?id=5
-#    New-PSItem 'Success Nuggets' http://orisonswettmarden.wwwhubs.com/ccount/click.php?id=6
-#) | Export-Excel hyperlinks.xlsx -Show -AutoSize
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+@"
+site,link
+google,http://www.google.com
+stackoverflow,http://stackoverflow.com
+microsoft,http://microsoft.com
+"@ | ConvertFrom-Csv | Export-Excel

Examples/HyperLinks/Races.ps1

@@ -0,0 +1,27 @@
+
+#First 10 races is a CSV file containing the top 10 finishers for the first 10 Formula one races of 2018. Read this file and group the results by race
+#We will create links to each race in the first 10 rows of the spreadSheet
+#The next row will be column labels
+#After that will come a block for each race.
+
+#Read the data, and decide how much space to leave for the hyperlinks
+$scriptPath = Split-Path -Path $MyInvocation.MyCommand.path -Parent
+$dataPath   = Join-Path  -Path $scriptPath -ChildPath "First10Races.csv"
+$results    = Import-Csv -Path $dataPath | Group-Object -Property RACE
+$topRow     = $lastDataRow = 1 + $results.Count
+
+#Export the first row of the first group (race) with headers.
+$path       = "$env:TEMP\Results.xlsx"
+Remove-Item -Path $path -ErrorAction SilentlyContinue
+$excel      = $results[0].Group[0] | Export-Excel -Path $path -StartRow $TopRow  -BoldTopRow -PassThru
+
+#export each group (race) below the last one, without headers, and create a range for each using the group (Race) name
+foreach ($r in $results) {
+    $excel        = $R.Group | Export-Excel -ExcelPackage $excel -NoHeader -StartRow ($lastDataRow +1) -RangeName $R.Name -PassThru -AutoSize
+    $lastDataRow += $R.Group.Count
+}
+
+#Create a hyperlink for each property with display text of "RaceNameGP" which links to the range created when the rows were exported a
+$results | ForEach-Object {(New-Object -TypeName OfficeOpenXml.ExcelHyperLink -ArgumentList "Sheet1!$($_.Name)" , "$($_.name) GP")} |
+            Export-Excel -ExcelPackage $excel -AutoSize  -Show
+

Examples/ImportHtml/DemoGraphics.ps1

@@ -1,2 +1,4 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 
 Import-Html "http://en.wikipedia.org/wiki/Demographics_of_India" 4

Examples/ImportHtml/PeriodicElements.ps1

@@ -1 +1,3 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 Import-Html "http://www.science.co.il/PTelements.asp" 1

Examples/ImportHtml/StarTrek.ps1

@@ -1 +1,3 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 Import-Html "https://en.wikipedia.org/wiki/List_of_Star_Trek:_The_Original_Series_episodes" 2

Examples/Index - Music.ps1

@@ -0,0 +1,41 @@
+#requires -modules "Get-IndexedItem"
+[cmdletbinding()]
+Param()
+Remove-Item ~\documents\music.xlsx -ErrorAction SilentlyContinue
+[System.Diagnostics.Stopwatch]$stopwatch = [System.Diagnostics.Stopwatch]::StartNew()
+
+#Query system index for .MP3 files in C:\Users, where album artist is non-blank. Leave sorted table with columns of interest in $Music.
+
+Get-IndexedItem "itemtype='.mp3'","AlbumArtist like '%'" -Recurse C:\Users -OutputVariable Music  `
+                     -OrderBy  AlbumArtist, AlbumTitle, TrackNumber, Title -NoFiles `
+                     -Property AlbumArtist, AlbumTitle, TrackNumber, Title, Duration, Size, SampleRate
+Write-Verbose -Message ("Fetched " + $music.Rows.Count + " rows from index: " + $stopwatch.Elapsed.TotalSeconds)
+#Send Table in $Music to Excel, format as a table, point $ws to the Worksheet
+$excel = Send-SQLDataToExcel -Path ~\documents\music.xlsx -DataTable $music -WorkSheetname Music -TableName Music -Passthru
+Write-Verbose -Message ("Inserted into Excel: " + $stopwatch.Elapsed.TotalSeconds)
+$ws    = $excel.Music
+
+#Strip "SYSTEM.", "SYSTEM.AUDIO", "SYSTEM.MEDIA", "SYSTEM.MUSIC" from the column headings
+#Convert Duration (column 5) from 100ns ticks to days and format as minutes, seconds, decimal
+#Format filesize and sample rate nicely
+#Autofit the columns.
+Set-ExcelRow    -Worksheet $ws -Row 1 -Value {($worksheet.cells[$row,$column].value -replace '^SYSTEM\.','') -replace '^MEDIA\.|^AUDIO\.|^MUSIC\.','' }
+Set-ExcelColumn -Worksheet $ws -Column 5 -NumberFormat 'mm:ss.0' -StartRow 2 -Value {$worksheet.cells[$row,$column].value / 864000000000 }
+Write-Verbose -Message ("Cells Reset: " + $stopwatch.Elapsed.TotalSeconds)
+Set-Column      -Worksheet $ws -Column 6 -NumberFormat '#.#,,"MB"'
+Set-ExcelColumn -Worksheet $ws -Column 7 -NumberFormat '0.0,"KHz"'
+$ws.Cells[$ws.Dimension].AutoFitColumns()
+
+#Make a Pivot table for sum of space and count of tracks by artist. Sort by artist, apply formatting to space, give it nice titles.
+$pt = Add-PivotTable -PassThru -PivotTableName SpaceUsedByMusic -ExcelPackage $excel -SourceWorkSheet $ws `
+                     -PivotRows ALBUMARTIST -PivotData ([ordered]@{"Size"="Sum"; "Duration"="Count"})  -PivotDataToColumn
+
+$pt.RowFields[0].Sort = [OfficeOpenXml.Table.PivotTable.eSortType]::Ascending
+$pt.DataFields[0].Format = '#.0,,"MB"'
+$pt.DataFields[0].Name   = 'Space Used'
+$pt.DataFields[1].Name   = 'Tracks'
+
+#Save the file, and load it into Excel
+$stopwatch.Stop()
+Write-Verbose -Message ("Pivot Done: " + $stopwatch.Elapsed.TotalSeconds)
+Close-ExcelPackage -show $excel

Examples/JoinWorksheet/EastSales.csv

@@ -0,0 +1,6 @@
+"Region","Item","UnitSold","UnitCost"
+"East","Banana","38","0.26"
+"East","Kale","71","0.69"
+"East","Apple","35","0.55"
+"East","Potato","48","0.48"
+"East","Kale","41","0.74"

Examples/JoinWorksheet/Join-Worksheet.sample.ps1

@@ -0,0 +1,43 @@
+#Get rid of pre-exisiting sheet
+$path = "$Env:TEMP\test.xlsx"
+remove-item -Path $path -ErrorAction SilentlyContinue
+
+#Create simple pages for 3 stores with product ID, Product Name, quanity price and total
+
+@"
+ID,Product,Quantity,Price,Total
+12001,Nails,37,3.99,147.63
+12002,Hammer,5,12.10,60.5
+12003,Saw,12,15.37,184.44
+12010,Drill,20,8,160
+12011,Crowbar,7,23.48,164.36
+"@ | ConvertFrom-Csv| Export-Excel -Path $path -WorkSheetname Oxford
+
+@"
+ID,Product,Quantity,Price,Total
+12001,Nails,53,3.99,211.47
+12002,Hammer,6,12.10,72.60
+12003,Saw,10,15.37,153.70
+12010,Drill,10,8,80
+12012,Pliers,2,14.99,29.98
+"@ | ConvertFrom-Csv| Export-Excel -Path $path -WorkSheetname Abingdon
+
+
+@"
+ID,Product,Quantity,Price,Total
+12001,Nails,20,3.99,79.80
+12002,Hammer,2,12.10,24.20
+12010,Drill,11,8,88
+12012,Pliers,3,14.99,44.97
+"@ | ConvertFrom-Csv| Export-Excel -Path $path -WorkSheetname Banbury
+
+#define a pivot table with a chart to show a sales by store, broken down by product
+$ptdef = New-PivotTableDefinition -PivotTableName "Summary" -PivotRows "Store" -PivotColumns "Product" -PivotData @{"Total"="SUM"} -IncludePivotChart -ChartTitle "Sales Breakdown" -ChartType ColumnStacked -ChartColumn 10
+
+#Join the 3 worksheets.
+#Name the combined page "Total" and Name the column with the sheet names "store" (as the sheets 'Oxford','Abingdon' and 'Banbury' are the names of the stores
+#Format the data as a table named "Summary", using the style "Light1", put the column headers in bold
+#Put in a title and freeze to top of the sheet including title and colmun headings
+#Add the Pivot table.
+#Show the result
+Join-Worksheet -Path $path -WorkSheetName "Total" -Clearsheet -FromLabel "Store" -TableName "Combined" -TableStyle Light1 -AutoSize -BoldTopRow -FreezePane 2,1 -Title "Store Sales Summary" -TitleBold -TitleSize 14  -PivotTableDefinition $ptdef -show

Examples/JoinWorksheet/Join-worksheet-blocks.sample.ps1

@@ -0,0 +1,13 @@
+
+$path = "$env:TEMP\Test.xlsx"
+Remove-item -Path $path -ErrorAction SilentlyContinue
+#Export disk volume, and Network adapter to their own sheets.
+Get-WmiObject -Class win32_logicaldisk |
+    Select-Object -Property DeviceId,VolumeName, Size,Freespace |
+        Export-Excel -Path $path -WorkSheetname Volumes -NumberFormat "0,000"
+Get-NetAdapter  |
+    Select-Object -Property Name,InterfaceDescription,MacAddress,LinkSpeed |
+        Export-Excel -Path $path -WorkSheetname NetAdapters
+
+#Create a summary page with a title of Summary, label the blocks with the name of the sheet they came from and hide the source sheets
+Join-Worksheet -Path $path -HideSource -WorkSheetName Summary -NoHeader -LabelBlocks  -AutoSize -Title "Summary" -TitleBold -TitleSize 22 -show

Examples/JoinWorksheet/JoinSalesData.ps1

@@ -0,0 +1,23 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$xlfile = "$env:temp\AllSales.xlsx"
+
+Remove-Item $xlfile -ErrorAction Ignore
+
+$params = @{
+    AutoSize             = $true
+    AutoFilter           = $true
+    AutoNameRange        = $true
+    ExcelChartDefinition = New-ExcelChartDefinition -XRange Item -YRange UnitSold -Title 'Units Sold'
+    Path                 = $xlfile
+}
+#Import 4 sets of sales data from 4 CSV files, using the parameters above.
+Import-Csv $PSScriptRoot\NorthSales.csv | Export-Excel -WorkSheetname North @params
+Import-Csv $PSScriptRoot\EastSales.csv  | Export-Excel -WorkSheetname East  @params
+Import-Csv $PSScriptRoot\SouthSales.csv | Export-Excel -WorkSheetname South @params
+Import-Csv $PSScriptRoot\WestSales.csv  | Export-Excel -WorkSheetname West  @params
+
+#Join the 4 worksheets together on a sheet named Allsales, use the same parameters, except for AutoNameRange and ExcelChartDefinition.
+$params.Remove("AutoNameRange")
+$params.Remove("ExcelChartDefinition")
+Join-Worksheet -WorkSheetName AllSales -Show @params

Examples/JoinWorksheet/NorthSales.csv

@@ -0,0 +1,5 @@
+"Region","Item","UnitSold","UnitCost"
+"North","Apple","40","0.68"
+"North","Kale","55","0.35"
+"North","Banana","33","0.31"
+"North","Pear","29","0.74"

Examples/JoinWorksheet/SouthSales.csv

@@ -0,0 +1,6 @@
+"Region","Item","UnitSold","UnitCost"
+"South","Banana","54","0.46"
+"South","Pear","39","0.44"
+"South","Potato","33","0.46"
+"South","Banana","49","0.31"
+"South","Apple","38","0.59"

Examples/JoinWorksheet/WestSales.csv

@@ -0,0 +1,12 @@
+"Region","Item","UnitSold","UnitCost"
+"West","Banana","74","0.56"
+"West","Apple","26","0.7"
+"West","Banana","59","0.49"
+"West","Potato","56","0.62"
+"West","Banana","60","0.64"
+"West","Pear","32","0.29"
+"West","Apple","73","0.26"
+"West","Banana","49","0.59"
+"West","Pear","65","0.35"
+"West","Apple","60","0.34"
+"West","Kale","67","0.38"

Examples/JustCharts/CentralLimitTheorem.ps1

@@ -1,9 +1,11 @@
-ColumnChart -Title "Central Limit Theorem" ($(
-    for ($i = 1; $i -le 500; $i++) { 
-        $s=0
-        for ($j = 1; $j -le 100; $j++){ 
-            $s+=Get-Random -Minimum 0 -Maximum 2
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+ColumnChart -Title "Central Limit Theorem" -NoLegend ($(
+        for ($i = 1; $i -le 500; $i++) {
+            $s = 0
+            for ($j = 1; $j -le 100; $j++) {
+                $s += Get-Random -Minimum 0 -Maximum 2
+            }
+            $s
         }
-        $s
-    }
-) | Sort | Group | select Count, Name)
+    ) | Sort-Object | Group-Object | Select-Object Count, Name)

Examples/JustCharts/PieChartHandles.ps1

@@ -2,5 +2,7 @@
 # Sum up handles by company
 # Show the Pie Chart
 
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 PieChart -Title "Total Handles by Company" `
-    (Invoke-Sum (Get-Process|Where company) company handles)
+    (Invoke-Sum (Get-Process | Where-Object company) company handles)

Examples/JustCharts/PieChartPM.ps1

@@ -2,6 +2,8 @@
 # Sum up PM by company
 # Show the Pie Chart
 
-PieChart -Title "Total PM by Company" `
-    (Invoke-Sum (Get-Process|Where company) company pm)
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+PieChart -Title "Total PM by Company" `
+    (Invoke-Sum (Get-Process|Where-Object company) company pm)
 

Examples/JustCharts/TryBarChart.ps1

@@ -1 +1,3 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 BarChart (.\TargetData.ps1) "A BarChart"

Examples/JustCharts/TryColumnChart.ps1

@@ -1 +1,3 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 ColumnChart (.\TargetData.ps1) "A ColumnChart"

Examples/JustCharts/TryPieChart.ps1

@@ -1 +1,3 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 PieChart (.\TargetData.ps1) "A PieChart"

Examples/MergeWorkSheet/MergeCSV.ps1

@@ -0,0 +1,19 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$xlFile = "$env:TEMP\mw.xlsx"
+
+Remove-Item $xlFile -ErrorAction Ignore
+
+$leftCsv = @"
+MyProp1,MyProp2,Length
+a,b,10
+c,d,20
+"@ | ConvertFrom-Csv
+
+$rightCsv = @"
+MyProp1,MyProp2,Length
+a,b,10
+c,d,21
+"@ | ConvertFrom-Csv
+
+Merge-Worksheet -OutputFile $xlFile -ReferenceObject $leftCsv -DifferenceObject $rightCsv -Key Length -Show

Examples/MergeWorkSheet/Merge_2_Servers_Services.ps1

@@ -0,0 +1,21 @@
+Remove-Item -Path  "$env:temp\server*.xlsx" , "$env:temp\Combined*.xlsx" -ErrorAction SilentlyContinue
+
+#Get a subset of services into $s and export them
+[System.Collections.ArrayList]$s = get-service | Select-Object -first 25 -Property *
+$s | Export-Excel -Path $env:temp\server1.xlsx
+
+#$s is a zero based array, excel rows are 1 based and excel has a header row so Excel rows will be 2 + index in $s.
+#Change a row. Add a row. Delete a row.  And export the changed $s to a second file.
+$s[2].DisplayName = "Changed from the orginal"   #This will be row 4 in Excel - this should be highlighted as a change
+
+$d = $s[-1] | Select-Object -Property *
+$d.DisplayName = "Dummy Service"
+$d.Name = "Dummy"
+$s.Insert(3,$d)                                 #This will be row 5 in Excel - this should be highlighted as a new item
+
+$s.RemoveAt(5)                                  #This will be row 7 in Excel - this should be highlighted as deleted item
+
+$s | Export-Excel -Path $env:temp\server2.xlsx
+
+#This use of Merge-worksheet Assumes a default worksheet name, (sheet1)  We will check and output Name (the key), DisplayName and StartType and ignore other properties.
+Merge-Worksheet -Referencefile "$env:temp\server1.xlsx" -Differencefile  "$env:temp\Server2.xlsx" -OutputFile  "$env:temp\combined1.xlsx"  -Property name,displayname,startType -Key name -Show

Examples/MergeWorkSheet/Merge_3_Servers_Services.ps1

@@ -0,0 +1,34 @@
+Remove-Item -Path  "$env:temp\server*.xlsx" , "$env:temp\Combined*.xlsx" -ErrorAction SilentlyContinue
+
+#Get a subset of services into $s and export them
+[System.Collections.ArrayList]$s = get-service | Select-Object -first 25 -Property Name,DisplayName,StartType
+$s | Export-Excel -Path $env:temp\server1.xlsx
+
+#$s is a zero based array, excel rows are 1 based and excel has a header row so Excel rows will be 2 + index in $s.
+#Change a row. Add a row. Delete a row.  And export the changed $s to a second file.
+$row4Displayname  = $s[2].DisplayName
+$s[2].DisplayName = "Changed from the orginal"    #This will be excel row 4 and Server 2 will show as changed.
+
+$d = $s[-1] | Select-Object -Property *
+$d.DisplayName = "Dummy Service"
+$d.Name = "Dummy"
+$s.Insert(3,$d)                                   #This will be Excel row 5 and server 2 will show as changed - so will Server 3
+
+$s.RemoveAt(5)                                    #This will be Excel row 7 and Server 2 will show as missing.
+
+$s | Export-Excel -Path $env:temp\server2.xlsx
+
+#Make some more changes to $s and export it to a third file
+$s[2].displayname = $row4Displayname             #Server 3 row 4 will match server 1 so won't be highlighted
+
+$d = $s[-1] | Select-Object -Property *
+$d.DisplayName = "Second Service"
+$d.Name = "Service2"
+$s.Insert(6,$d)                                  #This will be an extra row in Server 3 at row 8. It will show as missing in Server 2.
+$s.RemoveAt(8)                                   #This will show as missing in Server 3 at row 11 ()
+
+$s | Export-Excel -Path $env:temp\server3.xlsx
+
+#Now bring the three files together.
+
+Merge-MultipleSheets -Path "$env:temp\server1.xlsx", "$env:temp\Server2.xlsx","$env:temp\Server3.xlsx" -OutputFile "$env:temp\combined3.xlsx"  -Property name,displayname,startType -Key name  -Show

Examples/MoveSheets/MoveSheets.ps1

@@ -0,0 +1,9 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$xlfile = "$env:TEMP\testThis.xlsx"
+Remove-Item $xlfile -ErrorAction Ignore
+
+1..10  | Export-Excel $xlfile -WorkSheetname First                           #'First' will be the only sheet
+11..20 | Export-Excel $xlfile -WorkSheetname Second -MoveToStart             #'Second' is moved before first so the order is 'Second', 'First'
+21..30 | Export-Excel $xlfile -WorkSheetname Third  -MoveBefore First        #'Second' is moved before first so the order is 'Second', 'Third', 'First'
+31..40 | Export-Excel $xlfile -WorkSheetname Fourth -MoveAfter Third -Show   #'Fourth' is moved after third so the order is ' 'Second', 'Third', 'Fourth' First'

Examples/Nasa/FireBalls.ps1

@@ -1,3 +1,5 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $header = echo `
     'Date/Time - Peak Brightness (UT)' `
     'Latitude (Deg)' `
@@ -12,8 +14,8 @@ $header = echo `
 
 $splat=@{
     url='http://neo.jpl.nasa.gov/fireballs/'
-    index=5 
-    Header=$header     
+    index=5
+    Header=$header
     FirstDataRow=1
 }
 

Examples/NumberFormat/ColorizeNumbers.ps1

@@ -1,6 +1,8 @@
-$file = "disks.xlsx"
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-rm $file -ErrorAction Ignore
+$file = "$env:TEMP\disks.xlsx"
+
+Remove-Item $file -ErrorAction Ignore
 
 $data = $(
     New-PSItem 100 -100
@@ -9,5 +11,5 @@ $data = $(
     New-PSItem -3.2 -4.1
     New-PSItem -5.2 6.1
 )
-
+#Set the numbers throughout the sheet to format as positive in blue with a + sign, negative in Red with a - sign.
 $data | Export-Excel -Path $file -Show -AutoSize -NumberFormat "[Blue]+0.#0;[Red]-0.#0"

Examples/NumberFormat/CurrencyFormat.ps1

@@ -1,6 +1,8 @@
-$file = "disks.xlsx"
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-rm $file -ErrorAction Ignore
+$file = "$env:temp\disks.xlsx"
+
+Remove-Item $file -ErrorAction Ignore
 
 $data = $(
     New-PSItem 100 -100
@@ -10,6 +12,5 @@ $data = $(
     New-PSItem -5.2 6.1
     New-PSItem 1000 -2000
 )
-
-$data | Export-Excel -Path $file -Show -AutoSize -NumberFormat '[Blue]$#,##0.00;[Red]-$#,##0.00'
-
+#Number format can expand terms like Currency, to the local currency format
+$data | Export-Excel -Path $file -Show -AutoSize -NumberFormat 'Currency'

Examples/NumberFormat/PercentagFormat.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $file = "disks.xlsx"
 
-rm $file -ErrorAction Ignore
+Remove-Item $file -ErrorAction Ignore
 
 $data = $(
     New-PSItem 1

Examples/NumberFormat/PosNegNumbers.ps1

@@ -1,6 +1,8 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $file = "disks.xlsx"
 
-rm $file -ErrorAction Ignore
+Remove-Item $file -ErrorAction Ignore
 
 $data = $(
     New-PSItem 100 -100

Examples/NumberFormat/Win32LogicalDisk.ps1

@@ -1,7 +1,9 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $file = "disks.xlsx"
 
-rm $file -ErrorAction Ignore
+Remove-Item $file -ErrorAction Ignore
 
-Get-CimInstance win32_logicaldisk -filter "drivetype=3" | 
-    Select DeviceID,Volumename,Size,Freespace | 
+Get-CimInstance win32_logicaldisk -filter "drivetype=3" |
+    Select-Object DeviceID,Volumename,Size,Freespace |
     Export-Excel -Path $file -Show -AutoSize -NumberFormat "0"

Examples/NumberFormat/Win32LogicalDiskFormatted.ps1

@@ -1,7 +1,9 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $file = "disks.xlsx"
 
-rm $file -ErrorAction Ignore
+Remove-Item $file -ErrorAction Ignore
 
-Get-CimInstance win32_logicaldisk -filter "drivetype=3" | 
-    Select DeviceID,Volumename,Size,Freespace | 
+Get-CimInstance win32_logicaldisk -filter "drivetype=3" |
+    Select-Object DeviceID,Volumename,Size,Freespace |
     Export-Excel -Path $file -Show -AutoSize

Examples/PassThru/TryPassThru.ps1

@@ -1,23 +1,29 @@
-$file = "sales.xlsx"
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-rm $file -ErrorAction Ignore
+$file = "$env:Temp\sales.xlsx"
 
+Remove-Item $file -ErrorAction Ignore
+
+#Using -Passthru with Export-Excel returns an Excel Package object.
 $xlPkg = Import-Csv .\sales.csv | Export-Excel $file -PassThru
 
-$ws = $xlPkg.Workbook.WorkSheets[1]
+#We add script properties to the package so $xlPkg.Sheet1 is equivalent to $xlPkg.Workbook.WorkSheets["Sheet1"]
+$ws = $xlPkg.Sheet1
 
+#We can manipulate the cells ...
 $ws.Cells["E1"].Value = "TotalSold"
 $ws.Cells["F1"].Value = "Add 10%"
 
-2..($ws.Dimension.Rows) | 
-    ForEach {
+#This is for illustration - there are more efficient ways to do this.
+2..($ws.Dimension.Rows) |
+    ForEach-Object {
         $ws.Cells["E$_"].Formula = "=C$_+D$_"
         $ws.Cells["F$_"].Formula = "=E$_+(10%*(C$_+D$_))"
     }
 
 $ws.Cells.AutoFitColumns()
 
+#You can call close-ExcelPackage $xlPkg -show, but here we will do the ssteps explicitly
 $xlPkg.Save()
 $xlPkg.Dispose()
-
 Invoke-Item $file

Examples/PivotTable/PivotTableWithName.ps1

@@ -0,0 +1,25 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$ExcelParams = @{
+    Path              = "$env:TEMP\test1.xlsx"
+    IncludePivotTable = $true
+    PivotRows         = 'Company'
+    PivotTableName    = 'MyTable'
+    PivotData         = @{'Handles' = 'sum'}
+    Show              = $true
+    Activate          = $true
+}
+Remove-Item $ExcelParams.Path -ErrorAction Ignore
+Get-Process | Select-Object Company, Handles | Export-Excel @ExcelParams
+
+<#  Builds a pivot table that looks like this:
+
+    Sum of Handles
+    Row Labels	                 Total
+    Adobe Systems Incorporated	  3100
+    (blank)	                    214374
+    Apple Inc.	                   215
+    etc
+    etc
+    Grand Total	                365625
+#>

Examples/PivotTable/TableAndPivotTable.ps1

@@ -0,0 +1,26 @@
+$path = "$Env:TEMP\test.xlsx"
+remove-item -path $path -ErrorAction SilentlyContinue
+
+#Export some sales data to Excel, format it as a table and put a data-bar in.  For this example we won't create the pivot table during the export
+$excel =  ConvertFrom-Csv    @"
+Product, City, Gross, Net
+Apple, London , 300, 250
+Orange, London , 400, 350
+Banana, London , 300, 200
+Orange, Paris,   600, 500
+Banana, Paris,   300, 200
+Apple, New York, 1200,700
+"@  | Export-Excel -PassThru  -Path $path  -TableStyle Medium13 -tablename "RawData" -ConditionalFormat @{Range="C2:C7"; DataBarColor="Green"}
+
+#Add a pivot table, specify its address to put it on the same sheet, use the data that was just exported  set the table style and number format.
+#Use the "City" for the row names, and "Product" for the columnnames, and sum both the gross and net values for each City/Product combination; add grand totals to rows and columns.
+# activate the sheet and add a pivot chart (defined in a hash table)
+Add-PivotTable -Address $excel.Sheet1.Cells["F1"] -SourceWorkSheet $Excel.Sheet1 -SourceRange $Excel.Sheet1.Dimension.Address -PivotTableName "Sales" -PivotTableSyle "Medium12"  -PivotNumberFormat "$#,##0.00"   `
+                 -PivotRows "City" -PivotColumns "Product" -PivotData @{Gross="Sum";Net="Sum"}-PivotTotals "Both"  -Activate  -PivotChartDefinition @{
+                        Title="Gross and net by city and product";
+                        ChartType="ColumnClustered";
+                        Column=11; Width=500; Height=360;
+                        YMajorUnit=500; YMinorUnit=100; YAxisNumberformat="$#,##0"
+                        LegendPosition="Bottom"}
+#Save and open in excel
+Close-ExcelPackage $excel -Show

Examples/PivotTableFilters/testPivotFilter.ps1

@@ -0,0 +1,35 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$xlFile="$env:TEMP\testPivot.xlsx"
+Remove-Item $xlFile -ErrorAction Ignore
+
+$data =@"
+Region,Area,Product,Units,Cost
+North,A1,Apple,100,.5
+South,A2,Pear,120,1.5
+East,A3,Grape,140,2.5
+West,A4,Banana,160,3.5
+North,A1,Pear,120,1.5
+North,A1,Grape,140,2.5
+"@ | ConvertFrom-Csv
+
+$data |
+    Export-Excel $xlFile -Show `
+        -AutoSize -AutoFilter `
+        -IncludePivotTable `
+        -PivotRows Product `
+        -PivotData @{"Units"="sum"} -PivotFilter Region, Area -Activate
+
+<#
+Creates a Pivot table that looks like
+Region          All^
+Area            All^
+
+Sum of Units
+Row Labels	   Total
+Apple	         100
+Pear	         240
+Grape	         280
+Banana	         160
+Grand Total	     780
+#>

Examples/Plot/PlotCos.ps1

@@ -1,4 +1,6 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
 $plt = New-Plot
-$plt.Plot((Get-Range 0 5 .02|%{[math]::Cos(2*[math]::pi*$_)}))
+$plt.Plot((Get-Range 0 5 .02|Foreach-Object {[math]::Cos(2*[math]::pi*$_)}))
 $plt.SetChartSize(800,300)
 $plt.Show()

Examples/SQL+FillColumns+Pivot/Example.ps1

@@ -0,0 +1,88 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$sql           = @"
+  SELECT     rootfile.baseName     ,  rootfile.extension   , Image.fileWidth         AS width             ,  image.fileHeight AS height ,
+             metadata.dateDay      ,  metadata.dateMonth   , metadata.dateYear       ,  Image.captureTime AS dateTaken,
+             metadata.hasGPS       ,  metadata.GPSLatitude , metadata.GPSLongitude   ,
+             metadata.focalLength  ,  metadata.flashFired  , metadata.ISOSpeedRating AS ISOSpeed,
+             metadata.Aperture     AS apertureValue        , metadata.ShutterSpeed AS shutterSpeedValue,
+             Image.bitdepth        ,  image.colorLabels    ,
+             Camera.Value          AS cameraModel          , LensRef.value          AS lensModel
+      FROM   Adobe_images                  image
+      JOIN   AgLibraryFile              rootFile  ON   rootfile.id_local =      image.rootFile
+      JOIN   AgharvestedExifMetadata    metadata  ON      image.id_local =   metadata.image
+ LEFT JOIN   AgInternedExifLens          LensRef  ON    LensRef.id_Local =   metadata.lensRef
+ LEFT JOIN   AgInternedExifCameraModel    Camera  ON     Camera.id_local =  metadata.cameraModelRef
+"@
+
+#Sql Statement gets 20 columns of data from Adobe lightroom database
+#Define a pivot table and chart for total pictures with each lens.
+
+$pt = @{"LensPivot" = @{ "PivotTableName"    =   "LensPivot";
+                         "SourceWorkSheet"   =   "Sheet1" ;
+                         "PivotRows"         =   "LensModel" ;
+                         "PivotData"         = @{"basename" = "Count"}  ;
+                         "IncludePivotChart" =    $true ;
+                         "NoLegend"          =    $true ;
+                         "ShowPercent"       =    $true ;
+                         "ChartType"         =   "Pie"  ;
+                         "ChartTitle"        =   "Split by Lens" }
+}
+
+#we want to add 3 columns, translate Apperture value and Shutter speed value into familar f/ and seconds notation, and use these and ISO to calculate EV level
+$Avalue        = {"=IF(P$ROW>6.63,TEXT(ROUND(Sqrt(Power(2,O$ROW)),1),`"`"`"f/`"`"0.0`")," +
+                          "TEXT(ROUND(Sqrt(Power(2,O$ROW)),1),`"`"`"f/`"`"0.0`"))"}
+$Svalue        = {"=IF(P$ROW>2,TEXT(ROUND(POWER(2,P$ROW),0),`"`"`"1/`"`"0`"`"sec`"`"`"),"+
+                        "IF(P$ROW>3.32,TEXT(ROUND(1/POWER(2,P$ROW),2),`"0.0`"`"Sec`"`"`"),"+
+                            "TEXT(ROUND(1/POWER(2,P$ROW),2),`"0`"`"Sec`"`"`")))"}
+$evValue       = {"=ROUND(P$Row+O$Row-(LOG(N$Row/100,2)),0)" }
+
+#remove and recreate the file
+Remove-Item -Path "~\Documents\temp.xlsx" -ErrorAction SilentlyContinue
+
+#Open a connection to the ODBC source "LR" (which points to the SQLLite DB for Lightroom), run the SQL query, and drop into Excel - in sheet1, autosizing columns.
+$e = Send-SQLDataToExcel   -Path "~\Documents\temp.xlsx" -WorkSheetname "Sheet1" -Connection "DSN=LR" -SQL $sql -AutoSize -Passthru
+
+#Add columns, then format them and hide the ones which aren't of interest.
+Set-Column   -Worksheet    $e.workbook.Worksheets["sheet1"] -Column 21  -Value $Avalue  -Heading "Apperture"
+Set-Column   -Worksheet    $e.workbook.Worksheets["sheet1"] -Column 22  -Value $Svalue  -Heading "Shutter"
+Set-Column   -Worksheet    $e.workbook.Worksheets["sheet1"] -Column 23  -Value $Evvalue -Heading "Ev"
+Set-Format   -Address      $e.workbook.Worksheets["sheet1" ].Column(21) -HorizontalAlignment Left  -AutoFit
+Set-Format   -Address      $e.workbook.Worksheets["sheet1" ].Column(22) -HorizontalAlignment Right -AutoFit
+@(5,6,7,13,15,16,17,18) | ForEach-Object {
+  Set-Format -Address      $e.workbook.Worksheets["sheet1" ].Column($_) -Hidden
+}
+
+#Center the column labels.
+Set-Format   -Address      $e.workbook.Worksheets["sheet1" ].Row(1)     -HorizontalAlignment Center
+
+#Format the data as a nice Table, Create the pivot table & chart defined above, show the file in Excel in excel after saving.
+Export-Excel -ExcelPackage $e      -WorkSheetname "sheet1"  -TableName  "Table" -PivotTableDefinition $pt -Show
+
+############################################################
+
+Remove-Item  .\demo3.xlsx
+#Database query to get race wins, Poles and fastest lapes for the 25 best drivers; we already have a connection to the DB in $dbSessions
+$session =  $DbSessions["f1"]
+$SQL     =  @"
+    SELECT TOP 25 DriverName,
+                  Count(RaceDate)   AS Races,
+                  Count(Win)        AS Wins,
+                  Count(Pole)       AS Poles,
+                  Count(FastestLap) AS Fastlaps
+    FROM  Results
+    GROUP BY DriverName
+    ORDER BY (Count(win)) DESC
+"@
+
+#Run the query and put the results in workshet "Winners", autosize the columns and hold on to the ExcelPackage object
+$Excel   =  Send-SQLDataToExcel -SQL $sql -Session $session -path .\demo3.xlsx -WorkSheetname "Winners"   -AutoSize -Passthru
+#Create and format columns for the ratio of Wins to poles and fast laps.
+Set-Column   -ExcelPackage $Excel -WorkSheetname "Winners" -column 6  -Heading "WinsToPoles" -Value {"=D$row/C$row"}
+Set-Column   -ExcelPackage $Excel -WorkSheetname "Winners" -column 7  -Heading "WinsToFast"  -Value {"=E$row/C$row"}
+6..7 | ForEach-Object {
+    Set-Format -Address    $Excel.Workbook.Worksheets["Winners"].column($_) -NumberFormat "0.0%" -AutoFit }
+#Define a chart to show the relationship of lest on an XY Grid, create the ranges required in the, add the chart and show the file in Excel in excel after saving.
+$chart = New-ExcelChart -NoLegend -ChartType XYScatter -XRange WinsToFast -YRange WinsToPoles -ShowCategory -Column 7 -Width 2000 -Height 700
+Export-Excel -ExcelPackage $Excel -WorkSheetname "Winners" -AutoNameRange -ExcelChartDefinition $chart -Show
+

Examples/SQL+FillColumns+Pivot/Example2.ps1

@@ -0,0 +1,24 @@
+#requires -modules "getSql"
+
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+#download f1Results from https://1drv.ms/f/s!AhfYu7-CJv4egbt5FD7Cdxi8jSz3aQ  and update the path below
+Get-SQL -Session f1 -Excel  -Connection C:\Users\mcp\OneDrive\Public\F1\f1Results.xlsx -showtables -Verbose
+
+Remove-Item .\demo3.xlsx
+$session = $DbSessions["f1"]
+
+$SQL     =  "SELECT top 25 DriverName,  Count(RaceDate) as Races ,
+                    Count(Win) as Wins, Count(Pole) as Poles, Count(FastestLap) as Fastlaps
+             FROM Results GROUP BY DriverName
+             order by (count(win)) desc"
+$Excel   =  Send-SQLDataToExcel -SQL $sql -Session $session -path .\demo3.xlsx -WorkSheetname "Winners" -AutoSize -AutoNameRange -BoldTopRow -FreezeTopRow -Passthru
+
+$ws = $Excel.Workbook.Worksheets["Winners"]
+
+Set-Row    -Worksheet $ws -Heading "Average"     -Value {"=Average($columnName`2:$columnName$endrow)"}  -NumberFormat "0.0"  -Bold
+Set-Column -Worksheet $ws -Heading "WinsToPoles" -Value {"=D$row/C$row"}           -Column 6            -AutoSize -AutoNameRange
+Set-Column -Worksheet $ws -Heading "WinsToFast"  -Value {"=E$row/C$row"}           -Column 7            -AutoSize -AutoNameRange
+
+Set-Format -WorkSheet $ws -Range "F2:G50" -NumberFormat "0.0%"
+$chart = New-ExcelChart -NoLegend -ChartType XYScatter -XRange WinsToFast -YRange WinsToPoles -Column 7 -Width 2000 -Height 700 -Title "Poles vs fastlaps"
+Export-Excel -ExcelPackage $Excel -WorkSheetname "Winners" -ExcelChartDefinition $chart -Show

Examples/SetColumnBackgroundColor/SetColumnBackgroundColor.ps1

@@ -0,0 +1,13 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$path =  "$env:TEMP\testBackgroundColor.xlsx"
+
+$p = Get-Process | Select-Object Company, Handles | Export-Excel $path -ClearSheet  -PassThru
+
+$ws        = $p.Workbook.WorkSheets[1]
+$totalRows = $ws.Dimension.Rows
+
+#Set the range from B2 to the last active row. s
+Set-ExcelRange -Range $ws.Cells["B2:B$($totalRows)"] -BackgroundColor LightBlue
+
+Export-Excel -ExcelPackage $p -show -AutoSize

Examples/SpreadsheetCells/CalculatedFields.ps1

@@ -1,11 +1,14 @@
-. ..\New-PSItem.ps1
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-rm *.xlsx
+
+#. ..\New-PSItem.ps1
+
+Remove-Item "$env:temp\functions.xlsx" -ErrorAction SilentlyContinue
 
 $(
     New-PSItem 12001 Nails  37  3.99 =C2*D2 (echo ID Product Quantity Price Total)
     New-PSItem 12002 Hammer  5 12.10 =C3*D3
     New-PSItem 12003 Saw    12 15.37 =C4*D4
     New-PSItem 12010 Drill  20  8    =C5*D5
-    New-PSItem 12011 Crowbar 7 23.48 =C6*D6    
-) | Export-Excel functions.xlsx -AutoSize -Show
+    New-PSItem 12011 Crowbar 7 23.48 =C6*D6
+) | Export-Excel "$env:temp\functions.xlsx"-AutoSize -Show

Examples/SpreadsheetCells/ExcelFormulasUsingAddMember.ps1

@@ -0,0 +1,14 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+Remove-Item .\testFormula.xlsx -ErrorAction Ignore
+
+@"
+id,item,units,cost
+12001,Nails,37,3.99
+12002,Hammer,5,12.10
+12003,Saw,12,15.37
+12010,Drill,20,8
+12011,Crowbar,7,23.48
+"@ | ConvertFrom-Csv |
+    Add-Member -PassThru -MemberType NoteProperty -Name Total -Value "=units*cost" |
+    Export-Excel -Path .\testFormula.xlsx -Show -AutoSize -AutoNameRange

Examples/SpreadsheetCells/ExcelFunctions.ps1

@@ -1,12 +1,12 @@
-. ..\New-PSItem.ps1
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-rm *.xlsx
+Remove-Item "$env:temp\functions.xlsx" -ErrorAction SilentlyContinue
 
 $(
     New-PSItem =2%/12 60 500000 "=pmt(rate,nper,pv)" (echo rate nper pv pmt)
-    New-PSItem =3%/12 60 500000 "=pmt(rate,nper,pv)" 
-    New-PSItem =4%/12 60 500000 "=pmt(rate,nper,pv)" 
-    New-PSItem =5%/12 60 500000 "=pmt(rate,nper,pv)" 
-    New-PSItem =6%/12 60 500000 "=pmt(rate,nper,pv)" 
-    New-PSItem =7%/12 60 500000 "=pmt(rate,nper,pv)" 
-) | Export-Excel functions.xlsx -AutoNameRange -AutoSize -Show
+    New-PSItem =3%/12 60 500000 "=pmt(rate,nper,pv)"
+    New-PSItem =4%/12 60 500000 "=pmt(rate,nper,pv)"
+    New-PSItem =5%/12 60 500000 "=pmt(rate,nper,pv)"
+    New-PSItem =6%/12 60 500000 "=pmt(rate,nper,pv)"
+    New-PSItem =7%/12 60 500000 "=pmt(rate,nper,pv)"
+) | Export-Excel "$env:temp\functions.xlsx" -AutoNameRange -AutoSize -Show

Examples/SpreadsheetCells/HyperLink.ps1

@@ -1,8 +1,10 @@
-rm *.xlsx
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+Remove-Item "$env:temp\hyperlink.xlsx" -ErrorAction SilentlyContinue
 
 $(
     New-PSItem '=Hyperlink("http://dougfinke.com/blog","Doug Finke")' @("Link")
     New-PSItem '=Hyperlink("http://blogs.msdn.com/b/powershell/","PowerShell Blog")'
     New-PSItem '=Hyperlink("http://blogs.technet.com/b/heyscriptingguy/","Hey, Scripting Guy")'
-    
-) | Export-Excel hyperlink.xlsx -AutoSize -Show 
+
+) | Export-Excel "$env:temp\hyperlink.xlsx" -AutoSize -Show

Examples/Stocks/Get-StockInfo.ps1

@@ -1,3 +1,7 @@
+<#
+    Revisit I think yahoo deprecated their service
+#>
+
 function Get-StockInfo {
     param(
         $stock,
@@ -7,15 +11,15 @@ function Get-StockInfo {
 
     Process {
 
-    if(!$endDate) { $endDate = $startDate}
+        if (!$endDate) { $endDate = $startDate}
 
-    $baseUrl = "http://query.yahooapis.com/v1/public/yql?q="
-    $q = @"
+        $baseUrl = "http://query.yahooapis.com/v1/public/yql?q="
+        $q = @"
 select * from yahoo.finance.historicaldata where symbol = "$($stock)" and startDate = "$($startDate.ToString('yyyy-MM-dd'))" and endDate = "$($endDate.ToString('yyyy-MM-dd'))"
 "@
-    $suffix = "&env=store://datatables.org/alltableswithkeys&format=json"
-    $r=Invoke-RestMethod ($baseUrl + $q + $suffix)
-    $r.query.results.quote
+        $suffix = "&env=store://datatables.org/alltableswithkeys&format=json"
+        $r = Invoke-RestMethod ($baseUrl + $q + $suffix)
+        $r.query.results.quote
 
     }
 }

Examples/Stocks/GetMSFT.ps1

@@ -1,14 +1,20 @@
-$Symbol = "MSFT"
+<#
+    Revisit I think yahoo deprecated their service
+#>
 
-. .\Get-StockInfo.ps1
+# try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-rm *.xlsx
+# $Symbol = "MSFT"
 
-$chart = New-ExcelChart -XRange Date -YRange Volume `
-    -ChartType ColumnStacked `
-    -Column 9 -Title "$Symbol Volume"
+# . .\Get-StockInfo.ps1
 
-Get-StockInfo $Symbol 11/2 11/30 | 
-    Export-Excel .\stocks.xlsx -Show `
-    -AutoSize -AutoNameRange `
-    -ExcelChartDefinition $chart
+# Remove-Item *.xlsx -ErrorAction Ignore
+
+# $chart = New-ExcelChart -XRange Date -YRange Volume `
+#     -ChartType ColumnStacked `
+#     -Column 9 -Title "$Symbol Volume"
+
+# Get-StockInfo $Symbol 11/2 11/30 |
+#     Export-Excel .\stocks.xlsx -Show `
+#     -AutoSize -AutoNameRange `
+#     -ExcelChartDefinition $chart

Examples/Tables/MultipleTables.ps1

@@ -1,38 +1,43 @@
-$xlfile = "testData.xlsx"
-rm *.xlsx
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
 
-$r = dir C:\WINDOWS\system32 
+$xlfile = "$env:Temp\testData.xlsx"
+Remove-Item $xlfile -ErrorAction SilentlyContinue
+
+$r = Get-ChildItem C:\WINDOWS\system32
 
 $BySize=@{}
-$r | ForEach{ $BySize.($_.extension)+=$_.length }
+$r | ForEach-Object{ $BySize.($_.extension)+=$_.length }
 
-$top10BySize = $BySize.GetEnumerator() | 
-    ForEach{ [PSCustomObject]@{Name=$_.key;Size=[double]$_.value} } | 
-    Sort size -Descending | 
-    Select -First 10
+$top10BySize = $BySize.GetEnumerator() |
+    ForEach-Object{ [PSCustomObject]@{Name=$_.key;Size=[double]$_.value} } |
+    Sort-Object size -Descending |
+    Select-Object -First 10
 
-$top10ByCount = $r.extension | 
-    Group | 
-    Sort count -Descending | 
-    Select -First 10 Name, count
+$top10ByCount = $r.extension |
+    Group-Object |
+    Sort-Object count -Descending |
+    Select-Object -First 10 Name, count
 
-$top10ByFileSize = $r | 
-    Sort length -Descending | 
-    Select -First 10 Name, @{n="Size";e={$_.Length}} #,Extension,Path
+$top10ByFileSize = $r |
+    Sort-Object length -Descending |
+    Select-Object -First 10 Name, @{n="Size";e={$_.Length}} #,Extension,Path
 
 
-$top10BySize     | Export-Excel $xlfile -WorkSheetname FileInfo -TableName ExtSize
-$top10ByCount    | Export-Excel $xlfile -WorkSheetname FileInfo -StartRow 13 -TableName ExtCount
-$top10ByFileSize | Export-Excel $xlfile -WorkSheetname FileInfo -StartRow 25 -AutoSize -TableName FileSize
+$xlPkg = $top10BySize     | Export-Excel -path $xlfile        -WorkSheetname FileInfo              -TableName ExtSize  -PassThru
+$xlPkg = $top10ByCount    | Export-Excel -ExcelPackage $xlPkg -WorkSheetname FileInfo -StartRow 13 -TableName ExtCount -PassThru
+$xlPkg = $top10ByFileSize | Export-Excel -ExcelPackage $xlPkg -WorkSheetname FileInfo -StartRow 25 -TableName FileSize -PassThru -AutoSize
 
-$ps = ps | ? Company 
+#worksheets.tables["Name1","Name2"] returns 2 tables. Set-ExcelRange can process those and will set the number format over both
+Set-ExcelRange -Range $xlpkg.Workbook.Worksheets[1].Tables["ExtSize","FileSize"] -NumberFormat '0,,"MB"'
 
-$ps | 
-    sort handles -Descending | 
-    select -First 10 company, handles | 
-    Export-Excel $xlfile -WorkSheetname Handles -AutoSize -TableName Handles
+$ps = Get-Process | Where-Object Company
 
-$ps | 
-    sort PM -Descending | 
-    select -First 10 company, PM | 
+$ps |
+    Sort-Object handles -Descending |
+    Select-Object -First 10 company, handles |
+    Export-Excel -ExcelPackage $xlPkg -WorkSheetname Handles -AutoSize -TableName Handles
+
+$ps |
+    Sort-Object PM -Descending |
+    Select-Object -First 10 company, PM |
     Export-Excel $xlfile -WorkSheetname Handles -AutoSize -TableName PM -StartRow 13 -Show

Examples/TestRestAPI/RunAndShowUnitTests.ps1

@@ -0,0 +1,37 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+$xlfilename=".\test.xlsx"
+rm $xlfilename -ErrorAction Ignore
+
+$ConditionalText = @()
+$ConditionalText += New-ConditionalText -Range "C:C" -Text failed -BackgroundColor red   -ConditionalTextColor black
+$ConditionalText += New-ConditionalText -Range "C:C" -Text passed -BackgroundColor green -ConditionalTextColor black
+
+$r = .\TryIt.ps1
+
+$xlPkg = $(foreach($result in $r.TestResult) {
+
+    [PSCustomObject]@{
+        Name       = $result.Name
+        #Time       = $result.Time
+        Result     = $result.Result
+        Messge     = $result.FailureMessage
+        StackTrace = $result.StackTrace
+    }
+
+}) | Export-Excel -Path $xlfilename -AutoSize -ConditionalText $ConditionalText -PassThru
+
+$sheet1 = $xlPkg.Workbook.Worksheets["sheet1"]
+
+$sheet1.View.ShowGridLines = $false
+$sheet1.View.ShowHeaders = $false
+
+Set-Format -Address $sheet1.Cells["A:A"] -AutoSize
+Set-Format -Address $sheet1.Cells["B:D"] -WrapText
+
+$sheet1.InsertColumn(1, 1)
+Set-Format -Address $sheet1.Cells["A:A"] -Width 5
+
+Set-Format -Address $sheet1.Cells["B1:E1"] -HorizontalAlignment Center -BorderBottom Thick -BorderColor Cyan
+
+Close-ExcelPackage $xlPkg -Show

Examples/TestRestAPI/ShowPesterResults.ps1

@@ -0,0 +1,40 @@
+function Show-PesterResults {
+    $xlfilename=".\test.xlsx"
+    rm $xlfilename -ErrorAction Ignore
+
+    $ConditionalText = @()
+    $ConditionalText += New-ConditionalText -Range "Result" -Text failed  -BackgroundColor red   -ConditionalTextColor black
+    $ConditionalText += New-ConditionalText -Range "Result" -Text passed  -BackgroundColor green -ConditionalTextColor black
+    $ConditionalText += New-ConditionalText -Range "Result" -Text pending -BackgroundColor gray  -ConditionalTextColor black
+    
+    $xlParams = @{
+        Path=$xlfilename
+        WorkSheetname = 'PesterTests'
+        ConditionalText=$ConditionalText 
+        PivotRows = 'Description'
+        PivotColumns = 'Result'
+        PivotData = @{'Result'='Count'} 
+        IncludePivotTable  = $true 
+        #IncludePivotChart = $true 
+        #NoLegend = $true 
+        #ShowPercent = $true 
+        #ShowCategory = $true 
+        AutoSize = $true 
+        AutoNameRange = $true
+        AutoFilter = $true
+        Show  = $true
+    }
+
+    $(foreach($result in (Invoke-Pester -PassThru -Show None).TestResult) {
+
+        [PSCustomObject]@{
+            Description = $result.Describe
+            Name        = $result.Name
+            #Time       = $result.Time
+            Result      = $result.Result
+            Messge      = $result.FailureMessage
+            StackTrace  = $result.StackTrace
+        }
+
+    }) | Sort Description | Export-Excel @xlParams 
+}

Examples/TestRestAPI/TestAPIReadXls.ps1

@@ -0,0 +1,49 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+function Test-APIReadXls {
+    param(
+        [parameter(Mandatory)]
+        $XlFilename,
+        $WorksheetName = 'Sheet1'
+    )
+
+    $records = Import-Excel $XlFilename
+
+    $params = @{}
+
+    $blocks = $(foreach ($record in $records) {
+            foreach ($propertyName in $record.psobject.properties.name) {
+                if ($propertyName -notmatch 'ExpectedResult|QueryString') {
+                    $params.$propertyName = $record.$propertyName
+                }
+            }
+
+            if ($record.QueryString) {
+                $params.Uri += "?{0}" -f $record.QueryString
+            }
+
+            @"
+
+    it "Should have the expected result '$($record.ExpectedResult)'" {
+        `$target = '$($params | ConvertTo-Json -compress)' | ConvertFrom-Json
+
+        `$target.psobject.Properties.name | ForEach-Object {`$p=@{}} {`$p.`$_=`$(`$target.`$_)}
+
+        Invoke-RestMethod @p | Should Be '$($record.ExpectedResult)'
+    }
+
+"@
+        })
+
+    $testFileName = "{0}.tests.ps1" -f (get-date).ToString("yyyyMMddHHmmss.fff")
+
+    @"
+Describe "Tests from $($XlFilename) in $($WorksheetName)" {
+$($blocks)
+}
+"@ | Set-Content -Encoding Ascii $testFileName
+
+    #Invoke-Pester -Script (Get-ChildItem $testFileName)
+    Get-ChildItem $testFileName
+}
+

Examples/TestRestAPI/TryIt.ps1

@@ -0,0 +1,7 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+. $PSScriptRoot\TestAPIReadXls.ps1
+
+Test-APIReadXls $PSScriptRoot\testlist.xlsx | Foreach-Object {
+    Invoke-Pester -Script $_.fullname  -PassThru -Show None
+}

Examples/TryMultiplePivotTables.ps1

@@ -0,0 +1,30 @@
+# To ship, is to choose 
+
+#ipmo .\ImportExcel.psd1 -Force
+
+$pt=[ordered]@{}
+
+$pt.ServiceInfo=@{    
+    SourceWorkSheet='Services'
+    PivotRows = "Status"    
+    PivotData= @{'Status'='count'}
+    IncludePivotChart=$true
+    ChartType='BarClustered3D'
+}
+
+$pt.ProcessInfo=@{
+    SourceWorkSheet='Processes'
+    PivotRows = "Company"    
+    PivotData= @{'Company'='count'}
+    IncludePivotChart=$true
+    ChartType='PieExploded3D'
+}
+
+$gsv=Get-Service | Select-Object status, Name, displayName, starttype
+$ps=Get-Process | Select-Object Name,Company, Handles
+
+$file = "c:\temp\testPT.xlsx"
+rm $file -ErrorAction Ignore
+
+$gsv| Export-Excel -Path $file -AutoSize -WorkSheetname Services
+$ps | Export-Excel -Path $file -AutoSize -WorkSheetname Processes -PivotTableDefinition $pt -Show 

Examples/TryMultiplePivotTablesFromOneSheet.ps1

@@ -0,0 +1,26 @@
+Import-Module ..\ImportExcel.psd1 -Force
+
+$file = "C:\Temp\test.xlsx"
+
+Remove-Item $file -ErrorAction Ignore -Force
+
+$base = @{
+    SourceWorkSheet   = 'gsv'
+    PivotData         = @{'Status' = 'count'}
+    IncludePivotChart = $true
+    # ChartType         = 'BarClustered3D'
+}
+
+$ptd = [ordered]@{}
+
+# $ptd.gpt1 = $base + @{ PivotRows = "ServiceType" }
+# $ptd.gpt2 = $base + @{ PivotRows = "Status" }
+# $ptd.gpt3 = $base + @{ PivotRows = "StartType" }
+# $ptd.gpt4 = $base + @{ PivotRows = "CanStop" }
+
+$ptd += New-PivotTableDefinition @base servicetype -PivotRows servicetype -ChartType Area3D
+$ptd += New-PivotTableDefinition @base status -PivotRows status -ChartType PieExploded3D
+$ptd += New-PivotTableDefinition @base starttype -PivotRows starttype -ChartType BarClustered3D
+$ptd += New-PivotTableDefinition @base canstop -PivotRows canstop -ChartType ConeColStacked
+
+Get-Service | Export-Excel -path $file -WorkSheetname gsv -Show -PivotTableDefinition $ptd

Examples/XlRangeToImage/XlRangeToImage.ps1

@@ -0,0 +1,24 @@
+try {. $PSScriptRoot\..\..\LoadPSD1.ps1} catch {}
+
+
+. .\ConvertExcelToImageFile.ps1
+
+$xlFileName = "C:\Temp\testPNG.xlsx"
+
+Remove-Item C:\Temp\testPNG.xlsx -ErrorAction Ignore
+
+$range = @"
+Region,Item,Cost
+North,Pear,1
+South,Apple,2
+East,Grapes,3
+West,Berry,4
+North,Pear,1
+South,Apple,2
+East,Grapes,3
+West,Berry,4
+"@ | ConvertFrom-Csv |
+    Export-Excel $xlFileName -ReturnRange `
+        -ConditionalText (New-ConditionalText Apple), (New-ConditionalText Berry -ConditionalTextColor White -BackgroundColor Purple)
+
+Convert-XlRangeToImage -Path $xlFileName -workSheetname sheet1 -range $range -Show