MS Excel

No teda! Aspoň k niečomu funkčnému sme sa spoločne dobrali.

Ak si nebudete vedieť s niečim rady, kľudne napíšte aj do tohto vlákna, aj keď sa to nebude týkať priamo odkazov na listy, ako je v názve. Ale aspoň budeme vedieť o čo ide. Nebojte, nikto spoza klávesnice nekúše.

Nekúše ???

Treba vyskúšať:
Sub Tlac()
' tisk tiskárna
Dim ws As Worksheet
For Each ws In ActiveWindow.SelectedSheets
Application.PrintCommunication = True
ws.PageSetup.PrintArea = "$A$1:$BC$38"
Application.PrintCommunication = False
With ws.PageSetup
.PaperSize = 70
.Orientation = xlPortrait
.BlackAndWhite = True
.FitToPagesWide = 1
.FitToPagesTall = 1
.PrintQuality = 600
End With
Next ws
Application.PrintCommunication = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
End Sub

No ja som to samozrejme čítal. Dal som to tak do pľacu pre všetkých na nejaký ten pokus, pretože mne to vytlačí na normálnej tlačiarni, ale ak to dám do PDF cez PDFCreator, tak mi to neviem prečo rozdelí na jedno PDF prvý list, a ostatné listy do druhého PDF. Preto som to dal na vyskúšanie ostatným.

PS: Pre tých čo to nepoznajú, tak PDFCreator je vyrtuálna tlačiareň do PDF. Tvári sa ako tlačiareň, ale pritom ukladá to čo chcete vytlačiť do PDF. Je to dobré na pokusy bez nákladov... Export do PDF je niečo iné.

TO by som určite do prevádzky bez vyskúšania na konkrétnej tlačiarni nerobil. Každá tlačiareň má iné nastavenie. Ak dáte 600 dpi a tlačiareň bude na 300, bude stránka sploštená, treba nastaviť okraje na konkrétny typ tlačiarne a obsahu dokumentu. Napr. moja tlačiareň potrebuje vľavo, vpravo 0,5 cm, dole 1,2 cm (netlačiteľný okraj). Nevieme či má Vaša tlačiareň podávač na tie lístky A6, alebo budú vsúvané do podávača na A4 do rohu (alebo inde). Na ležato, na stojato. Ak na A4 a potom strihať/rezať, tak skúsiť dať 4 stránky na 1 A4, ... Neviem, ako to urobiť na konkrétne zariadenie, bez toho zariadenia, a bez vizuálneho výsledku a vizuálnych požiadaviek.

EDIT: V hore uvedenom kóde ak nastavím Landscape, tak je každý list na 1 stránku, ale ak dám Portrait, tak je na 1 stránku iba prvý list, ostatné sú na 2 stránky. Bez ohľadu na 300 či 600 dpi.