• 締切済み

ペイントのファイル名を書き込んで、保存までをマクロで

エクセルで作成した表を画像としてペイントに貼り付けた後(ここまでは解決済み)、(ここから先が課題)エクセルのセルにあるデータをファイル名にして、ペイントの「名前をつけて保存」のダイアログを開き、ファイル名の欄にペーストして、保存する、ところまでを、マクロに出来たら手間が1/3になって助かるのですが、そんな夢のような方法はあるでしょうか。XP、Excel2002という条件で動かし、ファイルはブログに載せるので、PNG形式で保存します。

みんなの回答

回答No.1

添付参照ください。

shinza253
質問者

補足

ペイントへの貼り付けは一般的なコピペです。表を画像にする手順にはマクロを含みます。

関連するQ&A

  • Excel2003で作成したファイルをセル1つずつ単体で画像ファイルに保存したい

    Excel2003で、普通に文字をセルに入力し、それを画像ファイル(BMP・GIF・PNG・JPEGのいずれか)に保存したいのですが、何か良い方法はありませんか。ただ、たくさんの画像ファイルを作りたいので、Excelのセルをそのままコピーして、わざわざペイントソフトを起動して貼り付けるのではない方法、できれば、保存したい文字を先にすべて入力しておいて、あとからセルごとに保存できるとかいう方法もありましたら教えてください。

  • エクセルマクロで任意のファイル名をつけて保存したい

     エクセルVBAについての質問です。  エクセルのマクロで、Aというファイルを開いて、そのうち必要なワークシートだけを抽出し、新しいブックに移動し、その新しいブックを新しいブックのsheet1のセルC2の文字列をファイル名として保存するようなマクロをくみたいと思っています。  ファイルを開いて必要なワークシートだけを抽出し、新しいブックに移動するところまではできましたが、新しいブックのセルC2の文字列をファイル名として保存することができません。FNを変数として宣言して、C2の文字列を代入し、FNをファイル名として保存しようとすると、ファイルにFNという名前が付いてしまいます。どうすれば、C2の文字列をファイル名として保存できるのでしょうか。なお、保存するフォルダはc:\変換ファイル\6月です。どなたか教えてください。よろしくお願いします。

  • エクセルでファイル名を任意のセルに入力するマクロを組むには?

    エクセルにて、マクロを実行すると、 ダイアログボックスが出てきて、ファイルを 選ぶと、そのファイル名が任意のセル (たとえばB10とか)に入力されるような マクロを組みたいのですが、うまくいきません。 しかも、そのファイル名についている拡張子なしで 入力されるようにしたいです。 どなたかご教授ください。

  • Excelで任意のセルのデータをファイル名に追加して上書き保存するマクロ

    Excelのブックが300個ほどあります。 現在アルファベット4文字のファイル名がついています。 このブックを1つずつ開き、任意のセル(ブックごとに異なる)を選択後ホットキーでマクロを起動し選択したセルの内容をもともとのファイル名に追加して名前を付けて保存したいのです。 例) 元のファイル名:bgf.xls 選んだセル:A4 A4の内容:あいうえお 新しく保存するファイル名:あいうえおbgf.xls 環境はwin2k、Excel2kです よろしくお願いします。

  • エクセルのマクロでファイル名のつけ方

    あるセルの文字列を、マクロで ファイル名にして保存するにはどうしたらよいでしょうか。マクロの知識は記録修正ぐらいしかありませんが、 ご教授お願いします。 実験データが数百ありまして、 それを分割保存したいのです。 分割保存で最後 Sendkeys "%FA"とするところまでは 分かったのですが、できればファイル名もマクロで保存できたらすばらしいのですが。。。

  • エクセルのマクロで質問です

    エクセルのマクロで質問です。 SaveAsを使って、あるセルの文字列をファイル名として保存する、というマクロを作りました。 取りあえずうまくいっているのですが、同じファイル名がすでに存在した場合、「上書きしますか?」というダイアログが出ます。 運用上、上書きは困るのですが、「いいえ」を選択するとマクロがエラーで止まってしまいます。 そこで、以下のどちらかの動作を実現するマクロは可能でしょうか? 1.いいえを選んだ時に、ファイル名を指定するダイアログに飛ぶ 2.同じファイル名があった場合、自動的に末尾に数字を不可して保存する(ファイル名.xlsがあった場合はファイル名2.xlsで保存する) よろしくお願い致します。

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

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

  • 一つのマクロボタンにてファイルを2つ保存

    作業中のExcelファイルを「名前を付けて保存」する作業をマクロ化できませんか? その時 (1)ファイル名は指定のセルから取得させたいです。 (2)2番目のシートを一番最初に移動させた状態で  もう一つ別のファイルとして保存したいです。 (その時のファイル名は(1)で指定したものと違う名前で) 各営業所から上がってくる勤怠データの取りまとめに 困っております。 どなたか助けてください!!

  • エクセル ファイル名を指定して保存したい。

    現在次のようなマクロを最後に記述してそこでダイアログボックスに表示されるデフォルトのファイル名に都度日にちを手動入力して保存しています。 これを自動でファイル名を保存ダイアログボックスに表示できるようにしたいのですがどのような記述にしたらいいでしょうか ※ファイル名 A1に2016/9/15と入っている場合 「160915△△△△△△△..xlsm」と保存したい。 (「△△△△△△△」は固定) 現在使用中 Application.Dialogs(xlDialogSaveAs).Show Windows7/エクセル2013

  • エクセルマクロでpdfファイルを開きたい

    エクセルでpdfファイル名が記載されたセルを選択して、マクロでそのpdfファイルを開きたいと思うのですがうまくいかず困っています。 Shell関数でアクロバットリーダーを立ち上げることはできます。 またアクロバットリーダーで、一度pdfファイルを読み込むと、「ファイルを開く」ダイアログの「ファイルの場所」にpdfが保存されているフォルダが記憶されているので、SendKeysでpdfファイル名を使用すれば、マクロでpdfファイルを開くことはできます。 問題は、アクロバットリーダーが立ち上がった時に、「ファイルを開く」ダイアログの「ファイルの場所」がpdfファイルが保存されている場所と異なる場合です。ファイル名にパス名を追加したりして試みましたがうまくいきません。 どなたか御教示の程、よろしくお願い致します。