Home |
Search |
Today's Posts |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Thank you Joel,code a bit too long.using Cdate can you make it?
Joel wrote: It is much easier to wrok with Textboxes when using Dates because they are text strings and not a serial date which can change with regional settings. Try this code StrDate = Textbox1.text 'get the 1 or 2 digits before 1st slash and convert to number DayNum = Val(StrDate,Instr(StrDate,"/")-1) 'get the string after the 1st slash StrDate = mid(StrDate,Instr(StrDate)+1) 'get the month number before the slash and convert to number MonthNum = Val(StrDate,Instr(StrDate,"/")-1) 'get the year after the slash YearNum = val(mid(StrDate,Instr(StrDate)+1)) 'add 2000 to year number YearNum = YearNum + 2000 'convert date to serial format SerDate=dateserial(YearNum,MonthNum,DayNum) 'Print the Date in required format Textbox1.text = format(SerDate,"dd-mmm-yy") Hello,VBA experts how to validate date entries in TextBoxes (on Userform),user wants to enter date values in dd/mm/yy format,entry is must in textbox,after entry and exiting from textbox the textbox entry be displayed in dd-mmm-yy format.(without changing computer's Regional and language settings). -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...mming/200806/1 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Date Format for Userform TextBox | New Users to Excel | |||
Date Format in UserForm textbox. | Excel Programming | |||
Copying TextBox entry from one UserForm to another | Excel Programming | |||
Ensuring UserForm Textbox Entry is numeric | Excel Programming | |||
Date Calculation in UserForm TextBox | Excel Programming |