Excel 2010 - VBA Userform - Displaying Textbox Date as 'Day' in label

**theshybutterfly** · 03-28-2015, 08:21 PM

Hi there

Thank you for taking the time to check this out

I have a 2 page Multi-page form. On page 1, I have a txt_Inc_DATE textbox and a lbl_Inc_Day label.

The objective is, when a user enters the date of the incident in the txt_Inc_DATE textbox (in the format: dd/mm/yyyy), I would like the date to be displayed in the lbl_Inc_Day label as "ddd" (eg. Fri, Mon, Thu .... etc)

If the txt_Inc_DATE textbox is empty, I would like the lbl_Inc_Day label to be blank.

I'd also like the lbl_Inc_Day to refresh if the user edits the txt_Inc_DATE.

Would the code be under the form_initialize procedure or under the lbl_Inc_Day label sub procedure?

I have tried the following ... but no matter how I 'tweek' it ... I get errors.

Here is the code that I have been playing with:

Please Login or Register  to view this content.

I appreciate any assistance that you may be able to provide me

TheShyButterfly

**protonLeah** · 03-28-2015, 09:30 PM

1. The FORMAT FUNCTION has two parts, the thing to be formatted and the description/specification: Format(data,"format spec").
Your code: Format("dd/mm/yyyy"), is missing the first parameter. You aren't telling it what to format.

2. The textbox change event only triggers when you have entered your date so I don't know what the line Me.txt_Inc_DATE.Text = Format("dd/mm/yyyy") is supposed to do.

You did not post a sample workbook so suggestion:
a) check if the contents of the textbox is a date and modify the label if true:

Please Login or Register  to view this content.

**theshybutterfly** · 03-12-2016, 07:32 AM

Hi ProntonLeah,

My sincere apologies for the delay in response, due to 2 family crisis', I haven't had much chance to continue with my project. Now things have settled down, so I can return to it now.

Thank you for you response. I have just used the code and it works perfectly

and I have a pop up message window when they enter the date in the wrong format, which works OK.

So to summarise what I have at the moment with the date textbox I have the following code:

HTML Code:

The only problem I find is that, if the user enters the incorrect date and move from the textbox, the DAY label enters the day of the date (if entered in the correct format). But once they go back to change the date in the ADD_Inc_DATE_TXT textbox, the 'DAY' in the "LBL_Inc_Day_Type" doesn't update with the new change.

So, would someone know how to resolve the following problem?
How can I get the label to update the day type (eg. Mon, Tues, Wed... etc.) whenever the ADD_Inc_DATE_TXT textbox is changed?

Please advise if you need further information.

Cheers,
ShyButterfly