Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Ugenummer fra dato

296 views
Skip to first unread message

René Mehlbye

unread,
Feb 19, 2008, 9:13:08 AM2/19/08
to
Jeg sidder med et excel ark med dn kolonne med datoer, hvor jeg
forsøger at udlede ugenummeret
Ifølge Excel help skulle jeg kunne bruge funktionen =uge.nr(B1;2)men
det virker bare ikke
Nogen der har de vises sten?

John

unread,
Feb 19, 2008, 10:19:04 AM2/19/08
to
Hej René
Jeg har tidligere set et indlæg med denne løsning (Kan desværre ikke huske
hvem der har oprettet den oprindeligt)

=HELTAL(REST(REST(HELTAL(REST(HELTAL(A1)+692501;146097)/7)*28+4383;146096);1461)/28+1)

Datoen står i A1

Med venlig hilsen
John

"René Mehlbye (slet M2PZ9)" <meh...@M2PZ9post.tdcadsl.dk> skrev i en
meddelelse news:12034307530.548810909486562@dtext.news.tele.dk...

achristoffersen

unread,
Feb 19, 2008, 10:29:42 AM2/19/08
to
On 19 Feb., 15:13, René Mehlbye <mehl...@M2PZ9post.tdcadsl.dk> (slet

Jeg mener den funktion kræver du installere analysis toolpack. klik på
funktioner > tilføjelsesprogrammer > analysis toolpack

så burde det virke?

Harald Staff

unread,
Feb 19, 2008, 11:00:51 AM2/19/08
to
Løsningen krever at du har analysis toolpack installert. Men den resulterer
i et amerikansk ugenummer. Her i europa benytter vi ISO ugenumre, det er
ikke det samme. Se
http://www.cpearson.com/excel/weeknum.htm
Søk google groups for løsninger
http://groups.google.com/groups?as_q=ugenr&num=100&scoring=r&as_epq=&as_oq=&as_eq=&as_ugroup=dk.edb.regneark

HTH. Beste hilsen Harald

"René Mehlbye (slet M2PZ9)" <meh...@M2PZ9post.tdcadsl.dk> wrote in message
news:12034307530.548810909486562@dtext.news.tele.dk...

Joergen Bondesen

unread,
Feb 19, 2008, 11:08:37 AM2/19/08
to
Hej Rene.

Så vidt jeg erindre regner denne (Excels) function forkert, men det må du
selv afgøre om det har nogen praktisk indvirkning. 8-)


Denne Function fra Harald skulle være OK.
'Harald (ok)
Function WEEKNR(ByVal Dato As Date) As Long
Dato = Dato + 4 - Weekday(Dato, vbMonday)
WEEKNR = DatePart("ww", Dato, 2, 2)
End Function

--

Med venlig hilsen
Jørgen Bondesen


"achristoffersen" <achrist...@gmail.com> skrev i en meddelelse
news:720e1885-6451-41bd...@s37g2000prg.googlegroups.com...

René Mehlbye

unread,
Feb 20, 2008, 2:42:48 AM2/20/08
to
Det var lige det der skulle til, tak for hjælpen.
René

achristoffersen <achrist...@gmail.com> skrev:

Bjarne K.

unread,
Feb 20, 2008, 7:18:46 AM2/20/08
to

"John" <kanikk...@yahoo.com> wrote in message
news:47baf372$0$99014$157c...@dreader2.cybercity.dk...

> Hej René
> Jeg har tidligere set et indlæg med denne løsning (Kan desværre ikke huske
> hvem der har oprettet den oprindeligt)
>
> =HELTAL(REST(REST(HELTAL(REST(HELTAL(A1)+692501;146097)/7)*28+4383;146096);1461)/28+1)
>
> Datoen står i A1
>
> Med venlig hilsen
> John

Har tilladt mig lige at oversætte til engelsk excel'sk hvis der er nogen der
skulle kunne bruge det.

=INT(MOD(MOD(INT(MOD(INT(A1)+692501;146097)/7)*28+4383;146096);1461)/28+1)

--

Med venlig hilsen

Bjarne K.


0 new messages