Birthday formula?

[Behedwin]

Hi

I am setting up a access app in sharepoint.

Users in this app will enter a birthdaye and some other numbers.
I want display a date based on the first 8 numbers.

For example an user will write
196510014838
that means 1995 year, october, day one, and then some other numbers.

so how can i in this view (see picture)
http://prntscr.com/cpntgn


fix so that a date is displayed in a textbox based on those numbers?

[RuralGuy]

It looks to me like it would be 1965 rather than 1995.

[Behedwin]

yeh ofc
i just typed wrong.

but how do i get access app to read the field with the number 196510014338 and display a date based on the first 8 numbers?
4 first is year
then 2 is month
and last 2 is day

[RuralGuy]

How about:
DateValue(Mid(YourString,4,2) & "/" & Mid(YourString,6,2) & "/" & Left(YourString,4))

[Behedwin]

But how do i apply that http://prntscr.com/cpqjkb The code does not seem to save, next time i open the window it is gone. And i guess i need to tell it somehow from where to fetch the numbers it should display...

[RuralGuy]

I guess i need to tell it somehow from where to fetch the numbers it should display...

That's the ticket.

[RuralGuy]

Where were you planning to get the string and where were you going to display the Date?

[Behedwin]

I am using Access app The user input the string into a textfield. That string i want to fetch and transform into a date. Display the string/date in an label. But i can not get the formulas to work like they do in excel. I get this formula to work =Left([PersonnummerTextruta],4) but then i only get the 4 first digits. I can not figure out how to get more and divide them up into a date

[RuralGuy]

Have you tried:
=DateValue(Mid([PersonnummerTextruta],4,2) & "/" & Mid([PersonnummerTextruta],6,2) & "/" & Left([PersonnummerTextruta],4))

[Behedwin]

dont really know if that works. i have a hard time translating datevalue and mid to swedish access....

[Behedwin]

when googling for translations i get datumvärde extext but those are not recognized in access... its like those commands cant be used in access.

[RuralGuy]

The language barrier may have gotten us!
I don't know if these will help:
https://support.office.com/en-us/art...a-564a28f2532c
https://www.youtube.com/watch?v=wSrtbeMG0tI
https://msdn.microsoft.com/en-us/library/ee634543.aspx

[Behedwin]

this feels so wierd....

stuck because of a language barrier.... cant google my way to a access translation of MID function.
All pages talk about Excel translations... and those does not seem to work.

=DATUMVÄRDE(EXTEXT([PersonnummerTextruta],4,2) & "/" & EXTEXT([PersonnummerTextruta],6,2) & "/" & VÄNSTER([PersonnummerTextruta],4))


http://prntscr.com/cq2nrv

[RuralGuy]

Can you try some of those by them selves in the immediate window? What does this get you?
?EXTEXT("196510014838",4,2)

[Behedwin]

Here is what i did.

1. Open the app in access
http://prntscr.com/cq3n5n'
2. Add a test label
http://prntscr.com/cq3ne1
3. Add the formula to the label
http://prntscr.com/cq3nqh


Save and run the application.
The result is nothing, still just say Label 4 in label.


But if i do the same thing
But change the formula to =Vänster( [PersonnummerTextruta]; 4)

Then i get an result. Also notice in the screenshot that the formula VÄNSTER (LEFT in english) is recognized and found by access.
EXTEXT is not found by Access.