Stačí vyplnit a používat.
Našel jsem na netu volně ke stažení, třeba Vám to pomůže.
Doplnil jsem jména z přílohy :)
tady něco v rychlosti
Ahoj, děkuji za reakci.
Jak jsem psal výše již jsem na to přišel, jen jsem to musel trochu upravit viz níže. Jinak ano, pochopil jsi to správně, potřeboval jsem zadat vzorec pomoci VBA.
Range("W3").FormulaR1C1 = "=SUMIFS(C[-1],C[-7],""<""&R[-2]C[-22])"
Range("X3").FormulaR1C1 = "=SUMIFS('20850'!C22,'20850'!C16,"">=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7,'20850'!C16,""<=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7+6)"
Range("Y3").FormulaR1C1 = "=SUMIFS('20850'!C22,'20850'!C16,"">=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7,'20850'!C16,""<=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7+6)"
Range("Z3").FormulaR1C1 = "=SUMIFS('20850'!C22,'20850'!C16,"">=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7,'20850'!C16,""<=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7+6)"
Range("AA3").FormulaR1C1 = "=SUMIFS('20850'!C22,'20850'!C16,"">=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7,'20850'!C16,""<=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7+6)"
Range("AB3").FormulaR1C1 = "=SUMIFS('20850'!C22,'20850'!C16,"">=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7,'20850'!C16,""<=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7+6)"
Range("AC3").FormulaR1C1 = "=SUMIFS('20850'!C22,'20850'!C16,"">=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7,'20850'!C16,""<=""&DATE(YEAR(R1C1),1,-2)-WEEKDAY(DATE(YEAR(R1C1),1,3))+R2C*7+6)"
Děkuji za ochotu.
Asi jsem na to přišel :)
Range("W3").ActiveCell.FormulaR1C1 = "=SUMIFS(C[-1],C[-7],""<""&R[-2]C[-22])"
Ahoj, mohl by mi prosím někdo pomoci upravit tento zápis.
Děkuji
Range("W3").Formula = SUMIFS(V3:V2000;P3:P3000;"<"&A1)
Chtěl bych sečíst všechny hodnoty ve sloupci "V" pokud je datum ve sloupci "P" menší než datum v buňce "A1".
Pokud by to bylo potřeba dodám sešit.
Děkuji
eLCHa napsal/a:
@Radek-Klepacek
=SUMIFS('20371+20372'!$S:$S;'20371+20372'!$F:$F;">="&DATUM(ROK($B$1);1;-2)-DENTÝDNE(DATUM(ROK($B$1);1;3))+C$3*7;'20371+20372'!$F:$F;"<="&DATUM(ROK($B$1);1;-2)-DENTÝDNE(DATUM(ROK($B$1);1;3))+C$3*7+6)
:) právě že se mi zdá že první vzorec uvedený v tomto příspěvku, není v pořádku a počítá od neděle.
Potřebuji, aby se počítalo od pondělí
Ale jak říkám, možná se pletu.
Ahoj. Po nějaké době testování, jsem narazil na to, že vzorec bere kalendářní týden počínaje nedělí, pokud se tedy nepletu.
1)
Mohl bych požádat o úpravu, tak aby počítalo od pondělí do neděle?
2)
Ještě jsem se chtěl zeptat, jakým způsobem zde mohu ocenit lidi, kteří mi již v minulosti nějakým způsobem pomohli.
Děkuji
Funguje skvěle, moc děkuji.
Ahoj.
Potřeboval bych sečíst zbývající čas z listu "20371+20372" ze sloupce "S" tak aby ale splňoval kalendářní týden z listu "Zatížení kapacit" v buňkách "C3" "G3 a "K3".
Rád bych se vyhnul tomu, abych v listě:
"20371+20372" musel přidávat sloupec "G" s =WEEKNUM(F3;1) tak jako jsem nyní pro demonstraci udělal.
a v listě "Zatížení kapacit" v buňkách "C3" "G3 a "K3" muse zadávat =SUMIFS('20371+20372'!S:S;'20371+20372'!G:G;C3)
Snad jsem to popsal srozumitelně.
Dá se to nějak obejít?
Děkuji
Tady tomu moc nerozumím
Jeza.m napsal/a:
Tu je pak třeba nadefinovat i ve funkci.
a pak na řádku Set ws = ... už není třeba odkazovat se na selection, ale na konkrétní list, čímž se vyhnete zbytečnému přepínání listů.
M@
Jeza.m děkuji za úpravu a rady. Nějakým způsobem jsem již rozchodil ještě před příspěvkem. Každopádně upravím dle rady.
Ještě jednou děkuji.
OK, dám si na to pozor.
Děkuji
To Al,
neber si to osobně, ale mám toho v práci opravdu hodně.
A navíc mě vedení bombarduje úkoly jako jsou tvorba maker, ve kterých zde nesahám nikomu ani po prsty u nohou, natož po kotníky.
Proto jsem rád za každou dobrou radu, kterou tu dostanu a z každé se snažím poučit.(ne vždy to pochopím napoprvé)
Nicméně jsem již starší člověk, který má již spoustu věci za sebou a to, že se o mě v každém příspěvku otíráš mi nepřijde až tak jako legrace, ale spíše mi to připadá, že si zde honíš ego (bez urážky prosím), namísto toho, aby jsi pomohl.
Pokud bych se nechtěl něco naučit, tak abych byl soběstačný, zadával bych problematiky, které tu zveřejňuji, někomu kdo má několikaletou praxi s programováním ve VBA a nebudu si nad tím lámat hlavu a ještě mi zůstane čas pro práci, kterou mám hlavně dělat.
Pokud tedy do budoucna pomůžeš, budu rád. Pokud ne, budu se hold muset spolehnout na někoho jiného, kdo bude vstřícný a má pochopení pro amatéry jako jsem já.
Děkuji
Děkuji Anonym za nakopnutí, pomohlo uložení sešitu před přeskočením na další list.
Děkuji
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.