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