- ベストアンサー
エクセルVBAで日報自動印刷
don_chaの回答
- don_cha
- ベストアンサー率34% (139/407)
エクセルのブックが月別で、シート毎に日付で分けていらっしゃるのでしょうか？ 上記のような区分けの場合、ＶＢＡで制御するまでもなく、印刷したいシートの先頭を選び、SHIFTキーを押しながら印刷したい最終シートを選び、その状態で印刷ボタンを押すと先頭から最終シートまで印刷してくれますが、これではダメでしょうか？ もし、もっと違うことをお望みであればブック及びシートの構成を補足願います。
関連するQ&A
- VBAで日報を作っています。
VBAで日報を作っています。 日報はほとんどできましたが、 みんなで使っている全体のスケジュール管理ソフトがあり、 VBAで日報を自動で処理している途中で、全体のスケジュールソフトを起動させ実行させたと 思っています。 今のVBAの途中に付け加えたいと思っています。 VBAで日報を処理している途中でデスクトップにあるショートカットのプログラムを実行させる 事はできるのでしょうか？ Shellで他のプログラムを実行できると聞いたことがあるのですが、 人により、デスクトップのパスが違ってくると思うので、パスを取得し そのパスにあるショートカット（exe）を実行させ、開いた画面にある スタート（A）を押したいのですが、VBAでできまでしょうか？ 説明が下手なので、すみませんがよろしくお願いします。
- ベストアンサー
- Visual Basic
- EXCEL VBAで日報作成したい
お世話になります。 EXCEL VBAの勉強をかねて日報を作成しようと思っています。 添付図にあるような簡単な日報ですが、VBAでやりたいことは2つあります。 １．行追加 各行の隣にある「行追加」ボタンを押したらその行を下に追加したいのです。 ２．カレンダー作成 「カレンダー作成」というボタンを押したらA5に入っている月を参照して、添付図のようなA列が月、B列が日、C列が曜日、D列が開始時間、E列が終了時間、F列が作業、G列に行追加ボタンが自動で該当月のカレンダーに自動作成できれば最高です。 上記１．２を実現するためのロジックについてどなたかお知恵をお借りできませんでしょうか？ よろしくお願い致します。 EXCEL2013
- ベストアンサー
- Excel（エクセル）
- エクセル2010 VBA初心者です
エクセル2010で30日分の日報を作成しています 日付の入力をカレンダーから選択したくて、Microsoft Date and Time Picker Control6.0 を使用して、日報1日目の日付のセルにカレンダーから日付を入力する事が出来るようになりました。 これを30日分のそれぞれの日付のセルに入力出来るようにするにはどうすれば良いでしょうか？ 単純にコピーして貼り付けても出来ませんでした。 VBAやマクロは初心者ですが、教えていただける方がいましたら宜しくお願い致します また補足が必要な物があれば教えてください 宜しくお願い致します
- ベストアンサー
- Excel（エクセル）
- エクセル VBA
VBA初心者です。教えてください。 エクセルで日々残高管理をしております。 １～３１（日付別）までシートがあります。 例えばなんですが、今日は２９日なので２９のシートを一旦表示します。その後で、２８日のシートの最終残高の金額をコピーして２９日のシートの最初残高に数字を貼り付けたいのです。ボタンを押すと上記のような動作が起こるようにしたいのですが可能でしょうか。 ボタンは２～３１のシートすべてに付けたいです。 マクロの自動記録で作ろうと思いましたが、３０パターン程作らなければならなくて、面倒だと思いました。 どなたかお知恵を貸していただけないでしょうか 宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- エクセルVBA実行後にファイルを自動で閉じるVBA
Sub 印刷() ' ' Macro1 Macro ' マクロ記録日 : 201X/X/X ユーザー名 : AAAA ' ' If MsgBox("実行する場合はＯＫ、間違ってこのボタンをクリックした場合はキャンセルをクリックしてください。(日付確認後、印刷のこと。)", vbOKCancel) = vbCancel Then End End If 'A印刷 ChDir "L:\フォルダB\X\新規" Workbooks.Open Filename:="L:\フォルダB\X\新規\記録表\工程分析.xls" Sheets("毎日印刷").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Sheets("月曜日印刷").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Sheets("火曜日印刷").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Sheets("水曜日印刷").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Sheets("木曜日印刷").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Sheets("金曜日印刷").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Sheets("土曜日印刷").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Sheets("日曜日印刷").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True ActiveWorkbook.Save ActiveWindow.Close あるエクセルファイルのボタンに上記のVBAが記入されています。 そのボタンを押すと「工程分析.xls」ファイルを呼び出し各シートを自動印刷して保存して閉じるVBAです。 質問ですがボタンの配置されたあるエクセルファイルの上記VBAの処理を全て完了した後に上書き保存を自動で実行し、自動であるエクセルファイルを閉じるVBAはどの様に追加すれば良いでしょうか？
- ベストアンサー
- Excel（エクセル）
- エクセルのVBAでオブジェクトの配列変数は使えますか？
ＶＢですとオブジェクトの配列変数というか、コピーしたときに自動的に配列になってしまいますが、エクセルのVBAの場合でオブジェクトの配列変数は使えますか？ なにをしたいかというと、ボタンが多すぎて一つ一つにプログラム定義は面倒、そこで配列にしてまわすことにしたいのですが、エクセルで可能でしょうか。 どなたかお願いします。
- ベストアンサー
- Microsoft ASP
- エクセルＶＢＡでの自動ファイル保存
エクセルＶＢＡを使い入力したシート（ファイル）を、一定のデータが 入力された時点で指定した場所に例えば作成日をファイル名にして自動 的に保存していくようにしたいのですが、プログラムはどのようにすればいいのでしょうか？ 実現させたいプログラムは、このような感じにしたいです。 １.ＶＢＡで指定シートにデータ入力→２.データ数１０個で自動的に日付をファイル名にして自動的に保存→３.更に、データ１０個追加された時点で前に作成されたファイルを自動で更新→４.データの入力完了で更に自動で更新 ２～４のプログラムをご教授お願いします。
- ベストアンサー
- その他（プログラミング・開発）
- Excel 日報管理
Excelに詳しい方、教えてください！ 携帯からだと意味がわからないと思います…。 Excelで営業日報の管理をしています（日付ごとシート管理で一月ごと）。 今の営業日報にお客様情報の検索ページを作りたいのです。 ルート営業の日報なのですが、 毎日お客様のお店を回れるわけではありませんので、 １～31日までの空欄を作ってそこに引っ張ってくるというやり方ですと、 空欄が目立ちそうで…。 ポイントとして、 (1)特定のお客様の情報があった日の日報の、 (2)特定のお客様の情報だけを、 (3)時系列に並べて表示できるように。 という形にしたいです。 幾つか関数を組み合わせればいけそうな気がするのですが、 詳しい方がいましたら教えてください！
- 締切済み
- 経営情報システム
- VBAでExcelのヘッダーに文字列+セルの値を入れたい
お知恵を貸してください。 Excelヘッダーについてです。 セルA1に日付が入っていて、この値をYYYY/MM/DDの形でヘッダーにしたいと思っているのですが、この日付の前に「日報」という2文字を必ず入れたいのです。 最終的な形は「日報YYYY/MM/DD」となればよいのですが、これはVBAで可能なのでしょうか。 今まで手入力していたのですが毎日印刷するものなので、自動化したいと思うのです。 よろしくお願いいたします。
- ベストアンサー
- Visual Basic
- エクセル VBA
エクセル VBA コマンドボタン（印刷）をクリックするとSHeet1・SHeet2が ２つ印刷出来るような設定にしたいです。 普通は、SHeet1をコピーして Sheet２の画面を開いてコピーという手順を ボタン押すと、SHeet1・SHeet2が印刷されるようにしたいのですが・・・・ ちなみに印刷設定は出来ています。 このような ことはマクロで出来るのでしょうか？ 記述を教えて下さい！
- ベストアンサー
- その他MS Office製品
補足
説明が不足していて申し訳ございません。 エクセルで作成した日報には日付欄があって、 通常は空欄のものを印刷し、これを１ヶ月分 の３１枚をコピー機でコピーしており、製造日報 なので手書きで日報を作成しています。 日報の日付の部分だけでも１ヶ月分自動印字 されないものかと思っています。 宜しく御願いいたします。