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

1) Pokud knihovnu s makrem pro spuštění hlavního makra z zaheslované knihovny zahesluji, makro nefunguje.
2) Šlo by makro upravit tak, aby předvyplnil uživatel např. "Ruda" a heslo "5784" bez listu role?

Po uzavření LibreOfice a následnému otevření sešitu se po spuštění makra objevuje "BASIC - chyba při běhu.
Podprocedura nebo funkční procedura není definována."; řádek Call SjednotZahlaviADupliku("moje heslo") = heslo k otevření knihovny s hlavním makrem.

Dle návodu mám vytvořenu novou knihovnu LibraryADM se zaslaným makrem = Prihlaseni(), zatím bez hesla.
Makro spouštím ze základního modulu. Přihlášení funguje, ale háže mi to chybu "BASIC - chyba při běhu.
Vlastnost nebo metoda nenalezena: SjednotZahlaviADupliku." na řádku Call SpustitZaheslovaneMakro(heslo).
Volaná procedura je:
LibraryEK.Module1.SjednotZahlaviADupliku()
Zkoušel jsem i LibraryEK.Module1.SpustitZaheslovaneMakro(heslo), přejmenovat hlavní makro, ...
Chyba je stále stejná. Nemůže být problém v tom, že heslo k LibraryEK je jiné?
Děkuji.

Dobrý den,
děkuji za odpověď. Líbí se mi "PS:", protože heslo k otevření kódu makra sdílet nechci.
Zaheslovanou knihovnu LibraryEK s makry spouštím pomocí nakra v knihovně Standard.Module1:
Sub SpustitZaheslovaneMakro()
    LibraryEK.Module1.SjednotZahlaviADupliku()
    LibraryEK.Module5.NajdiCenySOkolnimiHladinami()
    MsgBox "Hotovo.", 64, "Dokončeno"
End Sub

Mohu vytvořit zaheslovanou knihovnu, např. "psw".
Nevím, jak vytvořit makro s heslem, které by otevřelo uzamčenou knihovnu LibraryEK.

Dobrý den,

rád bych Vám poděkoval za řešení tohoto problému, a zejména za ochotu a trpělivost při procesu ladění méně zkušenému uživateli LibreOffice, který se snaží zefektivnit nejen svoji práci, ale i svých kolegů/kolegyň.
     
Stále se mi potvrzuje, že člověk se učí celý život, pokud si nechce nechat ujet vlak.
     
Ještě jednou vřelé díky za profesionální přístup. :) =) :)

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.