![]() |
Using Mutiple Sheets in excel in shell script
Hi,
I'm trying to export some data into .csv format from a shell script. I need to export data into deifferent sheets based on the criteria. Any help on how to do this will eb greatly appreciated Thanks, Phani |
Using Mutiple Sheets in excel in shell script
Sub WriteCSV()
Const ForReading = 1, ForWriting = 2, ForAppending = 3 Const MyPath = "C:\temp\" Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0 Set fswrite = CreateObject("Scripting.FileSystemObject") WriteFileName = "text.csv" 'open files WritePathName = MyPath + WriteFileName fswrite.CreateTextFile WritePathName Set fwrite = fswrite.GetFile(WritePathName) Set tswrite = fwrite.OpenAsTextStream(ForWriting, TristateUseDefault) LastRow = Cells(Rows.Count, "A").End(xlUp).Row LastCol = Cells(1, Columns.Count).End(xlToLeft).Column For RowCount = 1 To LastRow OutputLine = "" For ColumnCount = 1 To LastCol If Len(OutputLine) 0 Then OutputLine = OutputLine & "," OutputLine = OutputLine & CStr(Cells(RowCount, ColumnCount)) Next ColumnCount tswrite.WriteLine OutputLine Next RowCount tswrite.Close End Sub "Phanidhar" wrote: Hi, I'm trying to export some data into .csv format from a shell script. I need to export data into deifferent sheets based on the criteria. Any help on how to do this will eb greatly appreciated Thanks, Phani |
Using Mutiple Sheets in excel in shell script
Thanks Joel for your response. But I'm looking for a solution that can be
done from a unix shell script. "Joel" wrote: Sub WriteCSV() Const ForReading = 1, ForWriting = 2, ForAppending = 3 Const MyPath = "C:\temp\" Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0 Set fswrite = CreateObject("Scripting.FileSystemObject") WriteFileName = "text.csv" 'open files WritePathName = MyPath + WriteFileName fswrite.CreateTextFile WritePathName Set fwrite = fswrite.GetFile(WritePathName) Set tswrite = fwrite.OpenAsTextStream(ForWriting, TristateUseDefault) LastRow = Cells(Rows.Count, "A").End(xlUp).Row LastCol = Cells(1, Columns.Count).End(xlToLeft).Column For RowCount = 1 To LastRow OutputLine = "" For ColumnCount = 1 To LastCol If Len(OutputLine) 0 Then OutputLine = OutputLine & "," OutputLine = OutputLine & CStr(Cells(RowCount, ColumnCount)) Next ColumnCount tswrite.WriteLine OutputLine Next RowCount tswrite.Close End Sub "Phanidhar" wrote: Hi, I'm trying to export some data into .csv format from a shell script. I need to export data into deifferent sheets based on the criteria. Any help on how to do this will eb greatly appreciated Thanks, Phani |
Using Mutiple Sheets in excel in shell script
This is a Excel discussion group mainly for Windows environment. I don't
know whatt tool un have on your machine. the program is a piece of cake to write in C Language and hardewr in a shell script. I don't havve access to a unix machine and my shell programming is a little rusty. The code below can be compiled on any basic compiler and run on unix if you have a compiler. the patth names will have to change to be compattiabble with unix. "Phanidhar" wrote: Thanks Joel for your response. But I'm looking for a solution that can be done from a unix shell script. "Joel" wrote: Sub WriteCSV() Const ForReading = 1, ForWriting = 2, ForAppending = 3 Const MyPath = "C:\temp\" Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0 Set fswrite = CreateObject("Scripting.FileSystemObject") WriteFileName = "text.csv" 'open files WritePathName = MyPath + WriteFileName fswrite.CreateTextFile WritePathName Set fwrite = fswrite.GetFile(WritePathName) Set tswrite = fwrite.OpenAsTextStream(ForWriting, TristateUseDefault) LastRow = Cells(Rows.Count, "A").End(xlUp).Row LastCol = Cells(1, Columns.Count).End(xlToLeft).Column For RowCount = 1 To LastRow OutputLine = "" For ColumnCount = 1 To LastCol If Len(OutputLine) 0 Then OutputLine = OutputLine & "," OutputLine = OutputLine & CStr(Cells(RowCount, ColumnCount)) Next ColumnCount tswrite.WriteLine OutputLine Next RowCount tswrite.Close End Sub "Phanidhar" wrote: Hi, I'm trying to export some data into .csv format from a shell script. I need to export data into deifferent sheets based on the criteria. Any help on how to do this will eb greatly appreciated Thanks, Phani |
Using Mutiple Sheets in excel in shell script
Yeah,
You need to say something about the type of shell script you want to use and what operating system you're using. You could use VBScript, Perl, Perl/AppleScript (say on the Mac). No one has time to create all possible solutions for you, all of which you'd probably ignore anyway. Try Again. |
Using Mutiple Sheets in excel in shell script
Are you on a Mac?
Do can you add Perl Modules to your machine? |
All times are GMT +1. The time now is 01:30 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com