• 締切済み

エクセルデータ印刷について

エクセルのデータを開いた時に データ入力後、毎回必ず強制的に印刷する方法があったら教えてください。

みんなの回答

  • m_and_dmp
  • ベストアンサー率54% (987/1817)
回答No.1

データ入力が終了したらでしょうか?一つのセルに入力するたびに印刷されてはたまりませんから。 「データ入力が終了して、Saveしようとすると、必ず印刷する」なら、イベントプロシージャ(マクロ) Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Worksheets("abcde").printout End Sub でできると思います。 一つのセルに入力するたびに印刷するには、同じくイベントプロシージャで Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) Worksheets("abcde").printout End Sub でできると思います。 エクセルを開いて、ツールメニューからマクロ→Visual Basic Editorを選択、 開いたウインドウの左側にあるプロジェクトウインドウの中に現在開いているブックの名前が見えると思いますので、そこにあるMicrosoft Excel Objectを展開し、ThisWorkbookをクリックして開きます。 イベントプロシージャのコードを書き込むウインドウが右側に開きますので、 .....ThisWorkbook(コード)のすぐ下にあるプルダウンメニューをWorkbookにします。(デフォルトで表示されていると思います。) つぎにその右側のプルダウンメニューを展開して、BeforeSaveとか、SheetChangeを選びます。 PrivateSub .......... End Sub と、親切にもコードを記入する場所が一行空けてありますので、そこに、 Worksheets("Sheet1").PrintOutと書き込んで、VisualBasicEditorを閉じて、Excelに戻り、期待した動作をするか確かめてください。

関連するQ&A