• ベストアンサー
  • 困ってます

ファイル名を「複数の任意のセル内容+指定した語句」にしたい

エクセルのファイル名を 「ある決まった複数のセルに入力された文字」+「今日の日付」に出来ないかと思っています。 例えば   セルA1にある文字   AAAA   セルB1にある文字   BBBB   セルC1にある文字   CCCC   +今日の日付 の場合 結果のファイル名が「AAAA_BBBB_CCCC_070411(今日の日付)」というファイル名になるようにしたいです。 保存箇所は操作者の都合があるので、ファイルを保存する作業はしなくて、ファイル名だけつける処理のみを行いたいです。 複数のセルを挟むのは、アンダーバーで無くても良いですが、ブランク以外で各セルごとが異なっていることがファイル名でもわかるようにしたいと考えています。 以上 宜しくお願いいたします。

共感・応援の気持ちを伝えよう!

  • 回答数1
  • 閲覧数124
  • ありがとう数1

質問者が選んだベストアンサー

  • ベストアンサー
  • 回答No.1

VBAを使用して良いなら、シート上にコマンドボタンを配置してコードは下記のようにすると希望通りの動作になると思います Private Sub CommandButton1_Click()      Dim fileName As String   fileName = Range("A1").Text & "_" & Range("B1").Text & "_" & Range("C1").Text & "_" & Format(Date, "yymmdd")      Dim dlg As FileDialog   Set dlg = Application.FileDialog(msoFileDialogSaveAs)   dlg.Title = "ファイルの保存場所を指定して下さい"   dlg.InitialFileName = fileName      If dlg.Show Then     dlg.Execute   End If    End Sub ですが、エクセル自身の機能「名前を付けて保存」とか初期保存のファイル名をカスタマイズしたいということであれば、 ムリなのであきらめましょうw

共感・感謝の気持ちを伝えよう!

質問者からのお礼

ご回答ありがとうございます!! 上手く行きました。 まさに希望通りの内容です。 本当にありがとうございました。

