OpenOffice.cz - web věnovaný kancelářským balíkům OpenOffice.org

Nerozumíme si. Uváděná data jsou pouze ukázková. "Item" je druh materiálu. V našem systému máme cca 5 000 druhů materiálu, 2 hlavní dodavatele a různé zákazníky. Neřešte, prosím, "anglické i české výrazy". Dnes komunikujeme s některými zahraničnímu firmami v češtině a naopak v angličtině se zahraničními.
1-2 týdně stahuji aktuální informace z webu na základě poptávek. Je nás více a v celkovém součtu ztrácíme zbytečně čas. Proto jsem uvažoval o makru.
Ve zdrojovém souboru se nemění hlavička, ale obsah dat podle požadavku. Položka "Item 1" je sice jedinečná, ale to neznamená, že ve zdojových datech je vždy. Použití funkce IFS je v tomto případě nepoužitelné.
Napadlo mě toto řešení na základě ad 3):
Udělám si šablonu, kde budou 2 řádky s čísly pro seřazení sloupců (v obou bude stejný počet čísel, jen pořadí jiné, aby sloupce, kde potřebuji upravit formát dat byly v matici) a do listu "Dodavatel" zkopíruji vstupní data a vložím 2 řádky s čísly. Zbytek by snad šlo řešit makrem v listu "Dodavatel":
1) seřadit sloupce podle řádku č. 1
2) zjistit počet neprázdných buděk v A4:A5000 (= např. "pocet_PN")
3) opravit formát buněk v matici B4:K"pocet_PN" na formát "číslo", záměna "," za ".", např. nyní 2,500 (výsledek 2500), formát buňky je text
4) opravit čísla v matici M4:V"pocet_PN" - záměna tečky za čárku, např. cena = 0.08536 (výsledek 0,08536)
5) vymazat řádek č. 1
6) seřadit sloupce podle řádku č. 1 (původně č. 2)
Dle tohoto postupu si můžu nahrát jednotlivá makra a pak je spojit. To ale nebude ideální.
Pomůžete mi, prosím?  Opravdu nám to ušetří to čas.
Pokud ano, upravím testovací data.
Děkuji.

Do souboru jsem doplnil hlavičku (červeně), která vznikne po ukončení makra na plných datech.
https://drive.google.com/file/d/1DMJwL7 … sp=sharing
To jsem měl na mysli.

Nejdříve na vysvětlenou. Jednotka a měna má pro nás informativní charakter. Pro jeden materiál jsou vždy stejné pro daný ceník.
Na základě Vaší odpovědi jsem upravil vstupní tabulku a pokusil se také upravit i makro (viz Cenik_sloupce_zadání_2.ods).
https://drive.google.com/file/d/1-U7xLS … sp=sharing
Snažím se pochopit, jak makro funguje a taky jsem nechtěl, aby jste ztrácel další čas.

Makro v tomto případě funguje bez problémů, počet opakování materiálu je max 12 a v "List2" je počet párů sloupců "Počet" a "Cena" taky 12.

1) Problém nastává u celého objemu dat u cca 80 tis. řádků (počet různých 8965, max opakování 6), kdy v hlavičce je 377 párů sloupců. 377 je hodnota "opak".
Počet opakování jednoho materiálu může být max. 12.
Pozitivní je, že konverze ceníku do řádků nyní proběhne celá v rozmezí 3-3,5 min, což je super.

2) V listu "vystup_Cíl" jsem přesunul sloupce "Jedn." a "Měna", aby se kopírovali pouze 1x.
Nevím, jak upravit makro.

Změnil jsem hlavičku dle doporučení na:
"Sub hlavicka(ByVal opak as long)
print opak"

Vyskočilo hlášení s číslem 377 a následně stejná chyba (chyba_2a.jpg)
https://drive.google.com/file/d/1d3rKPu … sp=sharing

