Makro og VBA - Fra tekst til datoformat med VBA

Fra tekst til datoformat med VBA

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=3963
Udskrevet den: 23.Nov.2024 kl. 04:57

Emne: Fra tekst til datoformat med VBA

Besked fra: Simon N
Emne: Fra tekst til datoformat med VBA
Posteringsdato: 18.Jul.2019 kl. 14:41

Hej Folkens.

Novice her - prøver at lære lidt VBA og automatisere manuelle processer ifm. noget lønkørsel.

Har en workbook med medarbejdertimer registreret i individuelle ark.

Datoer er i kollone A og resten tænker jeg er irrelevant ift. mit problem.

Jeg skal gerne have lavet en makro der kan identificere hvis der mangler en dato i kollonne A og herefter indsætte en række med datoen der mangler.

03-06-2019

04-06-2019

06-06-2019

I ovenstående datorække ville den skulle indsætte en ny række med datoen: 05-06-2019.

Derudover må makroen ikke slette duplikater eller noget da der ofte er registrerede forskellige typer af timer på samme dage.

Jeg har rodet rundt i datoformater med Cdate og andet og jeg har ikke kunnet få det til at virke. Min idé var at bygge en makro baseret på ifs og elseifs der loopede igennem cellerne i kollonne A og som ville kunne gøre forskellige ting hvis de omkringliggende celler var +/- 1 fra den aktive celle. Eksempelvis ville jeg gerne have en .borders(xledgebottom) efter hvert skift i dato også.

Mine forsøg indtil videre har dog fejlet. Tror egentlig godt ovenstående kunne fungere - jeg kan af en eller anden årsag bare ikke lure hvordan jeg får konverteret datoerne fra tekst-format til dato-format.

Datoerne er som sagt i tekstformat på følgende måde: "dd-mm-yyyy".

En der kan være behjælpelig med at dirigere mig i den rigtige retning?

Vh. Simon

Svar:

Besked fra: Bjarnehansen
Posteringsdato: 18.Jul.2019 kl. 18:18

prøv at /topic662.html - upload dit ark og hvor får du datoerne fra ?

-------------
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

Besked fra: Mads32
Posteringsdato: 19.Jul.2019 kl. 00:18

Hej

En formatering som dd-mm-yyyy er ikke en tekst men et datoformat. Denne virker ikke i en dansk version.

Hvis dine celler er formateret dd-mm-yyyy anvender du en engelsk version, på dansk dd-mm-åååå.

Så skal datoer indtastes på samme måde: dato=2 tegn, bindstreg(-), måned=2 tegn, bindestreg(-), år=4 tegn.

Besked fra: Simon N
Posteringsdato: 19.Jul.2019 kl. 08:36

https://forum.excel-regneark.dk/uploads/2495/Anonym_L%C3%B8nk%C3%B8rsel.xlsm" rel="nofollow - uploads/2495/Anonym_Lønkørsel.xlsm

Her er en udgave af filen - min egen ser selvfølgelig anderledes ud - men celle-formateringer er de samme i filerne.

Jeg er ret sikker på at det er tekstformat - men jeg kan selvfølgelig godt tage fejl.

Hele udtrækket med datoer osv. er hevet ud af fra vores ordrestyringssystem.

Udtrækket er så kørt igennem et par subs for at få det fordelt på ark og lidt andet.

Besked fra: Mads32
Posteringsdato: 19.Jul.2019 kl. 19:11

Hej

Dine datoer er en datoformatering. Du kan regne på dem.

A2 -- 01-07-2019

A3 -- 02-07-2019

A4 -- 03-07-2019

Formelen +A3- A2 giver 1

Formelen +A4- A2 giver 2