
No.2ベストアンサー
- 回答日時:
#1です
記憶が多分だったので、確かめる為、休憩時間にサンプルを作りました。
Microsoft PowerPoint xx.0 Object Library を参照設定 必須
参考
Sub PPT_pdf()
Dim ppt As New PowerPoint.Application
Dim pres As PowerPoint.Presentation
Dim save_path As String, file_name As String
Dim Target As String
Target = Application.GetOpenFilename("PowerPoint,*.pptx")
If Target = "False" Then Exit Sub
Set pres = ppt.Presentations.Open(Target, WithWindow:=MsoTriState.msoFalse)
With pres
save_path = CreateObject("WScript.Shell").SpecialFolders("Desktop")
file_name = "Test"
.ExportAsFixedFormat _
Path:=save_path & "\" & file_name & ".pdf", _
FixedFormatType:=ppFixedFormatTypePDF
End With
ppt.Quit
MsgBox ("PDF出力しました")
End Sub
デスクトップにTest名で保存されるはずです。。
No.1
- 回答日時:
こんにちは、
PowerPoint側を操作するので、
Microsoft PowerPoint xx.0 Object Library を参照設定して
Presentationをアクティブにし
Presentation.ExportAsFixedFormatメソッドで実行できるかと思います。
例:
ActivePresentation.ExportAsFixedFormat _
Path:=フルパス & "\" & ファイル名 & ".pdf", _
FixedFormatType:=ppFixedFormatTypePDF
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- PDF エクセルのVBAでファイルをpdfで保存するとソフトによっては開けなくなる 3 2022/06/08 10:20
- PDF パワポをPDFにしてパスワードをかける方法 5 2022/04/15 16:14
- Windows Vista・XP PC パソコンのダウンロードについて 1 2022/04/26 16:27
- Excel(エクセル) エクセルVBA、ファイル名をセルの値で保存の方法を教えてください。 おそれいります。こちらで数々のエ 6 2023/06/30 22:17
- Excel(エクセル) PDFファイルに日付を名前にして保存したい。 エクセル2019でワークシートに請求書のフォームを作り 2 2023/05/27 11:13
- Excel(エクセル) エクセルでcsvファイルを開いてVBAを使いたい 7 2022/04/28 11:12
- Excel(エクセル) エクセルで保存時に全部のシートの最終行をコピーして数値で貼り付けたい 3 2023/08/14 15:49
- Excel(エクセル) エクセル2019でPDFファイル名に枝番号をつけたい。 アクティブワークシートを印刷した後の処理とし 4 2023/06/06 21:00
- PDF PDFの回転と保存 3 2023/01/16 15:02
- その他(Microsoft Office) エクセルのマクロについて教えてください。 5 2023/01/21 09:39
このQ&Aを見た人はこんなQ&Aも見ています
-
EXCEL-VBAからPowerPointファイルを開いてPDF印刷する方法?
その他(Microsoft Office)
-
【VB.NET】 パワポ操作を非表示で
Visual Basic(VBA)
-
【VBA】PDF出力に任意のファイル名前を付ける方法
Excel(エクセル)
-
-
4
エクセルのVBAで開いているパワーポイントのファイルを印刷
Visual Basic(VBA)
-
5
ExcelのVBAで、選択したファイルが既に開かれているか確認したい
Excel(エクセル)
-
6
PowerPoint(.pptx)ファイルをPDFに変換するスクリプトについて。 調べてみたところ、
Visual Basic(VBA)
-
7
特定の名前のオートシェイプの有無を知りたい(エクセルVBA)
Excel(エクセル)
-
8
なぜマクロの記録がなくなってしまったのでしょうか?
Excel(エクセル)
-
9
エクセルVBAでPDFを作成したい
Visual Basic(VBA)
-
10
PDF 最小サイズ"で保存するマクロ"
PowerPoint(パワーポイント)
-
11
ExcelVBAにて既に開かれているPowerpointをアクティブにするには?
Excel(エクセル)
-
12
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
13
VBA エンターキーでイベントに入りたい。
PowerPoint(パワーポイント)
-
14
コマンドプロンプトでのPDFファイルの結合
その他(コンピューター・テクノロジー)
-
15
【パワーポイント】「ファイルを開いたら」vbaの実行したい
PowerPoint(パワーポイント)
-
16
VBAで既存のパワポのファイルを開くには?
Access(アクセス)
-
17
【PowerPoint VBAの高速化】
その他(プログラミング・Web制作)
-
18
パワーポイントでスライドごとに別々のファイルで保存
PowerPoint(パワーポイント)
-
19
パワーポイントのVBAでテキストボックスに値を変更させたいです
Visual Basic(VBA)
-
20
VBA public変数はどのようなことをしたら解放されますか?
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
セルにぴったし写真を挿入
-
エクセル画像(写真)挿入
-
エクセルシートの見出しの文字...
-
【マクロ】【画像あり】関数が...
-
EXCELのVBAで複数のシートを追...
-
空白のはずがSUBTOTAL関数でカ...
-
勤怠表について ABS、TEXT関数...
-
エクセルの複雑なシフト表から...
-
【マクロ】エラー【#DIV/0!】が...
-
オートフィルターの絞込みをし...
-
Excelに貼ったXのURLのリンク...
-
【Officer360?Officer365?の...
-
エクセル
-
グループごとの人数のカウント
-
Excelで4択問題を作成したい
-
エクセル GROUPBY関数について...
-
グループごとの人数のカウント
-
グループごとの個数をカウント...
-
エクセルのリストについて
-
【マクロ】元データと同じお客...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【ExcelVBA】各セルをダブルク...
-
教えてGooがサービス終了したら...
-
Outlook:予定表アイテ...
-
エクセルVBAを使用し、指定のパ...
-
googlemapの保存済みリストが消...
-
QRコードを保存する方法を教え...
-
Webページ保存によるテキストボ...
-
先日google document の文章をU...
-
メールをwordに変換して保存したい
-
強制終了で消えたメモ帳の内容...
-
Webページ上で飛び飛びの文章を...
-
ime辞書ツールのエクスポートと...
-
強制終了した時のメモ帳のゆくえ
-
画面キャプチャの保存場所と保...
-
WINDOWSのメモ帳が文字化け~~~
-
プロダクトキーシールをきれい...
-
yahooのメール
-
最近プリクラを撮るとピクトリ...
-
バイナリー保存のN88BASICプロ...
-
メモ帳のツールバーの保存(S)を...
おすすめ情報