Delete Rows greater than current date

[kesavanprabhu]

Hi,

I have a report in that in B Column dates are listed in sorting order, now i need a coding like if i run the macro today, it should retain from back dated to current date and delete all the future details.

(For Example: If the report is being created on Monday, June 3rd, then any details due on June 3rd or prior, would be entered in this field. Delete all the rows from June 4th)

Sheet has been attached for your easy reference, please help on this...

[HaHoBe]

Hi, kesavanprabhu,

maybe this is what you are looking for (please try on a sample):

Please Login or Register  to view this content.

I would reconsider the aspect of deleting data and maybe just hide the rows instead.

Ciao,
Holger

[kesavanprabhu]

Hi Holger,

Thanks for your coding,it worked only 50%. In your coding if today's date is not available it prompts a msgbox, actually it is not required.

below example will give you idea on my expectation...

Example: I have a data from May1st to may29th and again data continues from June 5th to June20th... (some times i might get the current date or may not but my coding should consider the data till current date) now my requirement is I need to keep the data till current date ie., in this example i will be retaining data till 29th and i need to deletethe data from june 5th.

If i am not clear pls let me know, i will try explain in better way.

[HaHoBe]

Hi, kesavanprabhu,

and what about this code?

Please Login or Register  to view this content.

Thinking about it this code may lead to an infinite loop if today´s date is less than the earliest date in the list.

This code should take care of that problem:

Please Login or Register  to view this content.

Ciao,
Holger

[kesavanprabhu]

Holger thank you very much its working.....

[kesavanprabhu]

Hi Holger,

When i executed the coding there was a problem in getting the output. For Example in B column 8,9,10th rows as today's date(or previous date) and 11th row as tomorrow's date and so on.

By executing the code actually i am looking the result should come like till 10th row the data should retain and from 11th row all the data's should be deleted, but now when executing the code it retains till 8th row and deleting the datas from 9th row which is wrong.

Can you check and give solution for this I have attached excel sheet for your reference.

[HaHoBe]

Hi, kesavanprabhu,

not really great a problem. Based on the last coding:

Please Login or Register  to view this content.

Or use

Please Login or Register  to view this content.

Ciao,
Holger

[kesavanprabhu]

Thanks Holger.... Can you explain me this coding so that i can understand and work on this...

[HaHoBe]

Hi, kesavanprabhu,

me and commenting - not really one of my favourites.

Please Login or Register  to view this content.

Please Login or Register  to view this content.

Ciaom
Holger

[kesavanprabhu]

Thank you very much Holger....