Sunday, May 26, 2013   
  Search   
 

Office 2010 - Launch Event

Register  Login  
Forums  
     Minimize  

MeraWindows Forums - Get your Computer Problems Fixed

This is a site run by the community - for the community. At the site, we share and contribute our computer learnings with each other. We discuss about Windows, Office, Mobile, Gaming and other computer related topics. At our forums you can post your queries and our very helpful community members will respond quickly to your queries. We organize lots of competitions from time to time and award prizes to the winners.
You will need to register at the site before posting in forums. It's absolutely free. After registering, you can get all the benefits available to our registered members, you can access our Downloads section, you can participate in contests, etc. You can post in forums in English as well as in Hindi, in fact we encourage you to use Hindi in your posts. If you have any problem with registration or login, please contact us.

     
  
HomeHomeMicrosoft Offic...Microsoft Offic...Microsoft ExcelMicrosoft ExcelCopy filtered data to new workbook.Copy filtered data to new workbook.
Previous
 
Next
New Post
7/9/2012 3:33 PM
 

Hi All,
I Need a excell Application to Copy filtered data to new workbook.
eg:
if there are 200 rows after Filter with any value(eg:filter value 75) ,i Should Click a Button
then the Filtered 75 rows should copy to new excell work Book.
Kindly Help me on this Guys.

Regards:Balaji

 
New Post
7/9/2012 7:39 PM
 
Hi,

Share the following:

1. Data; and
2. Source and destination workbook formats

Also, be specific about the filter criteria in the source data workbook

For Microsoft Excel trainings in India, please visit http://www.ashishmathur.com/corporate-interventions/

Regards,

Ashish Mathur - View Ashish Mathur's profile on LinkedIn
Microsoft Excel MVP
Website
Blog
 
New Post
7/11/2012 10:37 AM
 
Hi Asish,

thanks for your reply on my query posted.

let me elaborate my ask once again and will share the data accordingly.

i have a workbook (called Source.xlsx) and have my compelte raw data. in that i am using normal filter to see the filtered data. once the filtered data is available on the same sheet then i need a clicking button where by clicking this the filtered data should go and store in a Destination workbook.

filter criteria : i have 10 columns where i can take 3 columns for filter or sometimes i may use 5 columns for filter.

 
 Destination.xlsx
 Source.xlsx
New Post
7/12/2012 8:59 AM
 
Hi,

Try this

1. Open the Source Excel file
2. Right click on sheet1 and select View Code > Insert > Module
3. Paste the following code in the right hand side window

Sub copy_filtered_data()
    Workbooks.Open Filename:="C:\Users\Ashish\Desktop\destination.xlsx"
    Set wb1 = ActiveWorkbook
    Set wb2 = ThisWorkbook
    Set range1 = wb2.Worksheets("sheet1").Range("A1").CurrentRegion
    range1.Copy Destination:=wb1.Worksheets("sheet1").Range("A1")
End Sub

4. Press Alt+Q
5. Filter data on sheet1 in the Source file
6. Press Alt+F8
7. Select the code and click on Run

In the code, change the patch C:\Users\Ashish\Desktop\destination.xlsx to the path where your Destination.xlsx is saved.

Hope this helps.

For Microsoft Excel trainings in India, please visit http://www.ashishmathur.com/corporate-interventions/

Regards,

Ashish Mathur - View Ashish Mathur's profile on LinkedIn
Microsoft Excel MVP
Website
Blog
 
New Post
7/12/2012 10:39 AM
 
Hi Ashish ,

Thank you Very Much .
It is working Fine.
Really its a Gud Job.

Regards
Balaji.J
 
New Post
7/12/2012 11:50 AM
 
You are welcome.  Thank you for the feedback.

For Microsoft Excel trainings in India, please visit http://www.ashishmathur.com/corporate-interventions/

Regards,

Ashish Mathur - View Ashish Mathur's profile on LinkedIn
Microsoft Excel MVP
Website
Blog
 
Previous
 
Next
HomeHomeMicrosoft Offic...Microsoft Offic...Microsoft ExcelMicrosoft ExcelCopy filtered data to new workbook.Copy filtered data to new workbook.


   User Log In Minimize  


Register
Forgot Password ?

     
  
   Follow Us Minimize  
     
  
     Minimize