22. januar 2013 - 13:10Der er
5 kommentarer og 1 løsning
Ændre lang datorække
Jeg er ved at opdatere et excel ark, hvor jeg har en masse dato fra 2012 som jeg skal have ændret til 2013. De står i rækker med den samme dato 5 gange i træk (eks. 5/1/2012 derefter 12/1/2012 osv.) Disse skal ændres så der står 3/1/2012 5 gange derefter 10/1/2012 5 gange osv. resten af året. Kan dette løses på en nem måde?
Desværre ikke, alle de datoer der står er torsdage, dvs. 3/1 10/1 17/1 sidste år hed de tilsvarende 5/1 12/1 17/1 osv. Det som besværliggør det, er at hver dato står 5 gange i træk, så jeg kan ikke bare trække cellerne nedaf. Orker ikke at skulle udfylde 250 celler manuelt.
Følgende kode indsætter alle torsdage x 5 i 2013 kør evt. koden med et tomt ark aktiv først
Sub Torsdage() For t = 41275 To 41275 + 365 If Format(t, "dddd") = "torsdag" Then For j = 1 To 5 Cells(Cells(65536, "A").End(xlUp).Row + 1, "A") = Format(t, "mm-dd-yyyy") Next End If Next End Sub
Velbekomme. Til en anden gang: Når man får hjælp herinde, er det normalt at be hjælperen om at sende et "Svar", og derefter tildele de udlovede point. Du har jo taget dem tilbage.......
Synes godt om
Ny brugerNybegynder
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.