< návrat zpět
MS Excel
Téma: SUMIFS
Zaslal/a Raders486 16.3.2017 10:33
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
Raders486(16.3.2017 10:45)#035571 Asi jsem na to přišel :)
Range("W3").ActiveCell.FormulaR1C1 = "=SUMIFS(C[-1],C[-7],""<""&R[-2]C[-22])"
citovat
Pavlus(16.3.2017 10:47)#035572 Předpokládám, že chceš do té buňky vložit přes VBA vzorec.
P.
Např.:
Range("W3").FormulaLocal = "=SUMIFS(V3:V2000;P3:P3000;""<""&A1)"citovat
Raders486(16.3.2017 12:42)#035578 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.
citovat