Mød en af Nordens fremmeste eksperter i adfærdsdesign – Morten Münster, der bl.a. har skrevet ” Jytte fra marketing er desværre gået for i dag” – på Computerworld Cloud & AI Festival.
Function DatoInterval(Dato1 As Date, Dato2 As Date) As String() Dim i As Integer Dim datoer() As String i = 0 ReDim datoer(DateDiff("d", Dato1, Dato2)) While Not DateAdd("d", i, Dato1) > Dato2 datoer(i) = DateAdd("d", i, Dato1) i = i + 1 Wend DatoInterval = datoer() End Function
se mit nyve spørgsmål.. det er lidt ligende dette bare med lidt ændringer...
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.
