Avatar billede jjjakobsen Mester
08. marts 2018 - 16:06 Der er 7 kommentarer og
1 løsning

Opret serie

Hvordan opretter jeg en serie der springer weekenden over:
1,2,3,4,5,8,9,osv.
Avatar billede ebea Ekspert
08. marts 2018 - 16:23 #1
Kan du uddybe det lidt nærmere. Jeg formoder det er ugedage! Men i hvilken sammenhæng skal du have det opsat?
Avatar billede jens48 Ekspert
08. marts 2018 - 17:07 #2
Skriv begyndelsesdato i A1 og i A2 skrives

=A1+HVIS(UGEDAG(A1;2)>=5;3;1)

Kopieres nedefter
Avatar billede jjjakobsen Mester
08. marts 2018 - 17:15 #3
Jeg vil bare oprette en kalender f. eks. for april.
Begynde med den første, og når der kommer en weekend, hoppes de næste to dage over.
April:
3, 4, 5, 6, 9, 10, 11, 12, 13, 16, 17 osv.
Den 1. og 2. april er en weekend, så da skal listen begynde med 3.
Avatar billede jens48 Ekspert
08. marts 2018 - 17:55 #4
Mit forslag kan stadig bruges. Skriv 31/3 i A1 og formater alle cellerne nedenunder som "d". Så får du kun vist datoen. Hvis du samtidig laver en betinget formatering for cellerne A20:A35 med denne formel:

=DAG($A20)<DAY($A$19)

og laver teksten hvid vil du ikke få vist datoer for den efterfølgende måned
Avatar billede ebea Ekspert
08. marts 2018 - 19:12 #5
Her er et lille eks. til at arbejde videre med, eller bruge:
https://www.dropbox.com/s/7sb0rc51x560e16/arbejdsdage.xlsx?dl=0
Avatar billede store-morten Ekspert
08. marts 2018 - 19:28 #6
Måske med en makro:
Sub Opret_serie()
Dim i As Integer
Dim h As Integer
Dim t As Integer
Dim l As Integer
Dim v As Integer
Dim Antal As Integer

Antal = InputBox("Hvor mange uger?")
Værdi = InputBox("Start med?")

    Svar = MsgBox("Vil udfylde vandret? (Nej, udfylder nedad)", vbYesNo + vbQuestion, "Retning")
    If Svar = vbYes Then
        l = 0
        v = 1
    Else
        l = 1
        v = 0
    End If

t = Værdi

For i = 1 To Antal

    For h = 1 To 5
   
    ActiveCell = t
    ActiveCell.Offset(l, v).Activate
    t = t + 1
    Next h
    t = t + 2

Next i

End Sub
Avatar billede jjjakobsen Mester
08. marts 2018 - 20:09 #7
Jens48
Tak for hjæpen!
Avatar billede finb Ekspert
09. marts 2018 - 08:44 #8
giv jens point, ikke dig selv
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester