MS Excel

Zdravím, mám soubor do kterého napíšu náklad třeba 3600 ks,
na paletě je 1000 ks ( vytvoří se 3 listy po 1000 ks a 1 list 600 ks, odešle se to do tisku PDF, listy se ale řadí tak, že poslední list potřebuji na 1. místě a on je na posledním.
Nemůžu na to přijít jak to nastavit. Po odeslání na tisk se listy vymažou, zůstává jen list tlačítko a dodací list.

Zaslat odpověď >

titus15(7.6.2023 12:59)#054999

Příloha: zip

54999_dotisk-pdf.zip (37kB, staženo 1x)

citovat

elninoslov(7.6.2023 14:54)#055001

??? Celý ten kód je divný. Od prepočtu tých listov na kotúče, zvyšku a pod., až po 2x po sebe určovanie menného zoznamu listov a pod. Včetne toho, že Váš príklad urobí listy
1. list "1" - "2/4" - "1000"
2. list "2" - "3/4" - "1000"
3. list "3" - "4/4" - "600"
4. list "4" - "1/4" - "1000"
PDF to vytvorí s 8 stránkami (každý list na 2 str). Ak pochopím, čo to tam ako rátate (pre mňa neskutočne nepochopiteľný zápis v kóde), tak bude stačiť pri vytváraní iba zmeniť poradie listov.

EDIT:
To nebude celý kód, všakže? Vzhľadom na nepoužité globálne premenné ako napr. "varinput".

Toto myslíte ako fakt vážne?
...Filename:=xlQualityStandard...
to je kvalita PDF a nie názov súborucitovat

elninoslov(7.6.2023 20:48)#055009

Pokúsil som sa pochopiť tie Vaše výpočty, názvy premenných a čo by mohli znamenať (aj vzhľadom na popis v Application.InputBox) ale nedarí sa mi to rozlúštiť.
Napr. čo je ZbytekNaKotouci s popisom "zadej zbytkové množství v balíku 0, 60, 70" ???
To máte napr. nejaký štítkovač, a sem zadávate neminuté štítky v "balíku", aby sa najskôr minuli tie? Až potom sa budú míňať ďalšie balíky štítkov? Ako sa potom číslujú tie listy ak bude ZbytekNaKotouci=100?
1. list "1" - "1/5" - "100"
2. list "2" - "2/5" - "1000"
3. list "3" - "3/5" - "1000"
4. list "4" - "4/5" - "1000"
5. list "5" - "5/5" - "500"
???
Lenže nedáva zmysel, aby ten posledný list bol prvým listom v PDF.

Načo potom slúži premenná "pocetstran" ?

Majú tieto nastavenie premenných cez Application.InputBox nejaký súvis s tým listom "dodací list"?

Začal som to prerábať z mnohých InputBoxov na jeden UserForm, kde sa zadajú dáta naraz - oveľa viac User-Friendly. Len mi to dovysvetlite.citovat

elninoslov(8.6.2023 11:56)#055025

Po neupresňujúcom upresnení cez PM, zatiaľ ponúkam návrh na totálne prekopanie na UserForm.

Příloha: zip