Export multiple sheets into one csv file excel vba

Question

I have excel workbook with 10 sheets , I want to export range "B17:H28" from each sheet into one csv file not multiple csv files .I have code which exports each sheet with range into multiple csv files.

For Each sh In ActiveWorkbook.Sheets
Set rngtemp = Sheet.Range("B17:H28")
rngtemp.Copy
csvfilenametemp= ....
Set wbtemp = Application.Workbooks.Add(1)
With wbtemp
.Sheets(1).Range("A1").PasteSpecial xlPasteValues
.SaveAs Filename:=csvfilenametemp, FileFormat:=xlCSV, CreateBackup:=False
.Close
End With

Copy all of the ranges into *one* sheet in a new workbook and then save as CSV. — BigBen, Jul 01 '21 at 14:47
BigBen can you give me an example how to update to the last row so I wont repaste existing rows — kaustubh k, Jul 01 '21 at 14:48
https://stackoverflow.com/questions/11169445/error-in-finding-last-used-cell-in-excel-with-vba — BigBen, Jul 01 '21 at 14:48

score 0 · Answer 1 · edited Sep 11 '21 at 19:28

0

You can combine multiple csv files into one file by

opening command prompt
Go to where your file is stored using cd "C/..."
Type copy *.csv to output.csv
Press run and check your directory

edited Sep 11 '21 at 19:28

Nigel Savage

991
13
26

answered Sep 10 '21 at 11:59

Inaam Muaz

1
2

Export multiple sheets into one csv file excel vba

1 Answers1