Merge a range from all workbooks in a folder with AutoFilter(RDB)
 

I am using the following macro from Ron de Bruin :
Merge a range from all workbooks in a folder with AutoFilter

I need to change the code to add sheets to the existing active workbook
instead of add a new workbook with a new sheet.
How do I amend the following lines

Add a new workbook with one sheet
Set BaseWks = Workbooks.Add(xlWBATWorksheet).Worksheets(1)


Thanks, xlsops

Merge a range from all workbooks in a folder with AutoFilter(RDB)
 

Hi

This is the link to the code
http://www.rondebruin.nl/copy3.htm

You can change it to

Set BaseWks = ActiveSheet

If you want the data on the activesheet

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"franciz" wrote in message ...
I am using the following macro from Ron de Bruin :
Merge a range from all workbooks in a folder with AutoFilter

I need to change the code to add sheets to the existing active workbook
instead of add a new workbook with a new sheet.
How do I amend the following lines

Add a new workbook with one sheet
Set BaseWks = Workbooks.Add(xlWBATWorksheet).Worksheets(1)


Thanks, xlsops

Merge a range from all workbooks in a folder with AutoFilter(R
 

Hi Ron

Thanks. I am using the codes provided at the link. I am trying to change it
to my suituation.

will post back if I encounter any issue

regards,xlsops

"Ron de Bruin" wrote:

Hi

This is the link to the code
http://www.rondebruin.nl/copy3.htm

You can change it to

Set BaseWks = ActiveSheet

If you want the data on the activesheet

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"franciz" wrote in message ...
I am using the following macro from Ron de Bruin :
Merge a range from all workbooks in a folder with AutoFilter

I need to change the code to add sheets to the existing active workbook
instead of add a new workbook with a new sheet.
How do I amend the following lines

Add a new workbook with one sheet
Set BaseWks = Workbooks.Add(xlWBATWorksheet).Worksheets(1)


Thanks, xlsops