Do Until.. Loop

The macro first needs to ask for the employers ID number to put in the header row. The valid ID number should be less than 100. If the user enters an invalid ID, the macro continues asking for the ID until it is valid. The macro then asks whether it is night shift. If it is night shift the header background color should be pink, otherwise it should be blue.

The macro must be primarily hand-coded and include conditional logic, loops, modify data, and user interaction.

I was able to do everything except the "Do Until..Loop" where I have to put the valid ID number less than 100.
I did what I can do but failed since I am not so good at this subject. Please help!!
This is how my VBA looks like.


Thanks in advance.

try this,

Please Login or Register  to view this content.

very strange, the first time I tried to run a do until I received error, now it runs

kunoichi05
attach please your file with macro

Two words for you: OPTION EXPLICIT

You have misspelled your variable - your loop is:

Please Login or Register  to view this content.

but your input variable is myEmployeeID

BTW, this is the Excel programming area, not Word (though that is moot here).

The Word Programming area is here.

Try this. Replace the part of the code down to where you ask if it is night shift or not.

Please Login or Register  to view this content.

The working example,

Hi JapanDave,
thank you for reply..as I am a newbie for macros i dont really get which code to replace with the "night shift" and i dont get what "Dim" means..can you please explain in details.

I was not sure if that workbook was the tone you were working out of. But, the example file I posted has the amended code in it, so you really don't need to do anything. Try that workbook and see if it does what you need?
"Dim" is used to declare a variable as Romperstaomper earlier pointed out.