directory renames

Public/Set-CellStyle.ps1

@@ -0,0 +1,17 @@
+[Diagnostics.CodeAnalysis.SuppressMessageAttribute('PSUseShouldProcessForStateChangingFunctions', '', Scope='Function', Target='Set*', Justification='Does not change system state')]
+param()
+
+function Set-CellStyle {
+    [CmdletBinding()]
+    param(
+        $Worksheet,
+        $Row,
+        $LastColumn,
+        [OfficeOpenXml.Style.ExcelFillStyle]$Pattern,
+        $Color
+    )
+    if ($Color -is [string])         {$Color = [System.Drawing.Color]::$Color }
+    $t=$Worksheet.Cells["A$($Row):$($LastColumn)$($Row)"]
+    $t.Style.Fill.PatternType=$Pattern
+    $t.Style.Fill.BackgroundColor.SetColor($Color)
+}