Date in userform textbox

[neilsy1]

Hi there

I have a query that I am slightly puzzled by (I know this will seem like a day 1 beginners question for you).
I am using a userform with 4 textboxes to extract information from a worksheet using information in textbox 1. 1 box looks up a date but returns the date in numerical format (42682) instead of dd/mm/yyyy. The date is formatted correctly in the worksheet, but will not extract correctly to the userform. The code I'm using is:

Please Login or Register  to view this content.

I tried this code after the With Me command -

copy to clipboard

Please Login or Register  to view this content.

but this returns a fault on this code line

[Neil_]

.DateTextBox = Format(Application.WorksheetFunction.VLookup(Me.KSTextBox, Sheet1.Range("D2:K1000"), 4, 0), "dd/mm/yyyy")

[neilsy1]

Brilliant
Works a treat. Thanks very much Neil_

[bakerman2]

One word of advice though since you perform 3 times a vlookup to fill 3 TextBoxes.
Do 1 search to find value in 4th column then fill all TextBoxes in one go.

Please Login or Register  to view this content.

[neilsy1]

Hi have tried updating my code to the below, but, it will still not write to worksheet when I click the OK button. Have I entered a line of code wrong somewhere?

Please Login or Register  to view this content.

[bakerman2]

Yes, you did.
This part belongs to your OK button.

Please Login or Register  to view this content.

[neilsy1]

Whoops,

Sorry, I forgot about coding the OK button. Only issue I'm getting is with the date input (going in as American dates) Cells are formatted to dd/mm/yyyy.
I have tried to amend the code to:

Please Login or Register  to view this content.

This returns a syntax error. I then tried

Please Login or Register  to view this content.

No formatting code I try seems to work

[bakerman2]

Like this.

Please Login or Register  to view this content.

[neilsy1]

Sorry

Don't think I explained that well. Tried the code you have given me previously.
The issue is when I input the data to the worksheet from the userform it converts to American formatting mm/dd/yyyy. I need it to input as dd/mm/yyyy