Mac Word - 将当前页面另存为PDF或ExportAsFixedFormat替代方案?

时间:2013-04-01 03:53:59

标签: macos vba word-vba

我正在尝试在Word中创建一个宏,将当前页面保存为PDF,其名称由所选文本设置。 我有这个宏将在PC上的Word 2010中工作,但似乎无法找到适用于Word 2011 for Mac(v14.1.4)的等价物。

Sub PDF_CurrentPage_Selection()
    Dim strTemp As String
    strTemp = Selection.Text
    ActiveDocument.ExportAsFixedFormat OutputFileName:=strTemp & ".pdf", ExportFormat:=wdExportFormatPDF, Range:=wdExportCurrentPage
End Sub

我也有这个使用所选文本作为文件名生成PDF但不能让它只做当前页面:

Sub SaveActiveDocAsPDF()
Dim strTemp As String
strTemp = Selection.Text
If Right(strTemp, 1) = vbCr Then strTemp = Left(strTemp, Len(strTemp) - 1)
Set mySaveAs = Dialogs(wdDialogFileSaveAs)
With mySaveAs
'Selection.Information(wdActiveEndPageNumber)
    .Name = strTemp & ".pdf"
    .Format = wdFormatPDF
    .Show
End With
End Sub

感谢您的帮助。

0 个答案:

没有答案