< návrat zpět

MS Excel

Téma: tisk do pdf rss

Zaslal/a titus15 7.6.2023 12:55

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
avatar
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.
Příloha: zip54999_dotisk-pdf.zip (37kB, staženo 2x)
citovat
elninoslov(7.6.2023 14:54)#055001
elninoslov
??? 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
elninoslov
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
elninoslov
Po neupresňujúcom upresnení cez PM, zatiaľ ponúkam návrh na totálne prekopanie na UserForm.
Příloha: zip55025_dotisk-pdf-3.zip (34kB, staženo 10x)
citovat
titus(8.6.2023 14:01)#055030
avatar
pro elninoslov
Děkuji, je to přesně ono ten soubor dotisk pdf3
Moc mi to pomohlo, ještě jednou dík.citovat

Uživatelské menu

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

Menu

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.

On-line nástroje