Print side | Luk vindue

optælling

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Formler
Forum beskrivelse: Hjælp til formler i regneark og/eller brugen af disse.
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=4978
Udskrevet den: 05.Dec.2024 kl. 03:24


Emne: optælling
Besked fra: DanF
Emne: optælling
Posteringsdato: 15.Sep.2023 kl. 18:50
Hej med jer. 

Jeg er ved at lave noget statistik på min og kollegaers arbejdskalender. 
Men er rendt ind i lidt udfordringer, som jeg har bøvlet med den sidste dags tid, og kan slet ikke se mig ud af det. Har ikke engang en formel hvor jeg har prøvet, som der evn skal rettes i, er helt blank og mere forvirret. 

/topic662.html - uploader en fil, hvor jeg også har beskrevet min udfordring og hvad jeg ønsker. 

Venlig hilsen 
Dan 
uploads/2861/test_arb_kalender.xlsx" rel="nofollow - uploads/2861/test_arb_kalender.xlsx



Svar:
Besked fra: H_sønderskov
Posteringsdato: 16.Sep.2023 kl. 17:36
Hej
Det ville godt kunne laves, hvis det kun er den prøve fil du har Uploadet, hvis det er for et helt år bliver det meget kompliceret i en formel, men muligt i VBA.
VH H_SønderskovSmile


Besked fra: DanF
Posteringsdato: 16.Sep.2023 kl. 20:45
Hej..
Tak for svar. 

Jeg har stadig tilgode at lære samt forstå VBA, så det kan jeg ikke kaste mig ud i PT, men nok et lille vinter projekt at begynde at kigge på det. 

Jeg havde tænkt mig at lave en optælling for hver måned, og efterfølgende lave en fane med en samlet oversigt/total, så har jeg stadig muligheden for at se hvad der sker med timerne hver måned. 

VH Dan



Besked fra: Hans K.
Posteringsdato: 18.Sep.2023 kl. 08:27
Det er ikke mange oplysnionger du giver.

