type mismatch with dates

Using dates in this project of mine is whats driving me mad. There seem to be 2 problems.
Problem 1 - When the active cell is a blank coloured cell eg D4, and the Add Details button is pressed, it should display a userform with the Check in date defaulted to the date at the top of the active cell column, in this case D3. But when we get the value of the cell in the vba code, it gives me an automation error

Problem 2 - When the active cell is a coloured cell with data in it eg E5, and the Add Details button is pressed, it should display a userform with all the text boxes defaulted to the values that it finds when it does a search for the booking ID in the Booking Details work sheet. When these are updated it should save them back to the Booking Details worksheet. What happens at the moment is that it gives me a type mismatch with the check in and out dates and I cant figure out why

If anyone can offer any help I would really appreciate it.

Hi

I do not have Excel for Mac but on excel 2007 for windows your code evaluates correctly and if the cell is blank gives a message box with the cell address and then two message boxes with the date. If the cell contains data the form loads correctly with data in the relevant places.

Regards

Jeff