Im trying to search a column (A), that has a list of dates (not in order), for the row in which the dates are equal to or greater than today and less than or equal to a week from today. I then want the information contained in the rows with these dates to be transferred to another sheet and ordered by date.
Thanks, any help would be greatly appreaciated.
Last edited by jrcream; 09-21-2008 at 10:56 PM.
Hello jrcream,
This macro checks column "A" on Sheet1 for the dates greater than or equal to today and less than or equal to 7 days from now. Those that pass the test have their entire row copied to Sheet2. You can change the sheet names in macro if you need to. They are marked in red.
Sincerely,
Please Login or Register to view this content.
Leith Ross
I'm getting an error 400 everytime I try to run this macro.
Also, how would i cut this code down so that the macro takes all the dates (not just today<=x=>+7), and copies the rows all the same then sorts them by date
Last edited by jrcream; 09-22-2008 at 03:39 PM.
Hello jrcream,
The error "Application-defined or object-defined error" tells me what happened but not where. You will need to tell me where in the code you are encountering the error. I ran the code on my computer before posting it, and it worked with no problems.
Sincerely,
Leith Ross
I assigned the macro to a button. If that isn't contributing to the error then I'm not sure where the error lies since the code isn't highlighted in any place.
Hello jrcream,
Post your workbook and I take a look it. By the way, I am using Excel 2003.
Sincerely,
Leith Ross
Okay, I got the subscript error to go away, but only if the first row contains a date within the accepted range. Also, the macro only copies the information from the first row (& only if its within the accepted range) it does not check the other dates in column A and copy them if they're within the accepted range(today to today+7).
I use excel 2003 and I am using your exact code.
FYI,
I just tested Leith's code on Excel 2000 and it copied all rows with appropriate values to Sheet2. It worked fine with blank rows including row 1 and without.
ChemistB
My 2?
substitute commas with semi-colons if your region settings requires
Don't forget to mark threads as "Solved" (Edit First post>Advanced>Change Prefix)
If I helped, Don't forget to add to my reputation (click on the little star at bottom of this post)
Forum Rules: How to use code tags, mark a thread solved, and keep yourself out of trouble
The code still only copies the first row in column A if its in the range, and if its not in th range I get an error 400.
I am so confused the code does not work with empty rows and not at all like the above user described.
Last edited by jrcream; 10-01-2008 at 02:16 AM.
here is my workbook for more clarification
Hello jrcream,
I found the problem. Here is the revised macro...
Sincerely,Please Login or Register to view this content.
Leith Ross
I've been trying to change the range of dates searched to column E, but I'm having problems identifying the areas of code to be changed. Any help is greatly appreciated I'm still learning.
Is there a way to simply copy the values and text in the cells without copying their corresponding formulas, because the macro now works but all of the values are wrong
Hello jrcream,
Change this line in the macro...
To this if you only want the values to be copied...Please Login or Register to view this content.
Sincerely,Please Login or Register to view this content.
Leith Ross
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks