Něco sem narychlo spíchnul. Pokud sem tedy správně pochopil zadání viz soubor
Příloha: 
37671_vzor.zip (17kB, staženo 30x)
citovat37671_vzor.zip (17kB, staženo 30x)
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: viac cyklov
Presne tak som to chcel , len som nevedel ako ma isť poradie ak je ich viac.citovat
MS Excel
Téma: viac cyklov 
Zaslal/a 17.9.2017 20:18
Dobrý , potreboval by som doplniť do makra ešte jeden cyklus. Mám tabuľku z ktorej vyberám hodnoty cyklom for next podľa kritéria ktoré mam fixne zadefinovane v makre cez Index . Nový cyklus by mal namiesto pevného čísla riadku zapísať postupne od 1 do 10. Používam excel 2003
subor
http://leteckaposta.cz/613802527
Použite polia namiesto prechádzania buniek po jednej. Posielam príklad, kde je aj prípadné riešenie cez KT. Ale hlavne ide o ukážku makra, ktoré :
-si samo aktualizuje zoznam mien
-zoradí podľa A-Z
-zistí či nieje prekročený max 20 riadkový limit, a upraví ho
-pre každé meno si načíta dáta do poľa výsledkov
-staré zmaže, všetky nové naraz zapíše
-môžete upraviť počet stĺpcov skupín v konštante
Ak to potrebujete inak, inšpirujte sa kódom s poľom, a vyberte si iba jadro kódu. Je neporovnateľne rýchlejšie - ani nemrknete.
Robím to na E2016, na E2003 to treba testnúť.
-si samo aktualizuje zoznam mien
-zoradí podľa A-Z
-zistí či nieje prekročený max 20 riadkový limit, a upraví ho
-pre každé meno si načíta dáta do poľa výsledkov
-staré zmaže, všetky nové naraz zapíše
-môžete upraviť počet stĺpcov skupín v konštante
Ak to potrebujete inak, inšpirujte sa kódom s poľom, a vyberte si iba jadro kódu. Je neporovnateľne rýchlejšie - ani nemrknete.
Robím to na E2016, na E2003 to treba testnúť.
Příloha: 
37673_vzor1.xls (104kB, staženo 32x)
citovat37673_vzor1.xls (104kB, staženo 32x)(18.9.2017 15:10)#037674
Stalker napsal/a:
Něco sem narychlo spíchnul. Pokud sem tedy správně pochopil zadání
Presne tak som to chcel , len som nevedel ako ma isť poradie ak je ich viac.citovat
(19.9.2017 15:14)#037679
Len pre doplnenie mal som aj variantu cez vzorec Index
=INDEX(data;SMALL(KDYŽ(mena=$D$1;ŘÁDEK(data)-2);$A4);1) A4-čisla od 1 po 20 upravený podľa tohto videa https://www.youtube.com/watch?v=wclmIcTsbtg ale pri zapisovaní v makre cez Application.WorksheetFunction.Index vyskočí chyba expected expression pri funkcií když.
Makra až tak nepoužívam preto neviem kde je chyba, pomohlo by ak by som vedel kde mám nabudúce pozrieť videa alebo stránky k problému ktorý budem prešiť.citovat
=INDEX(data;SMALL(KDYŽ(mena=$D$1;ŘÁDEK(data)-2);$A4);1) A4-čisla od 1 po 20 upravený podľa tohto videa https://www.youtube.com/watch?v=wclmIcTsbtg ale pri zapisovaní v makre cez Application.WorksheetFunction.Index vyskočí chyba expected expression pri funkcií když.
Makra až tak nepoužívam preto neviem kde je chyba, pomohlo by ak by som vedel kde mám nabudúce pozrieť videa alebo stránky k problému ktorý budem prešiť.citovat
Dalo by sa to s najväčšou pravdepodobnosťou aj vzorcami. Na to je ale málo informácií.
Koľko asi bude riadkov dát ?
Koľko asi bude mien ?
Koľko ich má byť vo výsledku vedľa seba ? Tak ako teraz ?
Koľko riadkov najviac môže mať jedno meno ? Tak ako teraz ?
Chcete vypísať iba niektoré mená vo Vami zadanom poradí, alebo všetky mená v abecednom poradí?
...
Ak budeme vedieť toto, môžeme vyskúšať (podľa množstva dát) výpočtovú náročnosť takých vzorcov.citovat
Koľko asi bude riadkov dát ?
Koľko asi bude mien ?
Koľko ich má byť vo výsledku vedľa seba ? Tak ako teraz ?
Koľko riadkov najviac môže mať jedno meno ? Tak ako teraz ?
Chcete vypísať iba niektoré mená vo Vami zadanom poradí, alebo všetky mená v abecednom poradí?
...
Ak budeme vedieť toto, môžeme vyskúšať (podľa množstva dát) výpočtovú náročnosť takých vzorcov.citovat
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
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.
RSS nejnovější články