Formating a label to display a date wtih retreived usung vlookup from vba

[IanJG]

Hi
I am using a user-form to allow a user to log weights from a set of scales. I have a combo-box which allows them to choose a formula.
When they choose an formula I display the :- amount, the batch#,expiry date. on labels on the userform. everything is working apart from formatting the date here is the code i am using:-

Me.Label12.Caption = Application.WorksheetFunction.VLookup(ThisWorkbook.Sheets("Data Sheet").Range("A8"), Range("ingredientlist"), 9, False)

Ingredientlist is a named range.

Is there any way to format it to dd/mm/yyyy without having to write it to a cell (with date formatting) then call it onto the userform?

Thanks

 

[VoG]

Perhaps

Me.Label12.Caption = Format(Application.WorksheetFunction.VLookup(ThisWorkbook.Sheets("Data Sheet").Range("A8"), Range("ingredientlist"), 9, False), "dd/mm/yyyy")

 

[IanJG]

Thank you