< návrat zpět

MS Excel

Téma: makro kopírování rel. adres rss

Zaslal/a Petr 24.3.2014 15:52

Zdravím,

mam takovej zapeklitej problém..V jednom sešitě mam blok tabulek. Výpočet začíná z jedné hodnoty a procházi postupně přes všechny tabulky v bloku (výpočty tabulkek na sebe navazují). V tabulkách jsou vzorce s relativnímy odkazy.

Píšu makro, které bude tento blok kopírovat do hlavního sešitu. Bloků tak může být více, ale každý z těchto bloků bude mít jinou výchozí hodnotu, ze které se bude počítat dále.

No a nějak nevim, jak zapsat část makra, která mi nakopíruje blok s těmi relativními adresami. Absolutní být nemohou, protože se vždy vztahují k výchozí hodnotě, která bude v každém bloku tabulek jiná..

Př: definovaný blok, který budu kopírovat
A B C
1 a1 = zadana hodnota

2 a1^2 a1^3 a1^4
3 a1*a2 a1*b2 a1*c2

V hlavním sešitě by to mělo vypadat třeba takto:

150.blok:

522 2

523 4 8 16
524 8 16 32

151. blok:

522 3

523 9 27 81
524 18 54 162

Tabuly se budou sami dopočítávat, ze svojí zadané hodnoty..A potřebuji aby se ten blok zkopíroval ve stejnými rel. adresami jako je v defaultním bloku..

Měl by někdo nápad jak by se to dalo vyřešit?

Zaslat odpověď >
Petr(24.3.2014 15:54)#018452
avatar
Druhý blok mám špatně očíslovaný:

530 3

531 9 27 81
532 18 54 162citovat
Palooo(24.3.2014 15:54)#018453
avatar
radsej prilohu poslite :))citovat
Petr1919(24.3.2014 17:45)#018464
avatar
Připojuji přílohu:-)

Popsal jsem tam problém lépe.citovat
Palooo(25.3.2014 15:04)#018491
avatar
nic ste neposlal :)citovat
Petr1919(27.3.2014 14:43)#018528
avatar
Bohužel mi nejde vložit soubor.

"Uložení se nezdařilo. Pravděpodobně jste nezadal(a) text nebo znaky z kontrolního obrázku."

kontrolní obrázek nikde nemám a text jsem zadalcitovat
Petr1919(27.3.2014 14:48)#018529
avatar
Tak snad teď:-)
Příloha: zip18529_kop_bloku.zip (9kB, staženo 21x)
citovat
Palooo(27.3.2014 15:09)#018530
avatar
zlozita otazka a pritom tak jednoducha odpoved

staci to zapisat takto:
Cells(9, 2).Formula = Cells(8, 2).Formulacitovat
Petr1919(31.3.2014 16:02)#018585
avatar

Palooo napsal/a:

zlozita otazka a pritom tak jednoducha odpoved

staci to zapisat takto:
Cells(9, 2).Formula = Cells(8, 2).Formula


Díky:-)
A pokud bych chtěl, aby se vzorec A1*F2 zkopíroval tak, že A1 by se kopírovalo do nového řádku pořád stejně a F2 by se posouvalo, tak jako u normálního kopírování.. Tzn ..A1*F3 další řádka A1*F4...citovat

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