# Visual basic 2013 excell to csv

Hello Experts,
I've got a Little more tan one hundred excell workbooks, each with around fifty worksheets,
I need to store each sheet as a csv to be uploadad by our App

how can I open an existing excell workbook and save all if its worksheets in csv format ?

REgards,
###### Who is Participating?

x
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

"Batchelor", Developer and EE Topic AdvisorCommented:
There are many ways to do that. As I assume adding VBA code to each workbook is no option, you'll best use a "master" Excel file containing the code. Or VB Script, or PowerShell.
How are you getting the list of workbooks to process? All workbooks sitting in a specific folder, for example?
Project ManagerAuthor Commented:
Qlemo, yes all workbooks in same folder.
"Batchelor", Developer and EE Topic AdvisorCommented:
This PowerShell script will assume the workbooks are located in C:\Temp\EE\WorkBooks, and the results should also be stored there as «WorkbooName»-«SheetName».csv
$excel = New-Object -ComObject excel.application$excel.Visible = $false foreach ($wbFile in get-childitem 'C:\temp\ee\workBooks\*.xls*') {
$wbs =$excel.Workbooks.Open($wbFile.FullName) foreach ($ws in $wbs.WorkSheets) {$ws.SaveAs($wbFile.Directoryname + '\' +$wbFile.BaseName + '-' + $ws.Name + ".csv", 23) }$wbs.Close(0)
}
\$excel.Quit()


Experts Exchange Solution brought to you by