GeneralHelperModule

1.2.2

Functions/Export-WorkSheetToCSV.ps1

                                Function Export-WorkSheetToCSV ($Path,$ExcelFileName,$CSVLoc)

{

    #Must exist if run non-interactively:

    #mkdir C:\Windows\SysWOW64\config\systemprofile\Desktop

    #mkdir C:\Windows\System32\config\systemprofile\Desktop

    $ExcelFile = Join-Path -Path $Path -ChildPath $ExcelFileName

    $E = New-Object -ComObject Excel.Application

    $E.Visible = $false

    $E.DisplayAlerts = $false

    $WB = $E.Workbooks.Open($ExcelFile)

    ForEach ($WS in $WB.Worksheets)

    {

        $N = $ExcelFileName + "_" + $WS.Name

        $WS.SaveAs($csvLoc + $N + ".csv", 6)

    }

    $E.Quit()

}