- 締切済み
データを入力後必ず印刷したい
エクセルでデータを作成しています。 データを入力したら、毎回必ず印刷をするように（強制的） 設定をしてしまう方法があったら教えてください。 マクロでしょうか？使い方がさっぱり解りません。 目的は、必要な書類を出し忘れないようにする為です。 ＸＰを使用しています。 宜しくお願いします。
- tennpi
- お礼率88% (8/9)
- Windows XP
- 回答数2
- ありがとう数2
- みんなの回答 （2）
- 専門家の回答
みんなの回答
- MRT1452
- ベストアンサー率42% (1392/3296)
よくよく質問を読み返して、 実際には、おそらく色々と工夫しないと難しいと思います。 「データを入力した」というチェックのやり方とか、複雑なものになるとおもうので。 前述の分では単純にこうかなと言う程度なので。 以下のサンプルも突貫工事的なもので、 強制的に印刷させるのではなく強制的に印刷確認のメッセージを出すようにしています。 印刷時に再度メッセージを出すのは、メッセージを出さないと、そのままマクロが流れて、印刷前にファイルが閉じてしまう可能性が高いから。という苦肉の策。 本来なら、じっくり時間をかけて細かくそういった部分の対策の仕組とか、組んでいくべきなのですが、参考程度ということで、突貫的に。おそらく貴方が望むものとはかなり違うものだと思うので。 ThisWorkbookのマクロ記述部分に記述。 Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim rcd As Integer rcd = MsgBox("ファイルを閉じます。閉じる前に印刷しますか？" & vbCrLf & "何か入力した場合は必ず印刷してください。", vbYesNo) If rcd = vbYes Then Worksheets("Sheet1").PrintOut MsgBox ("印刷を実行します。" & vbCrLf & "印刷が完了したら、「OK」ボタンを押してください。") End If End Sub
- MRT1452
- ベストアンサー率42% (1392/3296)
データ入力時だと、ちょっとした操作で毎回印刷が走ってトンでもないことになるので、 ファイルを閉じるタイミングで印刷でしょうかね。 http://www.happy2-island.com/excelsmile/smile03/capter01004.shtml http://officetanaka.net/excel/vba/sheet/sheet08.htm http://officetanaka.net/excel/vba/file/file03.htm これらを組み合わせて実現できるのではないでしょうか。
お礼
ありがとうございます。 もしよければ例えを教えて頂けると有りがたいのですが。 私には組み合わせが難しそうです。
関連するQ&A
- エクセル2000で、入力されていない行を印刷しないようにするには
エクセル2000で、たとえばA1からB20までのデーターで、一つでも入力されていないセルがある場合それを非表示にして印刷したい場合、毎回空白セルが変わる場合に対応したマクロの組み方教えてください。一連の操作方法では、空白セルが、操作のたびに変わる為できませ～ん！VABは超初心者なのでわかりません。どなたか助けてください。月曜日に会社で必要です。お願いします！
- 締切済み
- オフィス系ソフト
- 帳票の入力データ以外の印刷不可設定
エクセルで帳票を作成し、入力データだけが、薄い紙の帳票に印刷されるように、既定のエクセル上の項目は印刷されないように設定したいのです。 よろしくお願い致します。
- 締切済み
- オフィス系ソフト
- エクセル2003のデータをエクセル2007で印刷
こんばんわ。よろしくお願いいたします。 パソコン（ＸＰ）のエクセル2003で作成したデータ（画像が貼ってあり、数字や文字を入力している）をパソコン（vista）のエクセル2007で開き印刷したら、入力した数字や文字は綺麗に印刷できるのですが、そこに張り付けてある画像がぼやけて印刷されます。 vistaのパソコン2台でそれぞれ違うプリンタで試しましたが、同じ結果でした。ＸＰなら綺麗に印刷できます。 原因は何なのでしょうか？ よろしくお願いいたします。
- ベストアンサー
- Windows Vista
- ★エクセル（EXCEL）の印刷領域とページ設定のコピー
マサオと申します。 エクセルのことについてですが、マクロで作成する会社のデータがあります。ただそのデータは、印刷領域とページ設定が合っていないので、作成後毎回設定しないといけません。 (1)マクロのデータベース（画面では見えない）がシート上にあるのでデータベースを含めたところまで印刷しようとするので、実際印刷するところに設定しないと行けない (2)ページ設定（用紙の向きと一枚で印刷するように設定する） そこで同じファイルに何枚もシートがあるので一枚だけ印刷領域とページ設定をすれば他のシートにコピーする方法は無いのでしょうか？ 教えてください。
- 締切済み
- オフィス系ソフト
- 封筒の印刷が簡単にしたい！！
いつもお世話になっております。 現在、エクセルでデータベースを作って、データの管理をしております。 封筒を簡単に印刷出来る”フリーソフト”もしくは、 マクロの組まれたエクセルをご存知な方いませんか？ ・顧客数がかなり多量にある為、筆●などのソフトは使用できません。 ・ワードの差込印刷では、毎度毎度、印刷箇所を設定するのに、時間がかかって使用出来ません。 ・マクロを組んで、データベースのボタンを押したら、封筒に印刷・・・としたいものの、 マクロは組めません（＞＜） ・いくつかマクロの組んだエクセルのフリーソフトを見たのですが、 印刷する場所がおかしく、うまく印刷できませんでした（： ；） 行など増やしたいけど、マクロが組まれてて出来なかったし。。 こんな私ですが、好条件の物、、設定等なんでも結構ですので、教えてください！！！ 出来るだけ、お金はかけたくないので、シェアはあまり考えておりません。。
- ベストアンサー
- Windows XP
- Word2002(Win)差し込み印刷ウィザードで設定した内容の保存
EXCELで作成した社員名のリストデータをもとに、封筒の宛名に一枚ずつに一人の名前を印刷したいです。（給与明細や連絡文書を入れたりするのが目的です） Wordで取り込んで差し込み印刷ウィザードで設定は完了したのですが、この設定を保存することは可能ですか？ 完了した状態で「保存」を選ぶと1ページ目のファイルしか作成されません。 月次作業なので毎回差込印刷ウィザードで設定するのは面倒です。 年賀状印刷ソフトのように、出来上がったファイルを開いて印刷すると、リストの宛名を1枚に一人ずつ印刷してくれるような機能が希望です。 マクロはぜんぜんわからないので、マクロを使用しなくてもできる方法があれば教えてください。
- ベストアンサー
- オフィス系ソフト
- Excelデータの差込印刷について
Excelで作成された会社名、住所などのデータを、Wordで作成した文書に差込印刷することになりました。 差込印刷の手順を踏まえて印刷したら、167件あるデータのうち、80件しか出力されませんでした。 Excelのデータを確認したところ、81件目に空欄があるデータがありました。空欄部分は差込印刷の対象となる箇所です。 そのため、レコード番号を81件～167件と指定してみましたが、1件も出力されません。 空欄のまま印刷する、を選択しても81件以降のデータが出力されないのです。 Excelデータは元々、180件ほどデータがありましたが、不要なものは削除しました。 また、住所などに訂正が必要なものがあったので、その部分だけ入力し直しました。パスワードがかかっていたので別名で保存しました。別名で保存したファイルを使用して差込印刷の設定を行い、表示画面には設定どおりに表示はされるのですが、何度やっても出力されません。 納期がせまっており、自分でもいろいろと調べてみたのですが 解決方法がわからず、こちらで質問させて頂いた次第です。 解決方法をご存知の方、教えていただけますでしょうか？ どうぞよろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- エクセルの印刷で・・・
エクセルで作成した見積書にある列のみ印刷されないように するにはどうすればよいのでしょう？ 見積り金額を算出するためにある列に数字を入力します。 （その数字は参照する為に使用し、同じ列上のセルにあります。） しかしその数字は印刷はしたくありません。 印刷時に毎回隠したりするのが面倒臭くて・・・ その列は何の指示をしなくても毎回印刷されないように したいのです。 可能でしたら教えて下さい。
- ベストアンサー
- オフィス系ソフト
お礼
ありがとうございます。 ThisWorkbookとは？ から始めてみます。 イメージを現実にするのは難しいですね。