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
助けてくれてありがとう。