Date problem

[paul_bam]

Hello everyone,

I have a problem with a an excel spreadsheet solution I am doing. The problem is that I have a VBA form that allows the user to input the date, however, when the form runs it cpoies the value date value (amongsr other values) to particular cell within another sheet in the spreadsheet, but however I try to format the cells it always swaps the date to an American format (i.e. mm/dd/yyyy). What I require is English format (i.e. dd/mm/yyyy). I know the cells are formatted correctly, because if I enter the date manually it works fine, I am only experiencing the problem when the date is done via the VBA form.

Any help would be very much appreciated

Thanks in advance

PS The code I am using for the VBA form is below

Paul

Loop Until IsEmpty(ActiveCell) = True
ActiveCell.Value = txtName.Value
ActiveCell.Offset(0, 1) = txtDate.Value
ActiveCell.Offset(0, 2) = txtPayroll.Value
ActiveCell.Offset(0, 3) = txtBuddy.Value

 

[Andrew Poulsom]

Try:

ActiveCell.Offset(0, 1).Value = DateValue(txtDate.Text)

 

[paul_bam]

Try:

ActiveCell.Offset(0, 1).Value = DateValue(txtDate.Text)

Hello Andrew,

Thank you very much for posting back. Your amended code has successfully resolved my problem.

Thanks for your help, it is very much appreciated.

Paul