< návrat zpět

MS Excel


Téma: VBA-kopírování vybraných sloupců rss

Zaslal/a 12.10.2015 6:40

Ahoj všem, prosím o pomoc s makrem. Potřeboval bych najít poslední prázdnou buňku ve sloupci A na listu 1. S tímto sloupcem A zkopírovat další vybrané sloupce(např. A, B,C, G, T, V a vložit na list 2 seřazené normálně A, B, C, D, E, F. Děkuji za pomoc. Jirka

Zaslat odpověď >

Strana:  1 2   další »
#027341
avatar
ad a) na listu/VBA funkce POSUN, POČET, POČET2 (někdo používá i INDEX)
ad b) ve VBA po částech metoda Resize (Offset) a Copy

Bez přiloženého sešitu víc nechtějte.citovat
#027344
avatar
Děkuji za snahu v příloze posílám sešit s příkladem. Díky
Příloha: zip27344_presun_sloupcu.zip (46kB, staženo 35x)
citovat
#027346
elninoslov
Zatiaľ bez makra. Vzorce máte po riadok 1001. Podmienka je aby v stĺpci A neboli prázdne bunky.
PS: Viete o tom, že za riadkom 12294 Vám začínajú nejaké data ?
Ak chcete aj makro, napíšte.
Příloha: rar27346_presun_sloupcu.rar (71kB, staženo 32x)
citovat
#027347
avatar
Vzorci jsem to řešil do teď. Potebuji raději makro jak jsem již psal. Data na řádcích jsem zapomněl vymazat, když jsem zmenšoval sešit, nevešel jsem se do limitu dat přílohy.Makro potřebuji z důvodu rychlejšího běhu sešitu. Vzorce o několka sloupcích a cca 20 000 řádků docela brzdí chod sešitu.
Díky za makro Jirkacitovat
#027348
avatar

jnkopr napsal/a:

Vzorce o několka sloupcích a cca 20 000 řádků docela brzdí chod sešitu.


Mimo téma - To je divné, co je to za vzorce?citovat
#027349
elninoslov
Tu máte na skúšku 2 verzie kopírovania. Nestopoval som to, ale ani jedna možnosť sa nedá použiť napr. pri aktivácii Listu2, lebo na 23281 riadkoch makro trvá cca 1,5 s. Tak som Vám tam dal aj tlačítko. Tlačítku priradte makro Kopiruj1 alebo Kopiruj2. Potom skúste aj v Worksheet_Activate odstrániť apostrof pred Call, a rovnako navoľte Kopiruj1 alebo Kopiruj2. Vyskúšajte. Ak sa budete chcieť vrátiť k tlačítku musíte opäť odstaviť volanie v Worksheet_Activate pridaním apostrofu.
Potom treba ešte raz úplne presne najlepšie príkladom v prílohe, vysvetliť ktorý stĺpec kam má isť. Nenapísal ste to teda vôbec zrozumiteľne. Neviem či korešpondujú hlavičky v List1 a List2, ale v prvom poste spomínate úplne iné stĺpce ako sú napísane v prílohe, navyše v tom popise absolútne nerozumiem tomu N a P. Normálne skopírujte 1 riadok dát ktoré kam chcete a pošlite, lebo takéto slovné hračky moc nemusím. 1
Příloha: rar27349_presun_sloupcu.rar (41kB, staženo 34x)
citovat
#027351
avatar
Nějak jsem nepochopil, v čem je problém.
Příloha: zip27351_presun_sloupcu1.zip (38kB, staženo 34x)
citovat
#027352
elninoslov
Podľa mňa technicky nieje problém v ničom. Máme tu riešenie na "pár" stoviek riadkov pomocou "dlhších" vzorcov. Máme tu 2 makro riešenia (s Vašim už 3). Po tom čo bolo upresnené, že pôjde o desaťtisíce riadkov, som upravil vzorec na kratší, a u mňa je to v pohodičke na 23000 riadkov. Vaša metóda Copy je u mňa príliš pomalá, a nemaže data pred vložením. U mňa to hroózne laguje.
Tu posielam tie upravené vzorce na 23000 riadkoch, dokonca s vytváraním Hyperlinkov.
Stále ale neviem, ktorý stĺpec z tých posledných kam patrí...
Na kvalitné posúdenie, budeme potrebovať aj vzorku tých pomalých vzorcov.
http://uloz.to/xNW2sGZa/presun-sloupcu1-rarcitovat
#027354
avatar
Pokud můj první algoritmus počítal pomalu, pak nabízím rychlejší, včetně měření času, abychom se nemuseli dohadovat, co je pomalu, a co rychle. Při nastavení N=20000 celá ta legrace u mne trvala 0,78 sec, pro zadaných 185 záznamů 0,03 sec. Mně to pomalu nepřipadne.
Příloha: zip27354_presun_sloupcu2.zip (40kB, staženo 41x)
citovat
#027360
avatar
Pár tipů na okraj:
a) Pracujte s poli (zde není asi větší důvod)
b) Rychlejší než metoda Copy (která zas.. schránku) je prostý odkaz z cílové oblasti do zdrojové, tj. cíl = zdrojcitovat

Strana:  1 2   další »

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

Relativní cesta - zdroje Power Query

Alfan • 25.4. 9:44

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 9:02

Vynásobit hodnoty kurzem - Power Query

elninoslov • 25.4. 8:40

Relativní cesta - zdroje Power Query

Alfan • 25.4. 8:04

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 0:34

Vynásobit hodnoty kurzem - Power Query

Alfan • 24.4. 16:32

Relativní cesta - zdroje Power Query

Alfan • 24.4. 15:44