Word
Excel
PowerPoint
Access
Outlook
ECDL
Poradna - Makro na pridanie riadkov do reportu
hlavní kategorie | zpět | + odpovědět na toto téma| Makro na pridanie riadkov do reportu - diskuze na toto téma |
| Zdravim, chcela by som velmi pekne poziadat o pomoc pri makre. Potrebovala by som do reportu obratu podla artiklov vymysliet ako doplnit dodatocne riadky pre existujuce artikle, ktore su obsiahnute v ramci ineho artiklu = v stojane (v nom je obsiahnutych viacero artiklov v istych mnozstvach) a dopisat do tychto novych riadkov hodnoty (pocet predanych stojanov krat pocet ks v stojane). Takze ak mi v reporte v stlpci C najde, ze bol v danom mesiaci predany stojan "A10" v mnozstve 10ks, aby sa mi bud pod reportom (alebo vo vedl.harku) rozdelil tento riadok na 4 riadky artiklov A01-A04, ktore dany stojan obsahuje a doplni do tych riadkov prislusne mnozstva (pocet predanych stojanov krat pocet ks v stojane:A01=5,A02=4,A03=3,A04=2). Dalo by sa nieco takeho vytvorit? Jednotl.artikle predavame totiz aj samostatne, avsak ak nahodou predame niekam stojan, tak do vysledneho reportu by som potrebovala vidiet nie stojan, ale iba jednotl.artikle. Vopred mockrat dakujem za akukolvek pomoc. Este prikladam predlohu tohto reportu.
Odpověď Snad jsem pochopil zadání. V příloze soubor s makrem, které nahradí stojany za přidělené artikly, všechny hodnoty se doplní do přidaných řádků mimo Obratu (netuším jak se počítá) a poté dojde k aktualizaci kontingenční tabulky. Odpověď Super, toto je presne to, co som potrebovala. Mockrat dakujem. Ste uzasny. :)
Este sa chcem spytat k tomu obratu - ano, tie udaje tam neboli spravne, pri stojane mal byt ovela vyssi obrat. Keby som potrebovala rozdelit aj ten obrat na jednotlive artikle, vedeli by ste mi poradit ako na to? v podstate by som chcela vynasobit pocet artiklov uz v novovytvorenych riadkoch cenou tychto artiklov. Pri A01=2€, pri A02=1€, A03=3€ a A04=4€. Pri vsetkych ostatnych pre zjednodusenie 1€.
Skusala som si doplnit to makro, ale vzdy mi to berie pocet artiklov len z prveho riadku. :( Vedeli by ste mi prosim opravit, aby mi to spravne pocitalo?
.Offset(, 5).Resize(4).Value = Application.Transpose(Array(.Offset(, 4).Value * 2, .Offset(, 4).Value * 1, .Offset(, 4).Value * 3, .Offset(, 4).Value * 4))
V prilohe pripajam aj subor s korigovanymi obratmi na stojany.
Mockrat dakujem. Odpověď Doplněn výpočet obratu. Plus sem se pokusil udělat i výpočet obratu netto, nevím zda je to tak správně, ale bral sem to tak, že hodnota obratu netto je o 30% nižší.?
Odpověď Super, presne takto je to skvele. Vy ste poklad. Mockrat dakujem za pomoc. :) Odpověď |
