Exportieren von externen Blätter PDF ohne Active mit

Question

Ich habe ein zweiteiliges Problem

Ich habe eine Liste von Blättern und Registerkarten, die ich aus einem PDF erstellen möchten. Da ich nicht 1 PDF auf einmal erstellen kann, habe ich beschlossen, viele PDFs zu erstellen und sie in einem Schritt zusammenzuführen. Jetzt ist hier mein Problem.

1. Allgemeinen .exportAsFixedformat mit ‚Active‘ verwendet wird, versuche ich, diese direkt zu verwenden,

2. auch, selbst wenn ich dies tun mit Active die Parameter ‚Von‘ und ‚Bis‘ es gibt mir Problem

   Do 
       PrintWB = .Cells(i, 2) 'sheetpath + workbookname 
       sheetname = .Cells(i, 3) 'Name of Tab 
       Frompage = .Cells(i, 4) 'From 
       Topage = .Cells(i, 5) 'To 
   
       Workbook(PrintWB).Sheets(sheetname).ExportAsFixedFormat _ 
       Type:=xlTypePDF, _ 
       Filename:="C:\Rough\" & x & ".pdf", _ 
       Quality:=xlQualityStandard, _ 
       IncludeDocProperties:=True, _ 
       IgnorePrintAreas:=False, _ 
       OpenAfterPublish:=False, _ 
       From:=Frompage,_ 
       To:=Topage 
       Loop While .Cells(i - 1, 2) = .Cells(i, 2) 
   

Kurzinformation: die Do-while-Schleife hilft mir aus nicht öffnen und das gleichen Blatt schließt wieder und wieder, nur für den Fall einen der Folie hat zu mehreren Tabs gedruckt, s I ignorieren Sie einfach das

Im Moment drucken wir eine Reihe von Dokumenten und feilen sie nach dem Erstellen einer kleinen Broschüre, wenn ich in der Lage, eine PDF zu konsolidieren, wird dies eine Menge Papier sparen.

Answer 1

Es wurde ein Schreibfehler in der Arbeitsmappe ist, sollte es ein ‚s‘ am Ende gewesen ... so würde es Arbeitsmappen und es funktionierte sein !!