Forfatter |
Emne Søg Emne funktioner
|
Bjarnehansen
Platin bruger
Medlem: 20.Nov.2011
Land: DK
Status: Offline
Point: 5563
|
Indlæg funktioner
Tak(0)
Citér Svar
Emne: ændre datoformat Sendt: 28.Apr.2024 kl. 21:12 |
Hej Jeg har dette lille ark som virker godt men hvordan får jeg lavet det om til dansk dato format???
|
Husk, at trykke på [Tak], hvis du kan lide et indlæg. Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag. Med venlig hilsen - Bjarne Hansen - Microsoft 365 DK
|
![Til top Til top](forum_images/back_to_top.png) |
|
|
![Til top Til top](forum_images/back_to_top.png) |
maxzpad
Guld bruger
Medlem: 04.Aug.2016
Land: Danmark
Status: Offline
Point: 698
|
Accepteret svar
Indlæg funktioner
Tak(0)
Citér Svar
Sendt: 29.Apr.2024 kl. 09:12 |
I funktionen Private Function GetDate har jeg blot byttet om på D (dag) og M (måned). Så lader det til at fungere med dansk datoformat.
D = CLng(Left(DateStr, I - 1)) M = CLng(Mid(DateStr, I + 1, InStr(I + 1, DateStr, "-") - I - 1))
|
![Til top Til top](forum_images/back_to_top.png) |
maxzpad
Guld bruger
Medlem: 04.Aug.2016
Land: Danmark
Status: Offline
Point: 698
|
Indlæg funktioner
Tak(0)
Citér Svar
Sendt: 29.Apr.2024 kl. 08:27 |
Hej Bjarne
Er det noget som dette, du er ude efter: =INDEKS(TEKST(TEKSTSPLIT(A3;"-");"00");1;2)&"-"&INDEKS(TEKST(TEKSTSPLIT(A3;"-");"00");1;1)&"-"&INDEKS(TEKSTSPLIT(A3;"-");1;3)
Der bliver blot flyttet rundt på "dato-delene", men datatypemæssigt er det stadig tekster.
|
![Til top Til top](forum_images/back_to_top.png) |
maxzpad
Guld bruger
Medlem: 04.Aug.2016
Land: Danmark
Status: Offline
Point: 698
|
Indlæg funktioner
Tak(0)
Citér Svar
Sendt: 29.Apr.2024 kl. 08:32 |
Eller lidt kortere: =LET(dt;TEKSTSPLIT(A3;"-");INDEKS(TEKST(dt;"00");1;2)&"-"&INDEKS(TEKST(dt;"00");1;1)&"-"&INDEKS(dt;1;3))
|
![Til top Til top](forum_images/back_to_top.png) |
Bjarnehansen
Platin bruger
Medlem: 20.Nov.2011
Land: DK
Status: Offline
Point: 5563
|
Indlæg funktioner
Tak(0)
Citér Svar
Sendt: 29.Apr.2024 kl. 08:44 |
den tror jeg ikke jeg kan bruge da det er i funktionen Agefunc() der skal ændres noget efter hvad jeg kan se så jeg ikke skal taste datoerne i us format
|
Husk, at trykke på [Tak], hvis du kan lide et indlæg. Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag. Med venlig hilsen - Bjarne Hansen - Microsoft 365 DK
|
![Til top Til top](forum_images/back_to_top.png) |
maxzpad
Guld bruger
Medlem: 04.Aug.2016
Land: Danmark
Status: Offline
Point: 698
|
Accepteret svar
Indlæg funktioner
Tak(0)
Citér Svar
Sendt: 29.Apr.2024 kl. 09:12 |
I funktionen Private Function GetDate har jeg blot byttet om på D (dag) og M (måned). Så lader det til at fungere med dansk datoformat.
D = CLng(Left(DateStr, I - 1)) M = CLng(Mid(DateStr, I + 1, InStr(I + 1, DateStr, "-") - I - 1))
|
![Til top Til top](forum_images/back_to_top.png) |
Bjarnehansen
Platin bruger
Medlem: 20.Nov.2011
Land: DK
Status: Offline
Point: 5563
|
Indlæg funktioner
Tak(0)
Citér Svar
Sendt: 29.Apr.2024 kl. 10:02 |
tak det var ikke så svært når man bare ved det....
|
Husk, at trykke på [Tak], hvis du kan lide et indlæg. Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag. Med venlig hilsen - Bjarne Hansen - Microsoft 365 DK
|
![Til top Til top](forum_images/back_to_top.png) |
Bjarnehansen
Platin bruger
Medlem: 20.Nov.2011
Land: DK
Status: Offline
Point: 5563
|
Indlæg funktioner
Tak(0)
Citér Svar
Sendt: 29.Apr.2024 kl. 10:26 |
|
Husk, at trykke på [Tak], hvis du kan lide et indlæg. Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag. Med venlig hilsen - Bjarne Hansen - Microsoft 365 DK
|
![Til top Til top](forum_images/back_to_top.png) |