< návrat zpět

MS Excel


Téma: Vyhledani stejnych rss

Zaslal/a 27.11.2010 0:33

Prijemny vecer, mel by nekdo napad jak vyhledata oznacit po sobe jdouci bunky se stejnou hodnotou v urcitem poctu. Treba 8 a vice bunek s hodnotou 1.Predem dekuji za napady. S pranim at se prace dari.

Zaslat odpověď >

#003325
Stalker
Tomuto přání by mělo vyhovovat podmíněné formátovánícitovat
#003327
avatar
Určitě se to může udělat makrem. Je ale skutečností, že makra ve VBA jsou jen interpretovaný jazyk. Takže nejlepší je použít vestavěné vzorce. Zkus třeba
C2 =KDYŽ(A(STEJNÉ(A1;A2);STEJNÉ(B1;B2));A2;"")
Porovnáváš 2 + 2 buňky na shodu, pokud je shoda pak ve sloupci C bude obsah ze sloupce A. Můžeš to různě modifikovat.
Pokud Tě zajímá jen ten počet, pak použij funkci COUNTIF(sloupec_nebo_oblast; co_hledat)
R.citovat
#003328
avatar
Dekuji za odpoved, myslel jsem si ze to pujde tez timto zpusobem. Ale nejde. Zpresnim dotaz. Jde mi o to, ze mam v jednom radku cca ve 4000 sloupcich hodnoty. Potrebuji najit bunky ktere maji hodnotu 1 a jsou za sebou v poctu min. 10 a vice... (tedy vyhledavam a onacuji min. 10 a vice neomezene bunek v jednom radku jdoucich po sobe a obsahujici stajnou hodnotu=1). Coz bohuzel nespravim asi ani poronavanim, neb bych musel nadefinovat vsechny moznsti.. coz je hodne. Jeste jednou dekuji za prispevky a budu rad za jakoukoliv radu. Dekujicitovat
#003351
avatar
Krasny vecer vsem, jak to tak vypada, tak nikoho asi nic nenapada.. bohuzel.. Budu rad opravdu za jakykoliv napad, ktery by smeroval k vysledku. :-) A jeste jeden dotaz, zaregistroval jsem se, ale email ohledne potvrzeni registrace nedosel.. neni ani ve spamu.. kde muze byt chyba? A priori u me, vim...druha moznost :-)citovat
#003353
avatar
Znamená to, že hodnoty nesmíš setřídit ??? Hodnoty jsou různé, takže např 123 může být ve sloupci v několika shlucích v různých počtech a Tebe zajímají shluky kde počet hodnot je větší než 10 ???????

Pokud ANO pak by mohlo stačit toto makro
Předpokladem je označená oblast a hodnoty se zapisují vpravo ležících dvou sloupců.

Sub oznac()
Dim citac As Long
Dim C As Range
Dim TestValue As Long
TestValue = -1
citac = 1
For Each C In Selection
If TestValue <> -1 Then
If TestValue = C.Value Then
citac = citac + 1
Else
If citac >= 10 Then
C.Offset(-1, 1).Value = TestValue
C.Offset(-1, 2).Value = citac
citac = 1
TestValue = C.Value
End If
citac = 1
TestValue = C.Value
End If
Else
TestValue = C.Value
End If
Next C
End Sub
citovat
#003355
avatar
Tak a ted jsem trosku mimo ja. :-)Makro nejak dela neco a ja nevim co. :-) Znamena to, ze hledam urcitou hodnotu(cislo) ktere se opakuje a chci jej oznacit treba zlute, abych jej v tak vysokem poctu nasel. Priklad Excel: v 1. radku mam vedle sebe v sloupci B az K vzdy hodnotu 0. To jest celkem 10 krat hodnotu 0, ktera je obsazena v bunkach jdoucich v radku za sebou. A ja potrebuji vyhledat tyto bunky... kterych je min 10 dle zhora uvedeno...ale muze jich byt az treba 3000. Podminka je. minimalne 10 bubek jdoucich za sebou s hodnotou nula (ne prazdnych, ale s 0)nebo vice nez 10 jdoucich za sebou neprerusovane jinou ciselnou hodnotou. Snad jsem to vysvetlil lepe. A tyto bunky oznacit barevne, aby byly videt. Nic nescitat a nikam nepsat vysledky.. jen je oznacit. :-) Vim neni to se mnou jednoduche.. prsto moc dekuji za Vase snahy a pomoc. At se Vam prace dari.citovat
#003356
avatar
3000 buněk vedle sebe ??? ... no toto je napsané na buňky podsebou. Pokud Ti vadí, že Ti to napíše vedle hodnotu o kterou se jedná a počet výskytu , tak to přepiš na

C.Offset(-1, 1).Value = TestValue
C.Offset(-1, 2).Value = citac
na
C.Offset(-1, 0).Interior.ColorIndex = 34

Nechceš to nejdříve vyzkoušet podsebou ... používá se na to TRANSPONOVAT.
R.citovat

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09