Prosím o radu.
V buňce je:
MarieHoráková
jaký vzorec použít, když chci mít opět v jedné buňce:
Marie Horáková
Nemůžu na to přijít:(
Děkuji moc!M.
Excel - rozdělení JmenoPrijmeni podle velkého písmena
-
- nováček
- Příspěvky: 3
- Registrován: únor 18
- Pohlaví:
- Stav:
Offline
- elninoslov
- Level 2.5
- Příspěvky: 373
- Registrován: červen 13
- Pohlaví:
- Stav:
Offline
Re: Excel - rozdělení JmenoPrijmeni podle velkého písmena
Pr.
- Přílohy
-
- Pridanie medzery k menu.xlsx
- (8.68 KiB) Staženo 48 x
Re: Excel - rozdělení JmenoPrijmeni podle velkého písmena
Na mapu znaků do čísla 96 bych tedy nespoléhal. Na jména začínající na písmeno s interpunkcí (např. Ženožičková) to nefugnuje. A teké to funguje jen na jedno jméno a jedno příjmení. Znám paní co má prostřední jméno Živa.
Dodatečně přidáno po 2 minutách 20 vteřinách:
Jediné co mě napadlo, je brát písmenko po písmenku a funkcí "VELKÁ" převést písmeno na velké, a porovnat funkcí "STEJNÉ" s původním. Pokud se rovná, tak před něj vložit mezeru.
Dodatečně přidáno po 2 minutách 20 vteřinách:
Jediné co mě napadlo, je brát písmenko po písmenku a funkcí "VELKÁ" převést písmeno na velké, a porovnat funkcí "STEJNÉ" s původním. Pokud se rovná, tak před něj vložit mezeru.
Naposledy upravil(a) atari dne 02 úno 2018 18:24, celkem upraveno 1 x.
- elninoslov
- Level 2.5
- Příspěvky: 373
- Registrován: červen 13
- Pohlaví:
- Stav:
Offline
Re: Excel - rozdělení JmenoPrijmeni podle velkého písmena
Výborný postreh, ešte na to neskôr tiež pozriem.
EDIT: Na spomenutý námet od atari:
Ale je to iba na dvojslovné mená.
EDIT: Na spomenutý námet od atari:
Kód: Vybrat vše
=IFERROR(REPLACE(A1;MATCH(TRUE;EXACT(UPPER(MID(A1;ROW($A$2:INDEX($A:$A;LEN(A1)));1));MID(A1;ROW($A$2:INDEX($A:$A;LEN(A1)));1));0);1;MID(A1;MATCH(TRUE;EXACT(UPPER(MID(A1;ROW($A$2:INDEX($A:$A;LEN(A1)));1));MID(A1;ROW($A$2:INDEX($A:$A;LEN(A1)));1));0);1)&" ");A1)
Ale je to iba na dvojslovné mená.
-
- nováček
- Příspěvky: 3
- Registrován: únor 18
- Pohlaví:
- Stav:
Offline
Re: Excel - rozdělení JmenoPrijmeni podle velkého písmena
Dekuji moc! Ano, potrebuju dvojslovne jmena...
Prave mi vznikl problem s ceskymi hacky...nekde to bralo, jinde ne.
Diky moc
Prave mi vznikl problem s ceskymi hacky...nekde to bralo, jinde ne.
Diky moc
Re: Excel - rozdělení JmenoPrijmeni podle velkého písmena
Tak ty Tvoje vzorce jsou mozkový "masakr". Tenhle druhý už neumím dekodovat. A rozkládat to, na to nemám čas. Ale je tam někde chyba. Ty jmnéna to nerozhodí.
- elninoslov
- Level 2.5
- Příspěvky: 373
- Registrován: červen 13
- Pohlaví:
- Stav:
Offline
Re: Excel - rozdělení JmenoPrijmeni podle velkého písmena
Pridal som ešte TRIM/PROČISTIT aby sa to vysporiadalo, aj s tým ak je meno korektne zapísané a nepridávalo tam druhú medzeru. Inak dajte príklad mena, ktorý nefunguje, mňa nič nenapadá. A dávate to ako maticový vzorec (Ctrl+Shift+Enter) ?
EDIT:
A ešte príklad UDF, ktorý nemá problém s viac slovami:
EDIT:
A ešte príklad UDF, ktorý nemá problém s viac slovami:
Kód: Vybrat vše
Function ROZDEL_MENO(Meno As String) As String
Dim UMeno As String, i As Long, Znak As String * 1, Medzera As String
If Len(Meno) = 0 Then Exit Function
ROZDEL_MENO = Mid$(Meno, 1, 1)
UMeno = UCase(Meno)
For i = 2 To Len(Meno)
Medzera = vbNullString
Znak = Mid$(Meno, i, 1)
If Znak <> " " Then
If Znak = Mid$(UMeno, i, 1) Then
Medzera = IIf(Mid$(Meno, i - 1, 1) <> " ", " ", vbNullString)
End If
End If
ROZDEL_MENO = ROZDEL_MENO & Medzera & Znak
Next i
End Function
- Přílohy
-
- Pridanie medzery k menu.xlsx
- (9.27 KiB) Staženo 28 x
-
- nováček
- Příspěvky: 3
- Registrován: únor 18
- Pohlaví:
- Stav:
Offline
Re: Excel - rozdělení JmenoPrijmeni podle velkého písmena
Děkuji děkuji moc!! Tohle zafungovalo výborně.
- elninoslov
- Level 2.5
- Příspěvky: 373
- Registrován: červen 13
- Pohlaví:
- Stav:
Offline
Re: Excel - rozdělení JmenoPrijmeni podle velkého písmena
Ani omylom to nieje dokonalé, lebo mená môžu mať aj komplikované tvary "bez pravidiel":
Rafael van der Vaart
Leonardo DiCaprio
Ángel Di María
John von Neumann
...
Rafael van der Vaart
Leonardo DiCaprio
Ángel Di María
John von Neumann
...
Re: Excel - rozdělení JmenoPrijmeni podle velkého písmena
@ elninoslov
Lze to snadno zjednodušit:
(Funkce REPLACE umí také vkládat.)
Lze to snadno zjednodušit:
Kód: Vybrat vše
=IFERROR(PROČISTIT(NAHRADIT(A1;POZVYHLEDAT(PRAVDA;STEJNÉ(VELKÁ(ČÁST(A1;ŘÁDEK($A$2:INDEX($A:$A;DÉLKA(A1)));1));ČÁST(A1;ŘÁDEK($A$2:INDEX($A:$A;DÉLKA(A1)));1));0)+1;0;" "));A1)
(Funkce REPLACE umí také vkládat.)
- elninoslov
- Level 2.5
- Příspěvky: 373
- Registrován: červen 13
- Pohlaví:
- Stav:
Offline
Re: Excel - rozdělení JmenoPrijmeni podle velkého písmena
Použiť dĺžku 0 je vynikajúci nápad! Ušetrí to celý jeden výpočet. Paráda, to by ma nenapadlo...
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 16
- 8420
-
od mirekol
Zobrazit poslední příspěvek
20 říj 2023 08:31
-
- 3
- 1692
-
od mmmartin
Zobrazit poslední příspěvek
28 kvě 2024 23:45
-
-
Excel komparacedvou soborů Příloha(y)
od teichmann.ondrej » 15 dub 2024 17:26 » v Kancelářské balíky - 11
- 4736
-
od teichmann.ondrej
Zobrazit poslední příspěvek
22 dub 2024 15:45
-
-
- 1
- 1584
-
od Grimm
Zobrazit poslední příspěvek
12 bře 2024 21:43
-
- 3
- 3229
-
od Story-Long
Zobrazit poslední příspěvek
14 srp 2023 10:11
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 5 hostů