Příspěvky uživatele
< návrat zpět
V podstatě to samé, co dal "a.mlady", akorát s tím rozdílem, že to vypíše jedinečné datumy a není tedy potřeba hledat ve sloupci A
(soubor je zmenšen, aby ho to tady pobralo max.248k)
Určitě by někdo mohl pomoci, ale pro toho člověka bude důležité znát formát vašich datumů a časů. A vůbec nejlepší je vzor vaši tabulky a do bunky, kde chcete výsledek/výsledky ho/je napíšete. O vzorce se už někdo jistě postará.
Něco jsem zkusil, asi to není přesně ono, ale třeba to napoví, jak počítat ty časy.
Než jsem se tu znovu podíval, Pavlus to napsal za mě. Přesně takto jsem to taky spáchal.
Něco takovýho ??
Udělal bych to bez události listu.
Cykluje to proto, protože Worksheet Change volá makra při každé změně na listu. Je třeba tuto událost po dobu vykonávání makra zakázat a to příkazem Application.EnableEvents= False.
Pak zase povolit (True). Vaše makra jsem nezkoumal a nepochopil, ale to není důležité. Nějaké řešení v příloze.
ty Goto ex je možné vyhodit.
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Select Case Range("K2")
Case 1: Call Makro1
Case 2: Call Makro2
Case 3: Call Makro3
Case 4: Call Makro4
Case 5: Call Makro5
End Select
Application.EnableEvents = True
End Sub
pro rozsah A1:A20 by to mohlo být třwba takto:
=COUNTIF(A1:A20;">"&0)
nebo
=COUNTIF(A1:A20;"<>"&0)
ev. pro řádek
=COUNTIF(A1:L1;"<>"&0)
Nevím, jestli je tohle to, co jste chtěl.
takto ještě s upravou pro stejný počet záporných
?
@elninoslov
jenom drobná oprava:
ne VLEVO ale ZLEVA
Domnívám se, že pro takto jednoduchou operaci není třeba kód. Vyfiltrovanou oblast označte, pak Ctrl+C a na nový list Ctrl+ V (uloží se jen vyfiltrovaná data) nebo uložit jinak, podle toho jak potřebujete.
Kdysi jsem něco podobného řešil, ale jinak. Do jednotlivých dnů bylo možné na směny vybírat pracovníky z rolovacích seznamů. Seznam pracovníků byl vlastně seznamem listů. V něm se ale ukazoval jen ten, kdo byl momentálně "volný". Bylo to jednodušší pro obsluhu. Každý pracovník měl svůj list, kde se automaticky vytvářela i pracovní docházka toho kterého dělníka.
takto ?
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