Importing several CSV files into Excel

Question

Hello Everyone,
I managed to piece together this code which runs several powershell scripts that each output a CSV for every day of the week.
Next, I located a function that takes a CSV file as input and exports that as a worksheet in an Excel document.
My problem is, the last column in the Excel file should be the first column and I just cannot spot why this behavior is occuring.
#First phase, output CSV files used later in the script.
Monday.ps1
Tuesday.ps1
Wednesday.ps1
Thursday.ps1
Friday.ps1
Saturday.ps1
Sunday.ps1
#Now the function to export the CSV from Phase 1 into an Excel Spreadsheet.
function Export-Excel {
[cmdletBinding()]
Param([Parameter(ValueFromPipeline=$true)][string]$junk)
begin{
$header=$null
$row=1
process{
if(!$header){
$i=0
$header=$_ | Get-Member -MemberType NoteProperty | select name
$header | %{$Global:ws.cells.item(1,++$i)=$_.Name}
$i=0
++$row
foreach($field in $header){
$Global:ws.cells.item($row,++$i)=$($_."$($field.Name)")
$xl=New-Object -ComObject Excel.Application
$wb=$xl.WorkBooks.add(1)
$Global:ws=$wb.WorkSheets.item(1)
$Global:ws.Name='Sunday'
import-csv 'C:\Sunday.csv' | Export-Excel
$Global:ws=$wb.WorkSheets.Add()
$Global:ws.Name='Saturday'
import-csv 'C:\Saturday.csv' | Export-Excel
$Global:ws=$wb.WorkSheets.Add()
$Global:ws.Name='Friday'
import-csv 'C:\Friday.csv' | Export-Excel
$Global:ws=$wb.WorkSheets.Add()
$Global:ws.Name='Thursday'
import-csv 'C:\Thursday.csv' | Export-Excel
$Global:ws=$wb.WorkSheets.Add()
$Global:ws.Name='Wednesday'
import-csv 'C:\Wednesday.csv' | Export-Excel
$Global:ws=$wb.WorkSheets.Add()
$Global:ws.Name='Tuesday'
import-csv 'C:\Tuesday.csv' | Export-Excel
$Global:ws=$wb.WorkSheets.Add()
$Global:ws.Name='Monday'
import-csv 'C:\Monday.csv' | Export-Excel
$xl.Visible=$true

Answer 1

That is interesting considering this script I found on Hey Scripting Guy.
http://blogs.technet.com/b/heyscriptingguy/archive/2010/09/09/copy-csv-columns-to-an-excel-spreadsheet-by-using-powershell.aspx
I have run your version above and have no issues with order. 
I still recommend using WorkBook.OpenText($csvfile)
and
$wb.Sheets($csvfile).Move($wb2.Sheet(1))
This is much faster and takes much less code.
¯\_(ツ)_/¯
Could you give a terse example?  I'm trying to put something together but am not having much success.
$sheets = @(LS D:\Scripts\work | select FullName -ExpandProperty FullName)
$Excel = New-Object -ComObject excel.application
$Excel.visible = $false
$file = $Excel.Workbooks.Open("C:\tmp\mytest.xlsx")
#$wb2 = $file.Sheets
for ($i=0; $i -lt $sheets.length; $i++)
$workbook = $Excel.WorkBooks.OpenText($sheets[$i])
$workbook.Sheets($sheets[$i]).Move($file.Sheet(1))
$Excel.visible = $true