Excelのシート内の選択範囲のみをPDFにして指定フォルダに保存する際に、ファイル名として特定セルの値を自動で入るようにしたいのですが、試しにセルA1を指定した下記構文だとするとうまくいきました。
ところが、2行目のCells(1,1)を、本来指定したいセルにするためCells(5,6)やRange("E3:F3")に変更するとエラーが出ます。
ファイル名にするセル番地の指定方法が間違っているのだと思うのですが、見よう見まねでやっているため行き詰っております。お知恵をお借りしたくどうかよろしくお願いします。
[条件]
PDFにしたい範囲→セルA1:F60
PDF保存先→デスクトップの「PDFデータ」フォルダ
ファイル名にしたい値のセル→E3とF3を結合したセル
[セルA1の値をファイル名として指定した構文]
Dim TargetName As String
TargetName = Cells(1, 1)
Range("A1:F60").Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\ユーザ名\Desktop\PDFデータ" & "\" & TargetName & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True
Range("A1").Select
End Sub
No.2ベストアンサー
- 回答日時:
こんばんは
>ファイル名にしたい値のセル→E3とF3を結合したセル
とのことなので・・・
>TargetName = Cells(1, 1)
の部分を
TargetName = Range("E3").Text
に変えれば、ご質問のようになると思いますけれど。
(結合セルの場合、値は一番左上のセルの値となります)
お知恵ありがとうございます。
Range("E3")はやってみてダメだったのに、後ろに.Textを足すと嘘のようにやりたかったことが出来ました!!!
感動です。
PDF化は他にも展開したかったので本当に助かりました。
本当にありがとうございました<m(__)m>
No.1
- 回答日時:
こんばんは、
惜しい、、色々検証実験すれば、エラー部分は自己解決できそうですね。
結合セルの値は、一番上の一番左のセルアドレスになります。
結合セルのインデックス1のようにも出来ます。。
簡易な実験
Sub test() 'OK?
MsgBox (Range("E3").Value)
End Sub
Sub test1() 'エラー13 型がNG
MsgBox (Range("E3:F3").Value)
End Sub
TargetName = Cells(1, 1)で問題ないとの事なので、
他の構文は見ていません。
色々と試してみて力尽きてました。
惜しいと言っていただけて元気が出てきました!!
お知恵ありがとうございます。
なんかしっかりとVBAを勉強したくなっています。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルVBA、間違っているコード内容を正して頂けませんか? エクセルワークシートに納品書を作ったの 2 2023/08/02 21:13
- Excel(エクセル) エクセルVBA、ファイル名をセルの値で保存の方法を教えてください。 おそれいります。こちらで数々のエ 6 2023/06/30 22:17
- PowerPoint(パワーポイント) エクセルのマクロについて教えてください。 1 2023/01/20 14:36
- Excel(エクセル) 【マクロ】ファイル名の日付によって、保管するフォルダを、自動選択したい 4 2023/08/16 11:24
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/03 09:11
- Excel(エクセル) エクセルシートをVBAでpdfで保存したい 2 2022/06/27 10:17
- Visual Basic(VBA) Excelのマクロについて教えてください。 1 2023/03/12 12:16
- Visual Basic(VBA) エクセルのマクロについて教えてください マクロを実行して 作業フォルダの中にある PDFファイル名を 3 2023/07/01 15:16
- Excel(エクセル) このコードに追記事項の仕方を教えて下さい。 以下のコード内容に出てくる。セルH3が空白の場合、エラー 4 2023/08/03 00:22
このQ&Aを見た人はこんなQ&Aも見ています
-
風水の観点で選ぶ観葉植物とは?置き場所や上げたい運気ごとの注意点を紹介!
観葉植物で運気をアップするコツを、風水デザイン1級建築士の福島昌彦さんに伺った。
-
エクセルをPDFで保存し、ファイル名はA1セルを参照するVBAの記述を教えてください。
Excel(エクセル)
-
【Excel】指定したセルの名前でPDFを保存する【VBA】
Visual Basic(VBA)
-
【VBA】PDF出力に任意のファイル名前を付ける方法
Excel(エクセル)
-
-
4
エクセル マクロ 名前を付けて保存 PDF保存先指定 ファイル名任意+日付
Excel(エクセル)
-
5
excelで複数セル値を組合わせてファイル名にする方法
Excel(エクセル)
-
6
日付を入力したセルをファイル名にして保存するには
Excel(エクセル)
-
7
エクセルVBAでTargetのセルに設定された「名前の定義」の取得方法は?
Excel(エクセル)
-
8
VBA PDF ファイル名をセルからつける
Excel(エクセル)
-
9
マクロ、PDFを任意のフォルダへ保存
Excel(エクセル)
-
10
Excelでセル内の文字をファイル名にする方法と、下のSheet1タブを2列にする方法は?
Excel(エクセル)
-
11
EXCEL ページを指定してPDF出力するVBAを教えてください。
PDF
-
12
VBA PDFで保存するマクロで実行時エラー 1004
Visual Basic(VBA)
-
13
VBAでPDFを保存する
Excel(エクセル)
-
14
条件によって印刷するシートを変える方法 EXCEL-VBA
Excel(エクセル)
-
15
エクセルをPDFにし複数のユーザーが各自の指定のデスクトップフォルダに保存するVBAを教えてください
Excel(エクセル)
-
16
Excelマクロのエラーを解決したいです。
Visual Basic(VBA)
-
17
特定のセルが空白だったら、その行を非表示にしたい。。。
Visual Basic(VBA)
-
18
エクセルのチェックボックスを保護対象から外すには
Windows Vista・XP
-
19
エクセル:シート名を手入力でなく、セル「A1」の文字を出したい。
Excel(エクセル)
-
20
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
首吊りどこ締めるの
-
至急!尿検査前日にオナニーし...
-
勃起する時って痛いんですか? ...
-
彼女のことが好きすぎて彼女の...
-
検便についてです。 便は取れた...
-
白血球が多いとどんな心配があ...
-
尿検査前日に自慰行為した時の...
-
尿検査の前日は自慰控えたほう...
-
腕を見たら黄色くなってる部分...
-
中出しをするとお腹が痛い・・・。
-
これって喉仏ですか? 私は女性...
-
EXCELで式からグラフを描くには?
-
口の中に黒い血の塊
-
精子が黄色?
-
納豆食べた後の尿の納豆臭は何故?
-
舌の裏の痛みのないプツプツの...
-
excelでsin二乗のやり方を教え...
-
エクセル指定した範囲からラン...
-
甲状腺腫れ
-
2つの数値のうち、数値が小さい...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
至急!尿検査前日にオナニーし...
-
首吊りどこ締めるの
-
尿検査の前日は自慰控えたほう...
-
尿検査前日に自慰行為した時の...
-
検便についてです。 便は取れた...
-
白血球が多いとどんな心配があ...
-
中出しをするとお腹が痛い・・・。
-
射精をして1週間以内に尿検査を...
-
彼女のことが好きすぎて彼女の...
-
腕を見たら黄色くなってる部分...
-
勃起する時って痛いんですか? ...
-
変な話しになります。尿検査で...
-
これって喉仏ですか? 私は女性...
-
EXCELで条件付き書式で空白セル...
-
男です。昨日の午後3時くらいに...
-
今朝、毎朝の習慣でオナニーし...
-
納豆食べた後の尿の納豆臭は何故?
-
1日前の検尿
-
値が入っているときだけ計算結...
-
精子が黄色?
おすすめ情報