< návrat zpět

MS Excel


Téma: Barva záložky rss

Zaslal/a 5.4.2017 12:50

Dobrý den
rád bych si ulehčil práci :-)
Dle splnění podmínky v listu se mi zabarvi jeho název (ouško).
Vysvětleno v příloze.
Děkuji

Příloha: xlsx35934_barva_zalozky.xlsx (13kB, staženo 44x)
Zaslat odpověď >

Strana:  1 2   další »
#035936
avatar
počet řádků je ruzný a poslední řádek(řádky) je jiný...citovat
#035945
elninoslov
Inak povedané, nie je možné spoľahlivo určiť, v ktorom liste sa bude skúmať aká oblasť. Ak by ste mal tie oblasti vždy rovnaké, tak napr.:
Sub Kontrola()
Dim SH As Worksheet, Polozka As Range, Pocet As Byte
For Each SH In Worksheets
With SH
Pocet = 0
For Each Polozka In .Cells(2, 2).Resize(13, 1).Cells
Pocet = Pocet + ((Not IsEmpty(Polozka.Offset(0, 1).MergeArea.Cells(1))) And 1)
Next Polozka
Select Case Pocet
Case 13: .Tab.Color = vbGreen
Case 12: .Tab.Color = vbYellow
Case Else: .Tab.ColorIndex = xlColorIndexNone
End Select
End With
Next SH
Set Polozka = Nothing: Set SH = Nothing
End Sub

Ak tie oblasti rovnaké nemáte, dodajte, čo je smerodajné, pre určenie počtu riadkov. Napr. prvý vzorec v niektorom stĺpci ? Alebo niekde v liste je počet položiek ? ...citovat
#035946
avatar
díky za reakci, těch řádků nikdy nebude moc. Jednodušší bude je na začátku zadat někam do proměnné (nějaká vyčleněná buNka. bude to vždy stejný sloupec "C". Problém /asi/ budou sloučené buňky..?citovat
#035948
Stalker
Ahoj, trochu sem upravil elninoslovuv kód. Na každém listě se zjišťuje poslední vyplněný řádek ve sloupci B a podle toho se nastavuje kontrolovaná oblast.
Vyzkoušej.
Příloha: zip35948_barva_zalozky.zip (18kB, staženo 31x)
citovat
#035956
avatar
To stalker:
Nefunguje. Jak je napsáno v sešitě
pokud je vše v řádku 2-14 (sl.c) splněno bude barva záložky zelená
Nezajímá mě jiný sloupec a nezajímají mne všechny řádky. několik posledních řádků je nedůležitých. Na první záložce zjišťuji pouze řádky 2-14 (tam kde je datum nebo "datum". V buňce např. G1 budu mít poznamenáno že poslední "zajimavý" řádek je 14 a z toho vycházet.citovat
#035959
elninoslov
Predpokladajme, že za splnené pokladáme ak je v stĺpci "splněno" napísané čokoľvek - teda bunka nieje prázdna. Lebo inak, ak by tam mohli byť aj iné texty popísané, ale neznamenali by, že je splnené, tak by zisťovania neznámeho dátumu v neznámom počte ks, neznámeho formátu, neznámo čím oddelených medzi neznámym iným textom, bolo takmer nemožné.
Příloha: zip35959_barva_zalozky.zip (17kB, staženo 29x)
citovat
#035960
avatar
ano, pokud je ve sloupci "splněno" napsáno cokoliv (vetšinou datum) je splněno. Ale elninoslov, nefunguje to. Pokud smažu v List1 datum ve sloučené C3(4,5) mám tedy 1 nesplněný úkol = žlutá záložka. Ale ted je šedá.. :-(citovat
#035961
avatar
Pokud by tam nebyly sloučené buňky asi bych to zvládnul.. (Not IsEmty A1 * Not IsEmty A2*Not IsEmty A2) se musí rovna 1 a pak je to OK. //ideový navrh :-) //
ALE ty sloučené...citovat
#035963
elninoslov
Ahá, no jasné už viem. Keď niekedy poobede prídem, tak Vám na to mrknem.citovat
#035965
elninoslov
Jednoduchší variant, počíta rozdiel medzi vyplnenými bunkami "por číslo" a "splněno".
Příloha: zip35965_barva_zalozky.zip (17kB, staženo 40x)
citovat

Strana:  1 2   další »

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