Jste zde: Úvodní stránka » excel » prakticke-priklady » ms-excel-rodne-cislo-na-datum
MS Excel - Převod rodného čísla na datum
Praktický příklad.
Úkol:
Převést rodné číslo na datum.
Postup při řešení
Řešení existuje větší množství, já vybral názornější, ať si procvičíme více různých funkcí včetně formátování buněk. Předpokládám znalosti z mnou již napsaných článků o funkcích, proto je již nebudu rozepisovat jen uvedu jejich konečnou podobu.
Jak funguje rodné číslo
Jde o 10-ti místné číslo (9-ti místné u lidí s datem narození do 1. 1. roku 1954), kde první dvě čísla jsou zkratkou roku narození, další dvě měsíce narození (u žen je přičteno navíc 50, u mužů někdy 20), další dvě pak jsou pro narozeninový den. No a poslední 4 čísla označují matriku a pořadové číslo narození ( u dříve narozených je koncovka pouze 3-místná).
Navíc rodné číslo má i kontrolní funkci, jelikož je dělitelné 11 beze zbytku.
Algoritmus řešení
(vycházíme z obrázku)
Bereme v úvahu, že nejmladší člověk bude narozen 1910 a nejstarší se bude moci narodit 2009 (pro širší okruh by se musela dodělat ještě jedna podmínka). Pro názornou ukázku toto postačí.
Postup:
- rozdělíme si rodné číslo na rok, měsíc, den... =ČÁST(B2;1;2)
- převedeme na číslo (viz článek o textových funkcích) =C2+0
- u roku zjistíme, zda se jedná již o rok 2000 (tj. bude tam 00-09), a vytvoříme správný rok (1910 – 2009) =KDYŽ(C3<9;C3+2000;C3)
- oddělíme měsíc =ČÁST(B2;3;2)
- zjistíme, jestli je to žena, když ano, odečteme 50, (žena má na třetím místě RČ 5 nebo 6)=ČÁST(B2;3;1) =KDYŽ(C6="0";1;KDYŽ(C6="1";1;2))
- vytvoříme měsíc (tady už budeme mít rovnou číslo)=KDYŽ(C7=1;C5;C5-50)
- oddělíme den=ČÁST(B2;5;2)
- vytvoříme den (ve formátu číslo)=C9+0
- naformátujeme buňku na datum (o formátování více v jiném článků) a sloučíme datum =DATUM(C4;C8;C10)
Hotovo!
A máme z rodného čísla datum narození.
Doplnění
Ještě by se měl algoritmus doplnit o možnost, že má někdo více než 100 let. U staršího člověka je jeho rodné číslo 9-ti místné, to bývalo do 1. 1. 1954. Ale to již si bez problému doprogramujete :) . Nezapomeňte na jednoduchou kontrolu, zda je RČ dělitelné 11!
Doporučení
K práci doporučuji originální Microsfot Excel 2007. Varianta pro studenty je za směšnou cenu. Jednotlivé příklady v Excelu jsou ke stažení zdarma. Ke studijním účelům je můžete využívat bezplatně. Pokud se rozhodnete pro komerční využítí prosím informujte mě.
Článek byl aktualizován: 14.01.2010 16:43
Další články k tématu
- Číselná řada - speciální
- Rodné číslo na datum - právě čtete
- Excel pro advokáty
- Výpočtový program
- Výpočet DPH
- Splátky úvěru graficky
Komentáře
Netop
Přidáno: 23.04.10 11:07
Zde jsem se pokusil udělat všechny kroky do jedné buňky. Za zdroj (RČ) je zde buňka dejme tomu B3. =DATUM((KDYŽ((ČÁST(B3;1;2)+0)<9;ČÁST(B3;1;2)+2000;ČÁST(B3;1;2)+1900));KDYŽ(((ČÁST(B3;3;2)+0)>12);(ČÁST(B3;3;2)-50);(ČÁST(B3;3;2)+0));(ČÁST(B3;5;2)+0))
Pavel Lasák
Přidáno: 23.04.10 19:20
To Netop: Děkuji, za sloučení. Osobně slučování nemám moc rád špatně se v tom hledají chyby.
Karel
Přidáno: 22.07.10 15:27
Moc děkuji za vzoreček, ani nevíte, jak jste mi ulehčili práci
Jana
Přidáno: 05.09.11 11:34
Nevěděl byste jak vytvořit v excelu pomocí funkcí rodné číslo z datumu narození?
Pavel Lasák
Přidáno: 05.09.11 15:58
To Jana: Rodné číslo pouze z data narození vytvořit nelze. Poslední 4 číslice předpokládám jsou kódem nemocnice a pořadí narození.
honza
Přidáno: 29.11.11 16:02
díky, dlouho jsem hledal funkci, která vyzobe urcita cisla z rady. jen nevím, jak najit funkci CAST na anglicke verzi excelu.
Pavel Lasák
Přidáno: 29.11.11 17:58
To Honza: stačí se podívat na seznam Excel funkce CZ - EN takže ČÁST - MID
honza
Přidáno: 30.11.11 11:26
jo, díky, už jsem na to přišel :-)vzorec mi funguje, jestli mohu druhou otazku, chci vytvorit tabulku, vkladat smeny, treba mam nocni od 18:00 do 05:30, a chci aby mi to pocitalo kolik hodin, ciselně, bylo odpracovano. je to možné?
Pavel Lasák
Přidáno: 30.11.11 17:59
To Honza: Viz články o datu a času: Datum a čas funkce v MS Excelu - teorie a následující články MS Excel funkce - datum a čas a pár praktických příkladů MS Excel funkce - datum a čas prakticky
joj
Přidáno: 09.01.12 09:20
hej guys nevite jak z data udelat rodné číslo ? to už tak chytrý nejste co ? :D
Pavel Lasák
Přidáno: 09.01.12 18:40
To joj: Jak už jsem psal z data rodné číslo neuděláte, poslední 4-číslí (3-číslí u starších ročníků) je kombinace nemocnice a pořadí narození, tak aby výsledné rodné číslo odpovídalo normě. (tj. rodné číslo upravuje zákon č. 133/2000 Sb. o evidenci obyvatel a rodných číslech v platném znění.)
st
Přidáno: 18.01.12 14:52
Chtěl bych se zeptat pomocí jaké funkce např. z čísla 256 800 odvodím kolik se do toho vleze "pětistovek",200,100 apod. Díky moc .-)
Pavel Lasák
Přidáno: 18.01.12 15:57
To st: Jedna funkce na to není, kombinace funkcí, Přes KDYŽ zjistit zda max částka 5.000 je dělitelá (např. pro částku 2.300) nelze použít, dělení, zaokrouhlit. Zaokrouhleným číslem vynásobit. např. 1.000, od čáskty odečíst. Bude zbytek a u zbytku zjitit čásku pro dělení...
Haken
Přidáno: 29.04.12 11:23
Ahoj díky moc za pomoc..:D ale potřeboval bych to ještě udělat tak aby se mi to zapisovalo tak žě to bude třeba: 35 let 4 měsíce 12 dní .... neíte náhodou jak na to??:)) předem děkuju!!:))
Pavel Lasák
Přidáno: 29.04.12 21:01
To Haken: Nahodou vím jak na to :), a povím :)
Do B13 vložit aktuální datum:
=DNES()
Do B14 - tj.počet let
=DATEDIF(C3;C4;"y")
B15 počet měsícu
=DATEDIF(C3;C4;"ym")
B16 a dnů
=DATEDIF(C3;C4;"md")
atd..
Poznámka počet všech dnů by byl
=DATEDIF(C3;C4;"d")
Přidání nového komentáře
Za obsah komentářů neodpovídám, jelikož jsou komentáře publikovány ihned po jejich napsání čtenářem. Toto nemohu nijak ovlivnit. Přesto si vyhrazuji možnost jakýkoli neslušný komentář smazat bez udání důvodu.
Nejnovější článek
Z článku o
excel jsem jako poslední přidal či upravil článek
21.05.2012:
Zrychlení kódu ve VBA - Excel.
Nejčtenější článek
Excel
- Základy MS Excel
- menu Soubor
- Formát dat
- Vložit
- Grafy
- Vzorce (Funkce)
- Matice
- Data
- Revize (Nástroje)
- VBA Úvod a seznamy článků
- VBA Teorie základy
- VBA Buňky cell
- VBA Listy sheet
- VBA Práce se soubory
- VBA Formuláře (UserForm)
- VBA Grafy
- VBA Application
- VBA Pás karet, Menu
- VBA Triky
- VBA praktické příklady kódu
- Praktické příklady
- Finanční poradce
- Šablony - Templates
- Testy
- Ostatní
Google+
Novinky
Matematické rovnice (vzorce) - Word 2010
Excel: 21.05.2012:
Zrychlení kódu ve VBA - Excel
Access: 28.04.2012:
VBA - Jak spustit v MS Access
Power Point: 25.04.2012:
SmartArt - PowerPoint 2010
Outlook 26.04.2012:
Outlook 2010 - jak vypadá
Project: 05.04.2012:
Kalendář ukázka
OneNote: 17.10.2010:
OneNote 2010 – popis obrazovky
Office 30.04.2012:
Kde hledat odpovědi na dotazy o MS Office
Poděkování
Translate
Stránky o MS Office produktu společnosti Micosoft. Neslouží jako technická podpora.
| Email na autora: lasak@centrum.cz | Copyright © : Pavel a Danka 2006 - 2012 |
| Doporučuji: Advokátní kancelář Brno - Dana Lasáková |
14869
Tento web zatím neprošel jazykovou korekturou. Beta verze redakčního systému.