MS Excel

Téma: tisk do pdf - uspořádání listů

Zaslal/a Pavlus 30.3.2012 14:39

Dobrý den,
řeším tisk do pdf (přes makro) a narazil jsem na problém s uspořádáním listů.

Sheets(Array("List1", "List3", "List2")).Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:= "C:\tisk.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=TrueNapadá někoho jak to udělat přes makro? Doufal jsem, že pomůže pořadí v Array .-), ale nepomohlo. Mechanicky bych věděl jak na to (tisk jednotlivých listů, a pak pdf sloučit). Jde to nějak efektivněji?

Díky za reakce.
P.

Zaslat odpověď >

marjankaj(30.3.2012 21:13)#007864

Nemám tu excel 2007.
Skús toto

Sheets(Array("Hárok1", "Hárok3", "Hárok2")).Select
ActiveWindow.SelectedSheets.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="C:\tisk.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=Truecitovat

Pavlus(31.3.2012 19:05)#007869

To nepomůže...

Ale dá se na to jít oklikou a přeskládat ve VBA listy (což jsem netušil že jde) a následně je vrátit zpět .-).

Sheets("List3").Move Before:=Sheets("List2")citovat

marjankaj(1.4.2012 10:04)#007871

Asi som to dobre nepochopil.
Ale tie zmeny nemusíš vracať naspäť. Stačí ak ten súbor po vytvorení pdf proste neuložíš.citovat

Uživatelské menu

Nejste přihlášen(a)

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.