Makra excel - riadky a harky Vyřešeno

[palimiklos]

Zdravim , potreboval by som poradit s makrami v exceli. V liste 1 mam x riadkov s udajmi . V liste 2 mam stanoveny zoznam napr. Pobociek .
Potreboval by som do listu 3 zkopirovat riadky z listu jedna ale tak ze z listu 2 mi zoberie prvu pobocku a knej zkopiruje vsetky riadky z listu jedna, potom pod nu nakopiruje druhu pobocku a znova nakopiruje vsetky riadky z listu jedna a takto dookola vsetky pobocky z listu 2 a vsetky riadky z listu jedna .Ďakujem pekne za pomoc.

[Reklama]

[Azuzula]

potreboval by som poradit s makrami v exceli

tzn. udělat místo mě.

Nechci nějak moc rejpat, ale tohle jde snadno vyřešit pomocí mozku, záznamníku maker a vyhledávání v tomto fóru, protože podobné věci se tu už řešily.
Stačí jen přesně vědět co chci aby to makro dělalo krok za krokem.
Omlouvám se pokud se vás to nějak dotkne.

[d1amond]

Vítej na PC-HELP

Jak se bude makro spouštět a jak velké budou seznamy pro kopírování - je počet poboček právě 4??

Azuzula: ne tak hrr... neplaš nám tu nové tazatele.

[Azuzula]

Pardon. Jen mi to přišlo jako že se nesnaží sám přijít ani na tak jednoduchou věc jako zapnout záznam maker a trochu hledat na fóru. Jasně že je jednodušší se rovnou zeptat než se do toho víc vložit.
Tím netvrdím, že pan palimiklos se ani trochu nesnažil, protože to nevím.
Ale projít fórum a trochu tady pohledat je vždy lepší než si všechno nechat udělat od ostatních. Možná že jsem divná, že se snažím na všechno přijít a naučit se všechno možný, jak co funguje a jak to použít.

Ještě jednou se omlouvám.

// Musíš brát na vědomí fakt, že ne každý si umí sám poradit, kor ve věcech, kterým vůbec nerozumí. Vezmi si, že odpovědi na většinu otázek se dá vygooglit. Jenže aby Google mohl nabídnout odpovědi, musejí se lidi ptát a problémy se řešit. Nikdo po tobě nechce, abys mu vypracovala kompletní makro. Stačí ho nasměrovat. Nechceš-li pomoci s problémem, vadí ti lidé chodící sem s dotazem, ignoruj to, protože tyto tvoje komentáře vůbec nikomu nepomohou. Toť má rada. Díky za pochopení.
//mike007

[palimiklos]

Zdravim, no pravda je ze som uplny zaciatocnik samouk a co sa tyka pokusu som to skusal a samozrejme ze prve co bolo bolo nahravanie makra . To kopirovanie aj viem , ale neviem si poradit s tym pridelenim pobocky a znova opakovanim, ako to mam napisat. Co sa tyka zoznamu bude stale rozny ale zmesti sa na jeden list. Co sa tyka pobociek bude pocet asi rovnaky , mozno sem tam sa zmeni ale to myslim sa da potom prepisat .
Ak mi viete pomoct budem rad, nemusi to byt zrovna cely postup stacilo by mi aj prikaz na to pridelenie pobocky a znova opakvanie . Mozno som to zle napisal ale to poradit som nemyslel ze to musite zrovna urobit za mna, cize ta omluva nie je potrebna, samozrejme ze urcite je jednoduhsie napisat urobte mi to , chapem to ale nepotrebujem to cele napisat stacilo by mi poradit s tym pridelenim a kopirovanim.

[Azuzula]

Tak třeba opakování co potřebujete najdete jako cykly např:

Kód: Vybrat vše

For i = 1 To 10 'zajistí 10 opakování cyklu
      'makro co se má vykonat
next


Tenhle cyklus používám nejčastěji.
Krásně je to popsáno zde: http://www.david-zbiral.cz/vb.htm#_Toc151659693

Na ten seznam bych asi použila tabulku a do souhrnů vzorec na počet řádků resp. záznamů, bude se to hodit pro další použití v makru.

[d1amond]

Nabízí se otázka. Jak zjistím počet opakování? Jak zajistím, aby se mi to kopírovalo pod sebe unikátně? To nebude jen jednoduché makro, které lze udělat pomocí záznamu. Večer se na to kouknu.

[Azuzula]

Když koukám do vzorového sešitu, tak počet opakování zjistím podle počtu poboček Vzorcem =POČET2

Pomocí záznamu maker nejde samozřejmě docílit všeho, ale když si člověk neví rady se syntaxí, nebo s nějakým příkazem tak se to náramně šikne.

To makro nebude zase až tak složité, jen dlouhé.

--- Doplnění předchozího příspěvku (20 Úno 2012 14:14) ---

Ještě mě vrtá hlavou. Ta data na List1 jsou společná pro všechny pobočky?

[palimiklos]

S tym opakovanim je to tak ze to bude vlastne tolko krat kolko je pobociek . Mozno sa bude pocet menit ale to sa asi osetri potom v makre . Co sa tyka dat z listu 1 su spolocne pre vsetky pobocky .

[d1amond]

Přikládám sešit s příslušnou procedurou. Snažil jsem se o co nejjednodušší kód, takže bez zbytečných proměných, nejsou tam ošetřené chyby, atd. Požadavkům by to mělo odpovídat.
Zjišťuje se počet poboček a následně počet hodnot k naplnění, jsou dva vnořené cykly FOR. Mělo by to jít na jakýkoliv počet řádků, sloupce by to chtělo dodržet a v případě přidání sloupců doplnit do procedury řádky .Offset, které kopírují data z listu 1 na 3.

Test.xls

(94 KiB) Staženo 71 x

[palimiklos]

Ďakujem moc za pomoc. Funguje to super. Toto bolo na zaciatok na mna moc : ) Este raz dakujem.

[d1amond]

NZ, pokud je to vše, označ za vyřešeno