sql - How to convert multiple rows (in excel) in single sheet into multiple CSV file -


i want convert multiple rows(according group) multiple csv. single sheet in excel contain 3000 rows , 5 columns. want each group excel sheet converts csv file.

for example

1 ali khan ali.khan@hotmail.com a1

2 juliet ibm juliet.ibm@hotmail.com a1

3 laura ann lura.ann@hotmail.com b1

4 abcd ewqa abcd.ewqa@hotmail.com b1

5 annia franics annia.franics@hotmail.com c1

now want extract these rows separate csv based on group (a1,b1,c1...). each group creates new csv.

just need solution this. doesn't matter if suggest free tool or code.

using code copy , paste in sheet , create csv files.

dim rowst integer dim rowls integer dim strii string dim stril string  rowst = 4 rowls = 4 strii = range("f" & rowls).value stril = range("f" & rowls).value while range("f" & rowls).value <> ""     stril = range("f" & rowls).value     if stril <> strii         range("b" & rowst & ":f" & rowls - 1).copy         sheets("sheet2").select         range("a1").select         activesheet.paste         selection.clear         sheets("sheet1").select         activeworkbook.saveas filename:="e:\0\a\" & strii & ".csv", fileformat:=xlcsvmsdos, createbackup:=false         strii = stril         rowst = rowls     end if     rowls = rowls + 1 wend range("b" & rowst & ":f" & rowls - 1).copy sheets("sheet2").select range("a1").select activesheet.paste selection.clear sheets("sheet1").select activeworkbook.saveas filename:="e:\0\a\" & strii & ".csv", fileformat:=xlcsvmsdos, createbackup:=false range("a1").select 

Comments

Popular posts from this blog

windows - Single EXE to Install Python Standalone Executable for Easy Distribution -

c# - Access objects in UserControl from MainWindow in WPF -

javascript - How to name a jQuery function to make a browser's back button work? -