Excel2013です。VBAでPDFで保存するコードを書きたいのですが、通常の名前をつけて保存のように保存先とファイル名をその都度変更できるウィンドウを出したいのですが、どのようにすればいいのでしょうか?保存先とファイル名をあらかじめ指定する方法はネット検索でヒットするのですが、そうでない方法が探せません。
以下は現在のコードです。
Sub PDF保存()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"c:\\xxx.pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End Sub
No.1ベストアンサー
- 回答日時:
ご回答ありがとうございます。無事に目的のコードにたどり着くことができました。
以下私が書いたコードです。他の方の参考になればと思います。
掃き出したいシートに名前がついている場合最後から2行目の●●●●を書き換えてください。そうでない場合はSheets(1)と書けばいいと思います。
Sub PDF保存()
Dim fName As String
'保存ファイル名及び保存場所の設定
fName = Application.GetSaveAsFilename(, "PDFファイル,*.pdf")
'保存操作
Sheets("●●●●").ExportAsFixedFormat Type:=xlTypePDF, Filename:=fName
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセル2019でPDFファイル名に枝番号をつけたい。 アクティブワークシートを印刷した後の処理とし 4 2023/06/06 21:00
- Excel(エクセル) PDFファイルに日付を名前にして保存したい。 エクセル2019でワークシートに請求書のフォームを作り 2 2023/05/27 11:13
- Excel(エクセル) エクセルVBA、ファイル名をセルの値で保存の方法を教えてください。 おそれいります。こちらで数々のエ 6 2023/06/30 22:17
- Excel(エクセル) エクセルVBA、間違っているコード内容を正して頂けませんか? エクセルワークシートに納品書を作ったの 2 2023/08/02 21:13
- Excel(エクセル) 【VBA】PDF出力に任意のファイル名前を付ける方法 3 2023/07/21 10:55
- Excel(エクセル) このコードに追記事項の仕方を教えて下さい。 以下のコード内容に出てくる。セルH3が空白の場合、エラー 4 2023/08/03 00:22
- Excel(エクセル) 【マクロ】ファイル名の日付によって、保管するフォルダを、自動選択したい 4 2023/08/16 11:24
- PowerPoint(パワーポイント) エクセルのマクロについて教えてください。 1 2023/01/20 14:36
- PowerPoint(パワーポイント) エクセルのマクロについて教えてください。 2 2022/11/18 15:34
- Visual Basic(VBA) ワイルドカード「*」を使うとうまくいかないマクロの添削をお願いします 3 2022/03/26 09:39
このQ&Aを見た人はこんなQ&Aも見ています
-
「どうして捨てられないの?」前妻の物を捨てられない男性の心理って?
前妻の物を捨てられない理由に加え、捨てるための手段はあるのかを専門家に聞いてみた!
-
【VBA】PDF出力に任意のファイル名前を付ける方法
Excel(エクセル)
-
マクロ、PDFを任意のフォルダへ保存
Excel(エクセル)
-
エクセルをPDFで保存し、ファイル名はA1セルを参照するVBAの記述を教えてください。
Excel(エクセル)
-
-
4
エクセル マクロ 名前を付けて保存 PDF保存先指定 ファイル名任意+日付
Excel(エクセル)
-
5
【Excel】指定したセルの名前でPDFを保存する【VBA】
Visual Basic(VBA)
-
6
EXCEL ページを指定してPDF出力するVBAを教えてください。
PDF
-
7
Cellsのかっこの中はどっちが行と列なの?
Visual Basic(VBA)
-
8
Excel VBAでPDFファイルをMicrosoft Print to PDFで出力したい
Visual Basic(VBA)
-
9
Excelマクロのエラーを解決したいです。
Visual Basic(VBA)
-
10
Excelの選択範囲を特定のセル値をファイル名にしてPDFで保存する
Excel(エクセル)
-
11
エクセルでエラーが出て困っています。
Excel(エクセル)
-
12
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
13
保存先のフォルダ名を指定したいとき
Visual Basic(VBA)
-
14
VBAでシートコピー後、シート名が重複している時の処理
Access(アクセス)
-
15
VBA PDF ファイル名をセルからつける
Excel(エクセル)
-
16
Excel 名前を付けて保存のVBA
その他(Microsoft Office)
-
17
Excel にて条件付き書式の色にさらに上塗りをしたいです。
Excel(エクセル)
-
18
VBA PDFで保存するマクロで実行時エラー 1004
Visual Basic(VBA)
-
19
エクセルマクロでPDF表示をしたい
PDF
-
20
ExcelVBAでPDFを閉じるソース
その他(Microsoft Office)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Googleドライブへの保存がWi-Fi...
-
iPhoneのデフォルトアプリのメ...
-
エクセルをPDFで保存し、ファイ...
-
Wordの自動保存が解除できません
-
「名前を付けてリンク先を保存」と「...
-
サイト上の画像や背景等を保存...
-
FireFoxで動画を保存できない
-
Excelの保存で" "を付けないよ...
-
法律上の「備置き」と「保存」...
-
知恵袋を見ていたら、Googleド...
-
PDFの回転と保存
-
DNAの保存温度
-
pixivで画像の保存てどうやるん...
-
WEB用に保存すると余白ができて...
-
Excelの作業中、自動保存...
-
開いているウィンドウの「全体...
-
PCR後の遺伝子の安定性について...
-
保存用のグッズって何の為に使...
-
オフィス2021が保存できない。
-
DocuWorksのフリーソフトを紹介...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Googleドライブへの保存がWi-Fi...
-
エクセルをPDFで保存し、ファイ...
-
サイト上の画像や背景等を保存...
-
FireFoxで動画を保存できない
-
知恵袋を見ていたら、Googleド...
-
Wordの自動保存が解除できません
-
「名前を付けてリンク先を保存」と「...
-
フォトショップ(サブスク版)
-
PCR後の遺伝子の安定性について...
-
Excelの保存で" "を付けないよ...
-
法律上の「備置き」と「保存」...
-
【Word】自動的に上書き保存さ...
-
フォトショップでブラシで書い...
-
PDFの回転と保存
-
DNAの保存温度
-
Webページと単一ファイルWebぺ...
-
PCで保存したブックマークを、...
-
pixivで画像の保存てどうやるん...
-
エクセルをPDFにし複数のユーザ...
-
FirefoxからVideoDownloadHelpe...
おすすめ情報