Vzhledem k tomu, že do originálního souboru "Cenik_sloupce_úprava3.ods" jsem jsem nakopíroval do listu "vstup" pouze nová data od ř. 2, opravil hlavičku makra dle doporučení, výsledek byl tento:
20 tis. řádků - chyba 2a;
15 tis. řádků - makro proběhne;
jsem začal hledat jinde a napadlo mě zkontrolovat verzi SW.
Měl jsem LibreOffice v. 7.3.0.3 (progresivní) a tak jsem ji nahradil v. 7.2.6.2 (stabilní)
Makro u 20 tis. řádků nyní proběhne, ale u 38 tis. řádků se objeví stejná chyba.
Nechápu.

Děkuji za řešení pomocí vzorců, které je pro max. 150 řádků.

Testoval jsem makro (Ceník_úprava1). Pokud je v souboru cca 15 tisíc řádků (počet různých 3085, max opakování 6), konverze trvá cca 2min 15s.
Celý soubor má přes 38 tisíc řádků a při spuštění makra se objeví chyba "Nepřípustná hodnota či datový typ.
Přetečení." Otevře se okno s makrem a zvýrazní se řádek "Lrow = PosRow - 1" -viz chyba_1.jpg.
https://drive.google.com/file/d/1Ar1HcQ … sp=sharing
Myslel jsem, že je chyba ve vstupních datech, tak jsem soubor rozdělil na 2 části a při cca 15 tis. řádků makro funguje.
Po vymazání prvních 15 tis. řádků (zůstalo 23 tis. řádků) se objevuje chyba: "BASIC - chyba při běhu.
Vyskytla se výjimka
Type: com.sun.star.lang.IndexOutOfBoundsException
Message: ."
Pokud jsem 23 tis. řádků opět rozdělil na 2 části, makro proběhlo v pořádku.

Pokud makro spustím přes Nástroje - Makro - Spustit a zvolím makro a dám spustit, objeví se chyba:
"Při běhu Basic skriptu Standard.Module1.hlavicka došlo k chybě skriptovacího rozhraní.
Zpráva: wrong number of parameters!"

Pokud makro spustím přes Nástroje - Makro - Upravit makra - kliknu na tlačítko Spustit, vyberu makro a spustím ho, makro proběhne v pořádku a výstup odpovídá zadání.

Dobře, pak tedy zadání zjednoduším, bude pouze 5 sloupců. Zbytek dat si doplním dle potřeby pomocí funkce VLOOKUP.
Bohužel, počet řádků se stejným materiálem je různý v rozsahu 1-12.
Celkový počet řádků může být do 50 tisíc.
Struktura je tato:
Materiál    Počet    Jedn.    Cena    Měna
materiál_0    5000    ks    0,038    EUR
materiál_1    1    ks    0,936    EUR
materiál_1    50    ks    0,795    EUR
materiál_1    100    ks    0,777    EUR
materiál_1    500    ks    0,53    EUR
materiál_2    50    m    1,246    EUR
materiál_2    100    m    1,094    EUR
materiál_3    1    l    0,877    EUR
materiál_3    50    l    0,77    EUR
materiál_3    100    l    0,662    EUR
materiál_3    250    l    0,615    EUR
materiál_3    500    l    0,574    EUR
materiál_3    1000    l    0,538    EUR

Potřeboval bych převést data do nového listu tak, aby na jednom řádku u stejného materiálu byly všechny údaje (Počet, Jedn., Cena a Měna).
Předpokládal jsem, že řešení makrem by mělo být nejrychlejší.
Nebo to lze řešit jinak a jednodušeji?
Děkuji.

Děkuji za perfektní práci.

Ano, ale včetně 1. řádku: Material  Jednotka Rate    Qty1  Cena1
Stačí mi zkopírovat pouze hodnoty.
Seřazení všech dat na závěr dle materiálu a množství jsem neuváděl.
To už mi nezabere tolik času.