Excel 如何在将docx转换为pdf后查找文件路径
从docx转换后,我需要获取PDF的文件位置 我得到下面的代码转换,但它没有提供任何关于PDF位置的信息Excel 如何在将docx转换为pdf后查找文件路径,excel,vba,pdf,ms-word,filenames,Excel,Vba,Pdf,Ms Word,Filenames,从docx转换后,我需要获取PDF的文件位置 我得到下面的代码转换,但它没有提供任何关于PDF位置的信息 mydoc.ExportAsFixedFormat _ Outputfilename:=Replace(mydoc.FullName, ".docx", ".pdf"), _ ExportFormat:=wdExportFormatPDF, OpenAfterExport:=True, OptimizeFor:=wdExportOptimizeForPrint, _ Range:=wdEx
mydoc.ExportAsFixedFormat _
Outputfilename:=Replace(mydoc.FullName, ".docx", ".pdf"), _
ExportFormat:=wdExportFormatPDF, OpenAfterExport:=True,
OptimizeFor:=wdExportOptimizeForPrint, _
Range:=wdExportAllDocument, Item:=wdExportDocumentContent
我希望在它转换后,我可以将PDF位置记录到一个单元格中
谢谢
myDoc.FullName
包含文件的路径,因此当您将其设置为导出的输出文件名并将扩展名从.docx
替换为.pdf
时,您已经将pdf的路径设置为与原始文档相同的文件夹
使用此处的值将单元格的文件路径设置为PDF
thiswook.Worksheets(“sheetname”).Range(“A1”).Value=Replace(myDoc.FullName、.docx、.pdf”)
这会将工作表“sheetname”上的单元格A1设置为pdf的文件路径。您已经有了
mydoc.FullName
。您可以很容易地从中获取文件路径。。。请参见@Makah answer左侧(mydoc.FullName,InStrRev(mydoc.FullName,“\”)