2

我正在尝试在 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

感谢您的任何帮助。

4

0 回答 0