関連するQ&A

  • ファイル名を「任意のセル内容+指定した語句」にしたい

    エクセルのファイル名を 「ある決まったセルに入力された文字」+「こちらで指定した語句」に出来ないかと思っています。 例)セルA1にある文字「100200-01」、指定した語句「注文書」   結果「100200-01注文書」というファイル名がつく。 また、これを、保存先を指定しなく、それぞれ操作者が指定した保存先に保存することは可能でしょうか? 保存場所を任意で指定できないのであれば、 ファイルを保存する作業はしなくて、ファイル名だけつける処理のみでもよいです。「名前をつけて保存」のWINDOWが開いて、ファイル名欄にこちらの指定したファイル名が入った状態になるまでを自動化するというのでもいいです。 以上よろしくお願いいたします。

  • エクセルで入力文字に併せて参照したい

    エクセルでの質問ですが、 例えば、 A1のセルに、 AAAAと入力した場合、 B1のセルにJAPAN BBBBと入力した場合、 B1のセルにUSA CCCCと入力した場合、 B1のセルにUK と表示をさせたいのです。 また同時に、AAAAでもBBBBでもCCCCでもない文字が、 A1に入力された場合は、 A2のセルを参照するようにしたい ※A2のセルはそれ以外のものを直接入力出来るようにするためです。 以上 宜しくお願い致します。

  • 複数セルの入力内容で異なる値を返すマクロ

    次のようなマクロってどのように組めばいいのでしょうか。 例えば,A1のセルに「あ」B1に「1」C1に「2」が入力されているときにはD1に500を返す。A1に「い」B1に「2」C1がブランクのときにはD1に250を返す,のように複数のセルの入力内容によって異なる値を返したいのですが,このようなマクロってどのようにすれば組めますか。 マクロの初心者です。

  • 複数のセルの文字を一つのセル内に順番に並べ,区切りに制御コード、及び固

    複数のセルの文字を一つのセル内に順番に並べ,区切りに制御コード、及び固定文字を挿入したい。 セルのA1:12345678912345 セルのB1:AAAA セルのC1:BBBB とすべて半角で入力されています。 セルのD1に セルのB1、制御コードバイナリCHRA(29)、ZZ、セルのC1、制御コードバイナリCHRA(29)、Z、セルのA1 というふうに区切り無くつなげた文字にする式はありますか?Zは固定です。 セルA1~C1は7000行あるのでD1に式を入れたらオートフィルで7000行まで式を貼り付けたいです。  完成イメージ(制御コードバイナリCHRA(29)はセル上では見えない) AAAA CHRA(29) ZZBBBB CHRA(29) Z12345678912345 よろしくお願いします。

  • あるセルに色を付けた時、別のセルにも同じ色が付く

    表1と表2が有って、表1のセルに色をつけると、表2の同じ内容のセルにも同じ色が付くようにしたいのですが、 良い方法は無いでしょうか? 表1         表2 aaaa  |  bbbb cccc dddd bbbb  |  cccc aaaa gggg cccc  |  aaaa bbbb cccc ・ ・ 表1のbbbbに色つけると表2の複数のbbbbにも同じ色が付くようにしたいです。 セル1つずつに条件付書式を設定しても良いですし、関数で一括でもかまいません。 エクセル2000です。

  • 指定したセルでファイル名を保存するマクロについて

    マクロ初心者です。 A1セルの文字をファイル名にして保存する方法を知りましたが、A1セルとB1セルの文字をファイル名にして保存したい場合、どのようにすれば良いか分かりません。 A1セルに企業コード、B1セルに企業名です。 ファイル名を「請求書(13579いろは株式会社様)」としたいのです。 実際のマクロを一部抜粋しますが、下記の場合はファイル名は 「請求書(13579様).xls」となります。 Dim WS As Worksheet Dim fname As String fname = "C:\保存先\" & ("請求書(") & WS.Range("a1").Value & ("様)") & ".xls" どなたか教えて下さい。 どうぞよろしくお願い致します。

  • 【Excel】CONCATENATEの反対は?

    ・・・反対、というわけでもないんですけど(ぇ)。 つまり、1つのセルに入っているものを、記号で区切る、なんてことは可能でしょうか。 AAAA\BBBB\CCCCと入っているものを、「AAAA」と「BBBB」と「CCCC」に、それぞれセルを分ける、ということです。

  • エクセルを使って、文章の任意の箇所に指定したセルの文字列を代入したいと

    エクセルを使って、文章の任意の箇所に指定したセルの文字列を代入したいと考えているのですができるでしょうか? 例えば、A1セルに 「これはB1です。C1の形をしています。」という文字列を記入したとします。 "B1"と書かれている箇所にはB1セルに書いた文字列が、"C1"と書かれている箇所にはC1に書いた文字列が表示されるようにしたいのです。 アナログな方法としては、文章を区切って、A2セルに「これは」、A3セルに「です。」、A4セルに「の形をしています。」と記入し、任意のセルで&を使って(文字列結合っていうのでしょうか)、「=A2&B1&A3&C1$A4」とすればできますよね。 ただ、これだと繋げるセルの個数が多い時に効率が悪いのだろうな、と思うのです。 他の方法でもっと効率よく実行する方法がありましたら、どなたかご教授頂けると光栄です。 宜しくお願いいたします。

  • エクセルでメールアドレスと抽出したい

    同じセルに A1セルに AAAA@gmail.com BBBB@gmail.com と2つのメアドが入っている。 B1セルに AAAA@gmail.com C1セルに BBBB@gmail.com としたい場合どのようにやればいいでしょうか? どうぞよろしくお願いいたします。

  • エクセルで複数セルの同時入力?

    タイトルが適切かどうかわかりませんが、このような場合どうしたらよろしいでしょうか? A1に2、A2に3という数値が入力されていて B1に ="=A1+A2" と入力されています。 B1には当然 =A1+B1 と表示されますが、 このB1をコピーしてC1に「形式を選択して貼り付け」で「値」を貼り付けたとき、貼り付け直後C1は =A1+B1 と表示してますが、一度入力状態にすると計算して 5 と表示します。 C1のようなセルがひとつなら簡単ですが 複数のセルの場合ひとつひとつ入力状態にするのが 大変です。いちどに複数のセルを入力状態にするにはどうしたらいいのでしょうか? よろしくお願いします。