Textbox date

I am using a commandbutton to enter the current date in a textbox which is
then used to populate a cell.

1. If I use TextBox1.Value = Date, the format in the textbox is
mm/dd/yyyy but appears as a date formatted dd/mm/yyyy in the cell
2. If I use TextBox1.Value = Format(Date, "dd/mm/yyyy"), the format in
both textbox and cell is dd/mm/yyyy

I need to compare another cell to the current date cell to see if the other
cell is before today (cond format). In case 1 this is fine, but in case 2
all dates appear to be before today.

How can I get the currect date to appear correctly in both locations and
still be able to compare it as a date?

--
Ian
--


.