Loop until 1 textbox in userform equals another

[amoxia]

Hi,

I've got a start date in one textbox in a userform and an end date in another textbox in the userform.

What I want to do is run the macro until the start date = the end date.

Kind of thinking something like this..

Please Login or Register  to view this content.

Can this be done??

Cheers,
Amoxia

[6StringJazzer]

Yes. Actually with this type of "can this be done question" I suggest you try it!

What you have is very close to the necessary code.

Please Login or Register  to view this content.

However, you do have a bug here. If TxtEndDate starts out being less than txtStartDate then you will have an infinite loop. Well, not truly infinite. You will get an error when txtStartDate reaches an overflow condition.

[amoxia]

Thanks 6StringJazzer for that.

I did the following..

Please Login or Register  to view this content.

I get an error when I try to add a day to the start date. Any suggestions??

[amoxia]

Also if they are the same date it doesn't do 'my code.. I want it to run through the code once if they are the same date and then stop.

[6StringJazzer]

This should solve both problems. However, I have not tested this code because I don't have your file.

First, when you get an error, always provide the text of the error message.

A textbox contains...wait for it...text. You can't do arithmetic on a string so you have to convert it to a number first. That's what CDate does--converts a string to a date. Then you add 1. Then you may need to convert it back to a string for display in the textbox--maybe not, I don't remember if it will convert it for you automatically. Even if it is converted for you, it may not be the format you want. So a call to Format will display exactly the format you want; just use the string to specify what you want it to look like. Here I used m/d/yyyy.

Putting the Until condition at the end of the loop instead of the beginning will force the loop to execute at least once.

Please Login or Register  to view this content.

[amoxia]

Sorry, in future I will put the error message when I say there is an error.
Thank you for your help.

Just for others sake who read this in the future - this will not run the code once the start date = end date. At the start of the macro I just put the end date = end date + 1 so it would.

Also some formatting issues with the date - in a couple of cases it must get confused with the dd/mm/yyyy format I have and thinks it is mm/dd/yyyy and it looks like the month changes not the day.

[mikerickson]

wouldn't it be simpler to use

Please Login or Register  to view this content.

rather than looping?

[amoxia]

Hi Mike,

No I need it to loop to perform the macro as it puts a heap of data into the database as there are multiple teams.

The date problem was because I didn't use CDate when extracting the value from the textbox in the macro. Fixed that now.

Cheers,
Amoxia