Skal der kunne vælges en given måned i et givent år.
Er der nogen speciel grund til, at du har farvet weekend-celler røde.
Vis præcist hvordan du vil have de ønskede resultater præsenteret både for spørgsmål 1 og 2 (indtast manuelt eksempler på ønskede resultater og giv flere eksempler end i din først uploadede fil så der er noget at teste på.
Hvilken Excel version bruger du?


Besked fra: DanF
Posteringsdato: 18.Sep.2023 kl. 19:20
Hej..

Jeg har prøvet at lave et eksempel samt oplysninger, håber det er forståligt.

Grunden til at weekender er røde er pga vagtplanen ser sådan ud på jobbet, det er ikke strengt nødvendigt, men da jeg vil dele Excel filen med min kollegaer, så tænkte jeg bare det var bedst sådan. 

Hvis jeg få det til at virke på en måned, så klippe/kopier jeg flere faner og ændre dage/dato'er osv. og til sidste en fane med en total oversigt for hele året.

Mit excel er 365 version 46.77 til Mac

Vh
Dan
uploads/2861/test_arb_kalender_2_2023-09-18_19-18-08.xlsx" rel="nofollow - uploads/2861/test_arb_kalender_2_2023-09-18_19-18-08.xlsx




Besked fra: Hans K.
Posteringsdato: 18.Sep.2023 kl. 21:09
Jeg har ikke testet nævneværdigt, men du kan prøve at se.

uploads/2435/Calender_HK.xlsx" rel="nofollow - uploads/2435/Calender_HK.xlsx


Besked fra: DanF
Posteringsdato: 18.Sep.2023 kl. 22:01
Tak Hans...Thumbs Up

Den med 8 timers hvile er der selvfølgelig en ting som ikke kan tages højde for, og det er jo ved måned skift, det vil være sjældent, men det kan jo ske at der er et "a" d. 31 og et "d" d. 1 næste måned. det ville så ikke blive talt. Som jeg ser det ville det kræve at hele året lå i en række... 
Men ellers virker det fint.. Big smile 
Kan også gennemskue den formel du har lavet, så det er jo fint at lære lidt nyt.

Den med weekend arbejde, der har jeg ikke lige tænkt mig om, virker fint med at tælle de "lør" og "søn" der er vagt på, men giver ikke rigtig nogen indikation af hvor mange weekender det er.
Ved ikke lige hvordan jeg skal lure den, eller om jeg bare skal nøjes med at tælle lørdage og søndage hver for sig. 


Besked fra: Hans K.
Posteringsdato: 19.Sep.2023 kl. 08:06
Citat: DanF DanF skrev:

Tak Hans...Thumbs Up

Den med 8 timers hvile er der selvfølgelig en ting som ikke kan tages højde for, og det er jo ved måned skift, det vil være sjældent, men det kan jo ske at der er et "a" d. 31 og et "d" d. 1 næste måned. det ville så ikke blive talt. Som jeg ser det ville det kræve at hele året lå i en række...

[Hans] Men det kan det jo også sagtens. Det er faktisk det jeg har vist i Sheet1!L7:NR7, m3en det kræver selvfølgelig at du udfylder de der "a", "d", "n" koder for hele året. Det var derfor jeg tidligere efterlyste flere eksempler.
 
Men ellers virker det fint.. Big smile 
Kan også gennemskue den formel du har lavet, så det er jo fint at lære lidt nyt.

[Hans] Hvilken - der er jo flere formler.

Den med weekend arbejde, der har jeg ikke lige tænkt mig om, virker fint med at tælle de "lør" og "søn" der er vagt på, men giver ikke rigtig nogen indikation af hvor mange weekender det er.
Ved ikke lige hvordan jeg skal lure den, eller om jeg bare skal nøjes med at tælle lørdage og søndage hver for sig. 

[Hans] Altså i dit eksempel skal det være 4. Er det korrekt forstået?


Besked fra: Hans K.
Posteringsdato: 19.Sep.2023 kl. 10:36
Hvis det ønskede resultat skal være 4, så se formel i celle W38

uploads/2435/Calender_2.xlsx" rel="nofollow - uploads/2435/Calender_2.xlsx


Besked fra: H_sønderskov
Posteringsdato: 20.Sep.2023 kl. 12:08
uploads/2975/test_arb_kalender_2_2023-09-18_19-18-08.xlsm" rel="nofollow - uploads/2975/test_arb_kalender_2_2023-09-18_19-18-08.xlsm
Har lavet det med VBA så du skal godkende brug af Makroer
her er en beskrivelse af VBA
Sub Rektangelafrundedehjørner4_Klik()
'oprette parameter
Dim x, ad, dn, ld, sd, w As Integer
'nulstil parameter
ad = 0
dn = 0
ld = 0
sd = 0
w = 0
'check fra første dag til sidste der er brugt 31 dage i alle måneder
For x = 2 To 32
'hvis der er a i en celle checkes om den næste celle er d og tæller en frem
    If Ark1.Cells(6, x) = "a" And Ark1.Cells(6, x + 1) = "d" Then ad = ad + 1
'hvis der er d i en celle checkes om der n i næste celle
    If Ark1.Cells(6, x) = "d" And Ark1.Cells(6, x + 1) = "n" Then dn = dn + 1
'hvis der er lør i 4 række checkes det om der står noget i række 6 samme sted
    If Ark1.Cells(4, x) = "lør" And Ark1.Cells(6, x) <> "" Then
        'lørdag tæller en frem
        ld = ld + 1
        'weekend tæller en frem
        w = w + 1
    End If
    'hvis der står søn checkes om der står noget i række 6 samme sted
    If Ark1.Cells(4, x) = "søn" And Ark1.Cells(6, x) <> "" Then
    ' søn tæller en frem
        sd = sd + 1
        'hvis weekend ikke har noget om lørdagen tælles en frem i weekend
        If Ark1.Cells(6, x - 1) = "" Then w = w + 1
    End If
Next
'overføre data til ark1
Ark1.Cells(9, 7) = ad
Ark1.Cells(10, 7) = dn
Ark1.Cells(27, 27) = ld
Ark1.Cells(29, 27) = sd
Ark1.Cells(31, 27) = w
End Sub
alt med grønt bruges ikke af program kun beskrivelse



Print side | Luk vindue