Příspěvky uživatele
< návrat zpět
Děkuji pánové.
Ale upřímně se přiznám, že je to na mě složité.
Ještě jsem dostal toto řešení, ale je pravda, že jsem nepsal, že bych chtěl makra.
Ale prý se ta fce dá nahrát, jako doplněk nebo mít ji součástí sešitu.
Function PROHLEDEJ(sCo As String, oblast As Range)
Dim cell As Range
Dim retezec, nalez As String
If Len(sCo) = 0 Then Exit Function
For Each cell In oblast
If Len(cell) > 0 Then
If InStr(sCo, cell) <> 0 Then
PROHLEDEJ = 1
Exit Function
End If
End If
Next cell
PROHLEDEJ = 0
End Function
a pak se použije například toto (funguje i s Tabulkou dat - phm, oděv atd. na jiném listu ve formátu Tabulky):
=PROHLEDEJ(A2;$I$3:$I$8)
(v oblasti $I$3:$I$8 jsou ta data, která se hledají)
Děkuji.
Zkusil jsem první nematicový a vypadá to, že to bude dělat to, co potřebuji.
Ještě, kdyby se dalo tohle:
{"*phm*";"*nafta*";"*oděv*";"*prac*";"*obuv*"}
Nějak nahradit tak, že bych měl někde na jiném listu pod sebou napsané ty hledané řetězce:
phm
nafta
oděv
prac
obuv
(třeba prvním sloupci Tabulky, aby byl dynamický rozsah) a ono by se to prohledalo všechno, respektive bych jen editoval (přidával nebo ubíral řetězce) tu tabulku a nemusel bych editovat vzorec.
Ale i tak každopádně děkuji.
Dobrý den, chci se zeptat, zda je funkcí NEBO nebo nějakou funkcí řešitelné toto.
Ve sloupci "M" mám v každém řádku různé texty.
Já vím, že bych potřeboval zjistit, zda se vždy na daném řádku v daném sloupci "M" nachází některý z těchto textových řetězců:
phm
nafta
oděv
prac
obuv
Ale nikdy nevím, jestli je na začátku nebo na konci nebo uprostřed textového řetězce v buňce.
Zkoušel jsem to takto a nefunguje mi to:
=NEBO(M2="*nafta*";M2="*phm*";M2="*prac*";M2="*obuv*";M2="*oděv*")
Vždy mi to vyhodnotí jako NEPRAVDA.
Můžete mi prosím někdo poradit?
Děkuji.
@eLCHa
To funguje.
@marjanka
to mi nefungovalo.
už aby fungovala ta fce MAXIFS, to by bylo hned vyřešené.
Každopádně děkuji oběma za pomoc.
Děkuji. Návod dobrý.
Ale nedokážu do toho vzorce {=MAX(KDYŽ(B:B="B";C:C))} dostat to, že ve sloupci "kod" je v každém řádku jiný kód nebo se opakuje a já potřebuji vyhledat u všech stejných kódů roky ve sloupci "rok" a tam najít maximum a tu hodnotu maxima pak zapsat do sloupce "rok1" u všech stejných kódů.
Tu funkci MAXIFS bohužel nemám a ta by asi na to byla ideální.
Dobrý den všem. Chtěl bych požádat o pomoc při řešení, ideálně pomocí vzorce.
Zdrojová data mám ve formě Tabulky.
V prvním sloupci je kód a ve druhém sloupci je vždy v příslušném řádku u kódu hodnota (rok).
Ty kódy se na řádcích mohou opakovat.
Já bych potřeboval, aby se vždycky "zkontrolovaly" ty kódy a u nich příslušné roky a vždycky u stejného kódy by se našlo maximum (ten maximální rok) a ten by se pak doplnil ve třetím sloupci (rok1) u VŠECH ŘÁDKŮ, KDE BY BYL STEJNÝ KÓD V PRVNÍM SLOUPCI.
Kdybych je chtěl sčítat tak bych například použil funkci SUMIFS, ale to maximum neumím.
Děkuji
Tak jsem použil postup dle odkazů a zafungovalo.
Přílohou posílám odkaz a stažený soubor, který se naimportuje.
Nemohu přiložit, jak velkou mohu přiložit přílohu. Moje má velikost 732 kb...
Teď už mi to makro funguje v pohodě.
Děkuji všem za pomoc.
Dobrý den všem, známý mi připravil zpracování pomocí maker a když jsme to nasadili na "stroj", kde je Excel 2016, tak to hází chybu u datepicker, protože ho nezná.
Můžete mi nějak poradit, jak tuto chybu odstranit?
Na mém "stroji", kde mám Excel 2015 to chodí bez problémů.
Děkuji.
Díky 
Mohl byste mi někdo, prosím, upravit to makro tak, aby to vymazalo na všech listech v otevřeném sešitu.
Sub Vymaz_nezamcene_bunky()
For Each c In ActiveSheet.UsedRange
If c.Locked = False Then c.Value = ""
Next
End Sub
Děkuji.
To je pravda
Nemáte někdo něco k dispozici? Díky
Já potřeboval makro, protože je pro mě jednodušší jim říct, že mají kliknout na tlačítko, než jim vysvětlovat nějaké postupy..
Pánové, děkuji všem.
Nejdřív jsem použil ten poslední nápad od Jeza.m a ten funguje.
Ještě jednou díky.
nic to neudělá. Mám to takto:
Sub Vymaz_nezamcene_bunky()
For Each c In ActiveSheet.UsedRange
If c.Locked = False Then c = ""
Next
End Sub
Uživatelské menu
\nMenu
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Helios iNuvio
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.
RSS nejnovější články