• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: textové hledání

Zaslal/a PavDD 27.10.2022 20:10

Zdravím
mám v buňce: Příjmení Jméno
Potřebuji vycucnout Celé příjmení a první dva písmena z jména.
Př:
Novák Petr - NovákPe
Mládek Ivan - MládekIv

a pak ještě jeden vzorec :

Přidat k výsledku NovákPe , text : Test_Q

Děkuji

Zaslat odpověď >

---

Strana:  1 2   další »

elninoslov(27.10.2022 20:29)#053724

Napr. (to sa dá nakombinovať viacero textových funkcií)
=REPLACE(A1;SEARCH(" ";A1);LEN(A1);MID(A1;SEARCH(" ";A1)+1;2)&"Test_Q")
=NAHRADIT(A1;HLEDAT(" ";A1);DÉLKA(A1);ČÁST(A1;HLEDAT(" ";A1)+1;2)&"Test_Q")citovat

Stalker(27.10.2022 20:30)#053725

=DOSADIT(ZLEVA(A1;HLEDAT(" ";A1)+2);" ";"")

=DOSADIT(ZLEVA(A1;HLEDAT(" ";A1)+2);" ";"")&" Test_Q"citovat

elninoslov(27.10.2022 20:38)#053726

Výborný nápad. Premýšľal som ako sa zbaviť toho jedného hľadania...citovat

PavDD(27.10.2022 20:41)#053727

děkuji, furt se ztrácím v těch kombinacích nekolika fukcní
Hezký večercitovat

PavDD(27.10.2022 22:05)#053728

a když to budu chtít doplnit pomocí VBA?
to musí být asi anglicky, a uvozovky nahrazené ' ?

např:
Sheets("list1").Range("AC" & j).Value = "=DOSADIT(ZLEVA(B3;HLEDAT(' ';B3)+2);' ';'')&'_Test_Q"


=DOSADIT(left(A1;find(" ";A1)+2);" ";"")&" Test_Q"

?citovat

PavDD(27.10.2022 22:07)#053729

...mám na mysli doplnit ten vzorec do bunky v list1citovat

Stalker(27.10.2022 22:51)#053730

Na tohle je super záznamník maker.
Takto vypadá vzorec pro výsledek ve sloupci B a hodnotu čerpanou ze sloupce A

ActiveCell.FormulaR1C1 = "=SUBSTITUTE(LEFT(RC[-1],SEARCH("" "",RC[-1])+2),"" "","""")&"" Test_Q"""citovat

PavDD(27.10.2022 22:57)#053731

a lze vložit ten vzorec do bunky, s tím, že zaměním adresu bunky A1 /statická/ , za adresu která obsahuje proměnnou j, což je rádek, tzn
j= třeba 5 tak to bude A5

potřebuju totiž vzorec vkládat do bunky, když data kopíruju odjinud a tam všude používám proměnnou j = řádekcitovat

PavDD(27.10.2022 23:00)#053732

jako např:
j=5
Range("D1").FormulaLocal = "=DOSADIT(ZLEVA(A & 2;HLEDAT("" "";A & 2)+2);"" "";"""")&"" Test_Q"" "

ale to nefuguje, neumím to napsatcitovat

PavDD(27.10.2022 23:01)#053733

pardon:

Range("D1").FormulaLocal = "=DOSADIT(ZLEVA(A & j;HLEDAT("" "";A & j)+2);"" "";"""")&"" Test_Q"" "citovat

Strana:  1 2   další »

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse