< návrat zpět

MS Excel


Téma: Datum rss

Zaslal/a 27.3.2020 22:54

Ahoj,

Mám dotaz ohledně kalendářních dat a jejich převedení z formátu KT/RR na formát DD.MM.RRRR.

Přiklad:
mam v bunce A1 udaj 13/20 (13 - představuje kalendářní týden, 20 - představuje rok) a potřebuji to převést na běžný formát data tzn aby se mi v bunce A2 zobrazil datum 23.03.2020 (den pondělí).

Děkuji moc za rady

Zaslat odpověď >

#046304
avatar
ve VBA

Function JK_Pondeli(Tyden, Rok) As Date
Dim TheDate As Date
TheDate = DateSerial(Rok - 1, 12, 31) + 7 * (Tyden - 1) - Weekday(TheDate, vbMonday) + 2
JK_Pondeli = DateSerial(Year(TheDate), Month(TheDate), Day(TheDate))
End Functioncitovat
#046305
avatar
Dekuji za radu, ale bohužel ještě jsem se nenaučil v makrech, můžu poprosit o řešení pomocí vzorce?

Děkujicitovat
#046307
avatar
=DATUM((2000+ZPRAVA(C6;2))-1; 12; 31) + 7 * (ZLEVA(C6;NAJÍT("/";C6)-1)-1) - DENTÝDNE(0;2)+5

Edit:
záleží, jak jsou týdny číslovány
jestli 1. týden je týden, který obsahuje
a) 1. ledna - zde u některých roků může být i 54 týdnů
b) první lednový čtvrtek (ISO)citovat
#046314
avatar
Děkuji fungujecitovat
#046315
lugr
Já používá tohle. (viz příloha)

Také doporučuji první uvádět rok a to kvůli seřazení dat pokud máte data z více roků.

Snad Vám to bude k něčemu.
Příloha: xlsx46315_datum.xlsx (10kB, staženo 10x)
citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura III

Oblíbený formulář Faktura byl vylepšen a rozšířen. Formulář faktura III
Více se dočtete zde.

Aktivní diskuse

vyhledávací fce

simplynever • 30.5. 11:55

vyhledávací fce

marjankaj • 30.5. 10:48

vyhledávací fce

simplynever • 30.5. 10:42

vyhledávací fce

simplynever • 30.5. 10:29

Excel vytváření čárových kódů

Stalker • 30.5. 0:00

vyhledávací fce

mepexg • 29.5. 21:19

vyhledávací fce

elninoslov • 29.5. 21:04