Příspěvky uživatele


< návrat zpět

optimalizace makra - smycka (13.7.2012 11:43)

prakticky... funguje perfektne, diky !
admin pls. lock

optimalizace makra - smycka (13.7.2012 11:16)

Ahoj,
mam takovy problem. Mam dva excel soubory. V jednom mam Pivot Tabulku, ve druhem cca 10 samostatnych tabulek (stejne velkych).
Zadani je, menit postupne filter v Pivot tabulce a postupne nakopirovat prvnich deset radku (10x4 bunek) a vlozit je
postupne do tech deseti samostatnych tabulek.

Filtr v PIVOT tabulce je napr. pomeranc, jablko, banan .... (soubor excel_1)
Jednotlive tabulky maji pojmenovane oblasti, do kterych se kopiruje prave jako pomeranc_area, ale neni problem pojmenovat je jinak

Takhle jak je to napsane, tak mi to funguje, ale rad bych to trochu zoptimalizoval (nejake trochu univerzalnejsi reseni)
do smycky, abych pro kazdy druh ovoce nemusel ten samy kod kopirovat porad dokola.

Díky za tipy.

---------------------------------------------------------------------------------------------------

Windows(excel_1).Activate 'prepne do weekly reportu

ovoce = "pomeranc" 'vyber ovoce
ActiveSheet.PivotTables("PivotTable_TOP_TEN").PivotFields("ConfigCode").CurrentPage = ovoce 'nastaveni PIVOT tabulky na ovoce
ActiveSheet.PivotTables("PivotTable_TOP_TEN").PivotCache.Refresh 'refresh


Range("TOP_TEN_AREA").Select 'oznaci oblast TOP TEN v PIVOT tabulce pro dane ovoce
Application.CutCopyMode = False 'CTRL+C
Selection.Copy 'CTRL+C

Windows(excel_2).Activate 'prepne do weekly reportu
Range("pomeranc_area").Select 'oznaci oblast TOP_TEN pro dane ovoce
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False 'CTRL+P (pouze hodnoty)

-----------------------------------------------------------------------------------------------------

dynamické zadání vzorc (15.2.2011 11:40)

Dobrý den,
Dal by se níže uvedený vzorec v excelu přepsat do trochu dynamičtějšího tvaru?
Chci naplnit 1 tabulku hodnotami z jiného souboru, a z několika listu.
Toto se děje pravidelně ze stejného umístění, ale z jiného souboru odlišeného číslovkou.

Potřeboval bych dynamicky měnit číslovku 01 (brát ji jako hodnotu z jiné buňky)
tak, aby se po změně číslovky a přepočítání načetli data z daného souboru určeného číslovkou v buňce

příklad statického vzorce, který šlape.

='\\misto1\adresar1\adresar2\[soubor 01.xls]list1'!A1

Díky za radu
DAvid

Funkce POSUN a dynamic (10.1.2011 19:35)

Ahoj,
lze na zaklade tohoto prikladu
sheet s grafem kopírovat (sheet2, sheet3..) aby i na sheetech 2,3 zustala funkcionalita grafu a posunů zachována? Nejak se mi to nedari rozchodit.

Díky
DAve


Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

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.

On-line nástroje