Question

从我的主工作簿中，我打开第二个工作簿并尝试将该文件导出为pdf。我在定义打印区域方面遇到了麻烦，它不会导出图形。

这是我的代码。

                    Workbooks.Open Filename:=sFileDirectory & sFileName
                    ' Now put in the signature
                    ThisWorkbook.Sheets("Sheet4").Range("Signature").Copy Destination:=ActiveWorkbook.Sheets("Sheet1").Range("SignatureModel")
                    'Now prepare the PDF setup

                    'ActiveSheet.PageSetup.PrintArea = ActiveSheet.UsedRange
                    ActiveSheet.PageSetup.Orientation = xlPortrait
                    ActiveSheet.PageSetup.Zoom = False
                    ActiveSheet.PageSetup.FitToPagesWide = 1
                    ActiveSheet.PageSetup.FitToPagesTall = 1
                    'Range(ActiveSheet.PageSetup.PrintArea).Select

                    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=sFileDirectory & PDFName, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=True, OpenAfterPublish:=False

                    ActiveWorkbook.Close

我尝试使用pagesetup命令设置打印区域和/或在打开之前在第二个文件中设置打印区域。不清楚它应该如何工作。此外，它不会导出我的签名图像。任何帮助都会很棒。谢谢，

Excel VBA。 ExportasFixedFormat不包括图像和打印区域

0 个答案: