Srdecna vdaka, ten skript idem hned skusit.. I s tou haluskou to skusim.. mozno to bude presne ono :) Sw AleX napsal(a): > K tomu problemu 2 nieco ma napadlo ale je to velka haluska: > v tom tretom liste prvych 500 pozicii bude mat link na prvy list > a druhych 500 na druhy list nieco ohladne if(list1!C2 <> ""; potom vypis > vsetky policka,ak tam cena nieje nechaj prazdne) > no a na dalsi list (4) vytvor pivotnu tabulku kde zakazes blanc > > no a ohladne tej jednotky ja by som to riesil vlastnou fciou: > > Function sum_color(ByVal color, ByRef defRange) As Double > Dim l_value As Double > Dim my_cell > For Each my_cell In defRange > If my_cell.Interior.ColorIndex = color.Interior.ColorIndex Then > l_value = l_value + my_cell.Value > End If > Next > sum_color = l_value > End Function > > a k tomu OT ... riesili sa tu ine OT a toto moze helpnut aj niekomu > dalsiemu > > On 6/13/07, Kamil <sverak (zavinac) gmail.com> wrote: >> >> > Ok... chapem, bez ukazky sa to tazko opisuje. takze.. (hore som >> pripisal >> > OT ) >> > >> > problem 1 >> > >> > http://img524.imageshack.us/img524/1400/excel1problemvp4.jpg >> >> Proč proboha někam rovnou nezavěsíš ten xls soubor? Kdo to má >> přepisovat? >> >> Možný řešení jsem ti hodil na: >> http://temp.sverak.net/secti_barvy.xls >> ale neobejdeš se bez scriptování. >> >> > problem 2 - potrebujem aby sa mi udaje z napr. dvoch zaloziek >> > automaticky *zadanim cen*y presuvali do tretej zalozky nazvanej napr. >> > SUHRN... ako je to na obr. >> >> Na co něco takovýho potřebuješ? Zdá se mi, že ten excel docela >> znásilňuješ. >> Nevím jak ho donutit aby zistil, žes přidal cenu. Snad jedině nějakým >> timerem co by pravidelně kontroloval jestli se něco změnilo. Spíš >> bych to ale řešil tím, že bych doplnil všechny ceny a pak to poslal >> najednou do toho třetího listu. >> >> >> -- >> Cao, >> Kamil >> > > >Received on 14. 06. 2007, 19:32 CEST
This archive was generated by hypermail 2.2.0 : 14. 06. 2007, 19:31 CEST