When my form posts the data from a form to my data sheet it is
changing the date. here is my code to post the information:

Private Sub CommandOK_Click()
' Make Sure Sheet1 is active
Sheets("Data").Activate

' Determine next empty row
nextrow = Application.WorksheetFunction.CountA(Range("A:A")) + 1


' Make sure serial number entered
If ComboSerialNo.Text = "" Then
MsgBox "You Must Enter A Serial Number!"
ComboSerialNo.SetFocus
Exit Sub
End If


' Check if Serial Number Has Previous Entry
If ComboSerialNo.Text = notinlist Then MsgBox ("Warning Serial
Number Has No Previous Entrys")

' Transfer SerialNum
Cells(nextrow, 1) = ComboSerialNo.Text

' Transfer Date
Cells(nextrow, 2) = ComboDate.Text

' Transfer On/Off Hire
If OptionOn Then Cells(nextrow, 3) = "1"



OptionOn.SetFocus

End Sub

what is happening is that the date is entered as dd/mm/yyyy or dd/mm/
yy but when it posts to the sheet, it is changing the format to mm/dd/
yyyy eg. if i entered a date of 01/03/2007 it would post as
03/01/2007, but the format of the date on the sheet is still dd/mm/
yyyy so the date is completly stuffed up, any ideas?