- ベストアンサー
(エクセルマクロ)DBの中で、選択した行のみ連続印刷する方法
zap35の回答
以前似たような質問に回答しました。 http://oshiete1.goo.ne.jp/qa3064424.html 今回のご質問との相違点は「A列に特定文字がある行だけ印刷する」ことだと思います。これはFor~Next文の中に条件判定の If oSht.Cells(idx, 1) = "印刷" Then ' 繰り返す処理 End If を追加すれば良いです。でも丸投げ回答したくないのでそこまでは具体的に書きません。ご自身でロジックを追加してみてください。 いずれにせよ質問&補足のシートは「例えば」の例ではないでしょうか。修正するのに多少なりともVBAの知識は必要ですよ。
関連するQ&A
- Excelで一行おきに2行の空白行を挿入したい
400行ほどデータの入ったエクセルシートがあります。 行番号 A列 1 山田 2 鈴木 : : 400 田中 このシートで、一行おきに2行の空白行を追加したいのですが、 1 山田 2 3 4 鈴木 5 6 : : マウスで2行選択して右クリックメニューで挿入..を400行分やるのが大変なので 一気にやる方法を教えてください。
- ベストアンサー
- その他MS Office製品
- エクセルのマクロについて
パソコン初心者です。 たとえば シート1のA1に「田中」と入力する。 ボタンを押すとシート2のA1に「田中」と表示される。 次にシート1のA2に「山田」と入力する。 ボタンを押すとシート2のA1に「山田」と表示される。 次にシート1のA3に「鈴木」と入力する。 ボタンを押すとシート2のA1に「鈴木」と表示される。 このようにマクロを組むにはどのようにしたらよいのでしょうか? わかりにくくてすいません。
- 締切済み
- その他(業務ソフトウェア)
- 関数で困ってます
時間割を早く作りたいのですが、このような場合はどうしたらいいのでしょうか? 例 シート1は 1 2 3 田中1-1 1-2 1-3 伊藤1-2 1-3 1-4 山田1-3 1-4 1-1 鈴木1-4 1-1 1-2 シート2に 1 2 3 1-1 田中 伊藤 山田 1-2 伊藤 山田 鈴木 1-3 山田 鈴木 田中 1-4 鈴木 田中 伊藤 シート2の氏名のところがシート1を元に検索できないでしょうか? 誰かたすけてくれませんか?
- ベストアンサー
- その他(データベース)
- エクセルで検索、並び替えの方法
エクセルで以下のような並び変えはできないでしょうか? エクセルでA列とB列に名前が入っています。 A列、B列の名前は若干違います。 B列の名前をA列に揃えて並び変えることはできないでしょうか? 「処理前」 「処理後」 A B A B 伊藤 山田 伊藤 山田 田中 山田 山田 鈴木 鈴木 鈴木 鈴木 田中 伊集院 田中 田中 伊集院 宜しくお願いします。
- 締切済み
- オフィス系ソフト
- EXCEL VBA 選択範囲のループ処理ができない
A列 B列 --------------- 東京 山田 東京 田中 埼玉 佐藤 埼玉 鈴木 神奈川 伊藤 --------------- みたいなシートがあり、「東京」で2行ある「山田」と「田中」を1セルにまとめたいのです。 オートフィルタで東京の人のみ表示させておいて、選択範囲を、 Each xxx in Selection~Nextをつかって処理しようとしましたが、 どうしてか、山田から伊藤まで全行分ループが回ってしまいます。 画面上で見えている選択範囲は正しく、Copyメソッドであれば望みどおりできるのですが。。。 選択範囲を正しくループさせるにはどうしたらよいか、教えて下さい。 よろしくお願いします。 Excelのバージョンは2007、OSはWindows Vistaです。
- ベストアンサー
- その他MS Office製品
- VBAのマクロで、複数行を1行に集計
お世話になります。VBA初心者です。 下記のような表があった場合、請求書番号が同じものをVBAで1行に集計するにはどうしたらよろしいのでしょうか? 請求書No.|顧客名|摘要|金額 111111 |鈴木 | A |100 111111 |鈴木 | S |160 222222 |佐藤 | F |500 555555 |山田 | A |150 555555 |山田 | D |200 888888 |鈴木 | S |160 ↓下記のように集計 請求書No.|顧客名|摘要|金額 111111 |鈴木 | A |260 222222 |佐藤 | F |500 555555 |山田 | A |350 888888 |鈴木 | S |160 摘要は各請求書番号の最初の行を使います。重複は2行とは限りません。また、最終的に何枚の請求書があるのかも計算させたいのです。ただしこれはどこかに関数"=counta()"を使えばVBAでなくても出来るのですが。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- excel マクロ <フィルタ>
excelのマクロで分からないことがあるので質問させてもらいます。 たとえば↓の写真のようなデータがあったとして、アルファベットさん(Aさん~Nさん)だけを表示するマクロを作る時は、フィルタをして、番号1~14にチェックをつけて・・・ってことをすると思います。そこに、ボタンをつけたいと思っています。 ボタン(チェックボックス)A、ボタン(チェックボックス)B、ボタン(チェックボックス)C、ボタンD、ボタンEをつけたいと思います。 ボタンAを押すと(チェックをつけると)→アルファベットさん(Aさん~Nさん)だけを表示 ボタンBを押すと(チェックをつけると)→山田、田中、鈴木だけを表示 ボタンCを押すと(チェックをつけると)→斉藤、佐藤、高橋、渡辺、伊藤だけを表示 で A、Bにチェックをつけるとアルファベットさんと山田、田中、鈴木を表示 B、Cにチェックをつけると山田、田中、鈴木、斉藤、佐藤、高橋、渡辺、伊藤を表示 ボタンDを押して、フィルタを解除。 ボタンEを押して、フィルタされた範囲を印刷。 ・・・・・という風に・・・ 【ボタンか、チェックボックスって書いたのは、どちらを使ったらいいのかわからないからであって、ほかにもフォームの種類がありますから、最適なのがありましたら教えてください。】 まとめると、データをボタンで絞り込んで(解除もできる)、ボタンで印刷したい。ということです。 結構、初心者なので、質問の内容がよくわからないかもしれませんけど、わかりやすく教えてください。 お願いします。
- ベストアンサー
- その他MS Office製品
- EXCELのマクロで条件2つでの合計
現在シート1に以下のようにあります。 sheet1 A B C D E 1 品名 日付 担当 個数 チェック 2 いちご 1/10 伊藤 10 ○ 3 りんご 1/15 山田 2 ○ 4 ばなな 1/10 伊藤 5 × 5 いちご 1/20 伊藤 10 △ 6 いちご 1/7 山田 5 ○ 7 ばなな 1/8 江口 5 △ 8 りんご 1/4 江口 4 ○ 9 りんご 1/18 伊藤 5 ○ 10 ばなな 1/8 伊藤 6 × 11 いちご 1/20 江口 4 ○ これを以下のようにシート2にしたいです。 sheet2 A B C D E 1 品名 日付 担当 個数 チェック 2 いちご 1/10 伊藤 20 ○ 3 りんご 1/15 山田 2 ○ 4 ばなな 1/10 伊藤 11 × 6 いちご 1/7 山田 5 ○ 7 ばなな 1/8 江口 5 △ 8 りんご 1/4 江口 4 ○ 9 りんご 1/18 伊藤 5 ○ 11 いちご 1/20 江口 4 ○ 条件は、「品名」と「担当」が同じならば個数を合計してシート2にコ記すということです。 また、「日付」と「チェック」は照合した一番上の行の「日付」と「チェック」になります。 例えば、2行目と5行目は「いちご」と「伊藤」で同じなので合計を10+10で20にします。 「日付」と「チェック」は2行目の方が上なので「1/10」と「○」になります。 以上をマクロでやりたいです。 マクロの勉強中なので色々なやり方を知りたいです。 よろしくお願いします。
- 締切済み
- オフィス系ソフト
- 該当リストにない行を削除させる方法
以下のようなファイル構成で、ワークシート2に記載した該当リストを参照して、該当しない行をワークシート1から削除させるマクロを教えて下さい。 【ワークシート1】 A列 B列 C列 ・・ X列 1組 山田 10 ・・ 10 1組 田中 10 ・・ 15 2組 鈴木 15 ・・ 20 3組 高木 20 ・・ 15 【ワークシート2】 山田 鈴木 ↓↓↓ 実行結果 A列 B列 C列 ・・ X列 1組 山田 10 ・・ 10 2組 鈴木 15 ・・ 20
- ベストアンサー
- オフィス系ソフト
- vbaマクロ一覧から担当者別にデータを転機する方法
vbaマクロ初心者です。 次のような処理をしたいのですが、調べてもなかなか思うようにいかず ここに辿りつきました。良い方法を教えてください。 【マクロで行いたい処理】 「一覧(*)のデータを、担当者毎に分かれた別シートにデータを転記する処理」 ・一覧シート上にある下記のようなデータを「担当者」にフィルターをかけて、 別の担当者毎作成したシートにデータを転記したい。 (例 「山田」シートに「一覧」シートの山田さんの行のデータをコピーしてもってくる) ・すでに担当者毎のシートは作成されているものとします。 ・「一覧」シートに複数回分かれて同一人物名前がでてきます。(例山田さんが8行目、18行目に出てくる) ・「一覧」シートのデータは100~200行、担当者は10名ほどです。 「一覧」シート(*) 担当者 商品 売・買 実施日 山田 りんご 売 2/11 鈴木 みかん 買 2/25 田中 いちご 買 山田 いちご 売 山田 オレンジ 買 また、一覧シートに記載されているが、個別の担当者シートがない場合に メッセージ等で知らせてくれる処理がありましたらその機能も追加したいと思っております。 (上記の例で申しますと、田中さんシートが処理前に作成されていないケースでそれをマクロ処理中に教えてくれる) 文章に落とすとわかりづらくなってしまい、申し訳ないのですが、どうぞよろしくお願い致します。
- ベストアンサー
- Visual Basic
補足
回答ありがとうございます! ご指摘の通り、「例えば」の例です 今日、明日と、頂いた意見を下に、考えてみます