Příspěvky uživatele

Zatím to vypadá dobře :-) Já dnes koukal na ten kód a už jsem si dokonce upravil, aby to šlapalo pokud se změní počet řádek u dne (zjistí se , že se odečte poslední řádek u sloupce C - B + 1). Ale byl jste rychlejší :-) Příští týden na to kouknu. Jinak ten popis je úžasnej to stačilo stručně (občas něco naprogramuju v php takže neznám ty vyloženě VBA funkce) :-)
Ještě taková blbost mě napadla nevím jestli to můžu napsat sem. Lze zalomit datum ve sloupci B? Pokud chci trvale zalomit nějaký text v buňce tak jsem to řešil vložením znaku odstavce místo mezery. V tomto případě to ale nefunguje, protože to je změněné ve formátu buňky. Díky moc.

Teoreticky to šlape tak jak jsem si představoval. ALE:

Zapoměl jsem doplnit, že počet řádků ve dni si může uživatel měnit a i jména mohou přibývat a ubývat (to ale nebude problém). Počet řadků ve dni = počet sloučených řádků u dní ve sloupci B.

Šlo by tam zakomponovat aby to přidávalo jen pracovní dni? Byl by možný stručný komentář ve VBA kódu? Díky

Dobrý den,
protože jsem neznalec VBA potřeboval bych doprogramovat tlačítka na listu. Tlačítko "+ den" by zkopírovalo řádky včetně formátování a hodnot z posledního dne a vložilo by je nakonec seznamu. Datum by se zvýšilo o další pracovní den a týden by se vypočetl z data. Tlačítko "+ týden" by udělalo to "samé". Zkopírovalo by poslední den a vytvořilo by nové dny na další týden.
Bylo ty to možné nebo je to nereálné?

Předem děkuji

Díky za vysvětlení. Ty pomocné proměnné ani nepotřebuju, už jsem to snad pochopil :-) Rozšířit o další sloupce si to už taky dovedu sám, datumové sloupce je ještě navíc potřeba prohnat podmínkou na převod na číslo a text...

Ještě jednou díky

Tak jsem na to makro zběžně koukal. Celkem jsem to pochopil jak to funguje až na tohle:

If x = 4 Then dat = CStr(CDbl(UF(y, (x - 1) * 2 + 2))) Else dat = UF(y, (x - 1) * 2 + 2)
FF(y, x) = IIf(IsEmpty(UF(y, (x - 1) * 2 + 1)), IIf(IsEmpty(UF(y, (x - 1) * 2 + 2)), Empty, "=" & dat), UF(y, (x - 1) * 2 + 1) & IIf(IsEmpty(UF(y, (x - 1) * 2 + 2)), Empty, dat))

... tím se setaví vyhledávací řetězec z tabulky zadaných hodnot, ale ty funkce opravdu neznám...

UF = hodnoty proměnných pro vyhledání ?
FF = ?

..stačí stručně :-))

To načítání z jiných souborů pusťte z hlavy akorát by to bylo dost složitý, zase jich není tolik (řádově do pěti).

Tohle vaše řešení vypadá dobře a docela jsem to pochopil včetne VBA kódu i když v něm nedělám, takže si to i eventuelně přizpůsobím. Volání "call filter" na kliknutí listu nebo změně filtru plně vyhovuje.
Ještě mi není jasné co napsat do filtru když budu chtít vybrat řádky kde je např. "datum > 1.1.2016". A ještě jedna věc mě napadla když bude více zdrojových souborů aby se výsledky načítali do jednoho listu (do buněk by se napsaly cesty k souborům a z těch by se načetly data)?

Počet řádek v jednotlivých listech je různý tak jak se data dopisují, počet listů taktéž. Podmínka je např. datum="", vek>30. Ten věk bych chtěl zadávat uživatelsky z buňky aby se dal měnit a makro si ho přebralo z té buňky.
Lze to udělat aniž by se muselo mačkat tlačítko a data se měnily interaktivně ihned po změně v listech?

Ty data se neustále mění a musí zůstat na těch listech zvlášť tak jak jsou. Na tom novém listu by se zobrazovali aktuálně vyhovující data ze zdrojových listů...

Dobrý den,
mám tabulku s více listy a stejným formátem dat. Záznamy, které vyhovují určitým podmínkám by jsem chtěl zobrazit zvlášť v novém listu kde by byly vidět všechny data pohromadě ze všech listů (podobně jako filtrování dat v rámci jednoho listu). Jak na to?

Díky za tipy

Tak tohle jsem vůbec netušil, že tojde tahle. Viděl jsem např. řešení ve VBA na svátky včetně velikonočního pondělí dle platného ISO. Už jsem to jednou řešil tak, že všechny svátky jsem porovnal ze seznamem svátků, který byl vypsaný zvlášť včetně velikonoc. Takhle odpadá vypisovat velikonoce na x roků dopředu. Takže klobouk dolů.

Díky za vysvětlení. Zatím jsem na to koukal jen zběžně tak až bude trochu času tak to musím prostudovat, hlavně to s tou "fintou" 15 minut. Ještě mi tam zbývá dodělat svátky kde bude stejná sazba jako o víkendu, ale to už bude hračka.
Kdyby mi nebylo něco jasný tak bych se ozval. Každopádně díky za tvůj čas strávený tímto zdánlivě jednoduchým úkolem.

Tak tomuhle říkám vzorečky :-) Ne že bych nedělal složitý, akorát musím prostudovat co který dělá. Vemu to tedy postupně.

Tomuhle rozumím:
ZPracDob - zjistí začátek pracovní doby
KPracDob - zjistí začátek pracovní doby
Castka - spočte výslednou sumu
SazVPD - zjistí sazbu v pracovní době
SazMPD - zjistí sazbu v mimopracovní době
PoPD - zjisti počet minut, které jsou mimo pracovní dobu
PredPD - zjisti počet minut, které jsou před pracovní dobou

A tomuhle moc ne:
CPoPD - zjistí počet minut, pro které se bude počítat sazba za mimo pracovní dobu
CVPD - zjistí počet minut, pro které se bude počítat sazba v pracovní době
PoPD15M - zjistí počet započatých čtvrthodin po pracovní době
PredPD15M - zjistí počet započatých čtvrthodin před pracovní dobou
VPD15M - zjistí počet započatých čtvrthodin v pracovní době

Mohl by jsi to trochu slovně rozvést jak to v principu počítá?

Jinak samozřejmě velice děkuji za ochotu moc jsi mi pomohl.

"Rozpísal som tam ten prípad, keď 6-ta 15 minútovka začína počas PP, ale končí po PP. Za započatú 15 minútovku je potom logicky započítaná za obe sadzby."

...no to si myslím, že je špatně, protože běží pořád jedna doba řízení. Takže by se mělo počítat podle časů uvedených ve sloupci F (a sazeb v G).

V pracovní době je jedna sazba za započatou čtvrthodinu, mimo pracovní dobu ta druhá sazba.

Máte pravdu už jsem to opravil. První řádek je středa, druhý např. čtvrtek.

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje