- ベストアンサー
【Excel】1,2行目+個人行をシート別に分ける方法
- Excelで、行が3000行強、列が110列ほどの名簿があります。1、2行目は見出しで、3行目から個人の情報がズラーーっと並んでいます。この表の1,2行目+個人の1行を1シートにまとめる方法を教えてください。
- 目的は、「あなたの名簿にはこのような情報がありますよ~」を1枚の紙にまとめて、個人別に配布することです。3000人を超えているため、一気に作る方法を探しています。
- 最終的には印刷するため、印刷しやすい形にデータを整理したいです。ご案内いただけると助かります。
- みんなの回答 (4)
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (3)
- MackyNo1
- ベストアンサー率53% (1521/2850)
- 某HN クロメート(Chromate)(@CoalTar)
- ベストアンサー率40% (705/1742)
- at9_am
- ベストアンサー率40% (1540/3760)
関連するQ&A
- 一致するデータを複数シートから別のシートへ移動
Sheet1~Sheet3を用いて、 Sheet1とSheet2でそれぞれのC列の項目が一致するデータを抽出し、 該当するデータの Sheet1B列⇒Sheet3D1 Sheet2A列⇒Sheet3A1 Sheet2B列⇒Sheet3B1 Sheet2C列⇒Sheet3C1 に移動するためのマクロを組みたいと思っています。 Sheet2からSheet1に検索をかけて、 Sheet2C列≠Sheet1C列であればSheet2のA1行を削除していき Sheet2C列=Sheet1C列であれば Sheet2A~C列をSheet3A~C列へ移動するところまでは出来ました。 ※なお、Sheet3のA1行に文字列があればセルを1行追加する設定にしています。 しかし、それはA1行の文字列をそのままコピペしているだけなので Sheet1B列の一致データをSheet3D1へ移動するやり方が思い浮かびません…。 Sheet2と同じくA1行を削除していこうとしてもうまくいきませんでした。 どんどんマクロも指示文ばかりが増えてわけが分からなくなってきてしまい、挫折しています。 シンプルにするにはどうすればいいでしょうか? また、マクロの内容を載せたいのですが 会社の業務端末で組んでいるため転記できません; 申し訳ありませんが、どうかご指導ください。
- 締切済み
- その他MS Office製品
- フィルタで選択した行を別シートにコピーするマクロ
よろしくお願いします シート1 の一行目にタイトルがあって 二行目以降にデータ(30列目まで)が 入っております そのデータをオートフィルタで抽出して 抽出されたデータ(タイトル行は不要)を 選択してシート2のデータ最終行の 一行下へ貼り付けたいのですが。 シート1で Range(Cells(2, 1), Cells(Cells(65536, 1).End(xlUp).Row, 30)).Select こうやって選択した後の記述がわかりません。 このままシート2の最終行を 選択貼り付けしようとするとシート1の選択内容が 消えてしまう(シート2が最新の選択になるため?) 挿入の際に「下へ」「右へ」など聞かれるのも 面倒なので行選択したいのですが 御教授ねがいます
- ベストアンサー
- オフィス系ソフト
- VBA Excel 特定の記号を含んだ行
Excel VBAにて、質問します。お手数ですが宜しくお願いします。 画像の様に、E列に特定の記号"●"や"▲"含んだ行以外、抽出し 印刷のシート名に貼り付けしたいと思います。 ですが、条件がありまして、その条件とは、InputBoxを使って 抽出したい日付を入力し、入力した日付、時刻までの記号"●"や"▲"以外 を抽出できる様にしたいです。 例えば実行時の日付が8/21日ならば InputBoxに、8/28 20:00と入力したら、入力した日付、時刻までの 記号"●"や"▲"以外を抽出となります。 画像の様に、1行目の見出し名も貼り付けできる様に、VBAを使って できませんでしょうか? ※ 画像ではSheet1のみ載せましたが、 Sheet2とSheet3とSheet4とSheet5とSheet6まで似た内容のデータがあるので シート名を指定して動作できると良いです。 Array("Sheet1","Sheet2","Sheet3","Sheet4","Sheet5","Sheet6")見たいな 感じでできますでしょうか? 御面倒お掛けしますが宜しくお願いします。
- 締切済み
- Visual Basic
- VBA Excel 特定の記号を含む行で
Excel VBAにて、質問します。お手数ですが宜しくお願いします。 画像の様に、E列に特定の記号"●"や"▲"含んだ行以外、抽出し 印刷のシート名に貼り付けしたいと思います。 ですが、条件がありまして、その条件とは、InputBoxを使って 抽出したい日付を入力し、入力した日付、時刻までの記号"●"や"▲"以外 を抽出できる様にしたいです。 例えば実行時の日付が8/21日ならば InputBoxに、8/28 20:00と入力したら、入力した日付、時刻までの 記号"●"や"▲"以外を抽出となります。 画像の様に、1行目の見出し名も貼り付けできる様に、VBAを使って できませんでしょうか? ※ 画像ではSheet1のみ載せましたが、 Sheet2とSheet3とSheet4とSheet5とSheet6まで似た内容のデータがあるので シート名を指定して動作できると良いです。 Array("Sheet1","Sheet2","Sheet3","Sheet4","Sheet5","Sheet6")見たいな 感じでできますでしょうか? どの様なコードを書けば良いでしょうか? 御面倒お掛けしますが宜しくお願いします。
- ベストアンサー
- Visual Basic
- エクセルで抽出した不特定数のデータを行数の決まった別シートに取り込む方法を教えてください
エクセルでマクロを作り始めた初心者です。 Sheet1に、氏名、住所、TEL、会社名、担当者、金額・・・と続くデータが6000レコードほどあります。(レコードは随時増えていきます) Sheet2では、担当者名を条件にSheet1から必要な列(上記に記載したもの5つ)のみを抽出するマクロでデータを取り出すようになっています。 抽出したデータをsheet3のフォーマットに氏名、住所、金額の列だけ入れるのですが、入れられる行が20行と決まっており、最後の行には、合計欄が入るようになっています。 不特定数のレコードを20行ごとにページを区切って印刷するにはどうしたらよいでしょうか。ご教示お願いします。
- 締切済み
- オフィス系ソフト
- 別シートから値のある行を検索し、別シートに転記
シート1とシート2があり、 シート1のA7がシート2のB列にあり、シート1のB20がシート2のその行のD列の値と同じ場合、シート2該当行のF列の値をシート1のL20に書き込むのですが、どのようにマクロを記述すればいいでしょうか 例えば、 シート1のA7に「A社」、B20に「商品A」があり、 シート2のB10に「A社」が、D10に「商品A」がある場合、F10の値をシート1のL20に返す方法です。 シート2のB列には「B社」や「C社」もあるため、B列の中からシート1のA7と合致する行を検索することになります。
- ベストアンサー
- その他MS Office製品
- エクセル 関数 別シートへの抽出
エクセル関数について質問します。 「数値の入ったセルだけを、その行ごと丸々別シートに抽出する方法」 について教えてください。 例、C列に空白セルと1、2や3など、数値の入ったセルがあります。空白セル以外の数値の入ったセルを、その行ごと別シートに抽出したい。 C3とC5に数値が入ってる→3行目と5行目を別シートに抽出する。 このようなことは関数でできるのでしょうか? マクロでないと無理でしょうか? お力をお貸しください。 よろしくお願いします。
- 締切済み
- オフィス系ソフト
- 表から指定した行のみを別シートに抽出するには
エクセル2002 ある表から、集計表として別のシートに行を抽出できる関数をおしえてください。 【シート1】 O列 P列 Q列 R列 S列 T列 U列 行9 種類 厚さ w H 枚数 か所 計 行10 行11 AAA t6.8 1500 2000 3 3 9 | | 行15 AAA t3 1000 2000 2 1 2 行16 bbb t6.8 500 1500 1 3 3 : : という表から別のシートに 集計表として 【シート1】集計表AAA O列 P列 Q列 R列 S列 T列 U列 行3 種類 厚さ w H 枚数 か所 計 行4 AAA t3 1000 2000 2 1 2 行5 AAA t6.8 1500 2000 3 3 9 | | 行15 AAA t3 1000 2000 2 1 2 行16 : のように抽出する関数を教えてください。 出来れば集計表の横に種類ごとに選択したら、種類ごとに表示が変わるようならばよいのですが。。。 関数初挑戦のため大変なことになりそうな気もします。。。 皆様、ご教授のほどよろしくお願い致します。
- ベストアンサー
- その他MS Office製品
- ワークブック内の特定の複数シートの行を纏めるマクロ
1つのワークブック内に複数のシートがあり その中で特定の2シートのみ別シートにまとめたいです どのシートも1行目は見出しとなるため 2行目以降のデータのみ必要となります またデータを結合させた別シートでは最後にA列を基準として並べ替えも行いたいです このような場合はどのようにすればいいのでしょうか? 全てのシートを1つにまとめるというようなマクロは見つかったのですが・・・
- ベストアンサー
- Excel(エクセル)
- エクセルのマクロで行いたいのですが。シート1からシート3(ジャンル別の
エクセルのマクロで行いたいのですが。シート1からシート3(ジャンル別の商品データ)にあるデータを入荷した商品名で検索し、その検索結果の行を入荷した数量分コピーして、シート4(印刷)に上から順に貼り付けます。その結果をバーコードラベルで印刷し、商品に貼り付けていきたのですがどなたか教えてください。現在は、いちいちシート毎で「Ctrl+F」で検索画面を出し、商品名を検索し、なければ別のシートで検索し、該当するものが見つかれば選択して、行をコピーして印刷シートに貼り付けています。とても時間がかかっています。 シート1から3の構成は、ジャンル別で分かれていますが、 A列:商品名、B列:メーカーコード、C列:自社コード、D列:売価、E列:原価、F列:登録日 です。バーコード印刷のマクロは出来てます。 複数のシートから検索し、コピーして、印刷シートに貼り付けるマクロです。 エクセルは2003で、OSはXPのSP3です。
- ベストアンサー
- Visual Basic
補足
at9_amさん、こんにちは。早速のアドバイスをありがとうございます。 私にこれを頼んだ担当者が「差し込みを一枚ずつやるのが嫌なんですよね、シート別に分けてください」 と言っていまして・・・ ブックはいくつかに分散されても大丈夫です。 とにかく、全行分のシートがほしいっぽいです。