[[20160817120547]] 『別ブックからのデータ振り分け』(maru) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『別ブックからのデータ振り分け』(maru)

初めて質問させていただきます。
一ヶ月前に仕事でVBAを使う作業を任され、VBAという言葉自体初めて聞き、言葉の意味から調べながら本やネットを使い勉強していました。
どうしても行き詰まり仕事に支障がでてきた為、ご教授いただけないかと思い質問させていただくことにしました。
詳細は以下となります。

概要
Book1(sheet1):ネットから毎月出力される集計表(自動で出力されるので形式はかえられない)

 1  A       B          C    ・・・・AC
2         コード
3                       名前
4           NO.
5         1234      あいう
6            567         えお
7         1234      かきく
8            000        けこ

 ・A列は空欄
・毎月更新されるデータはB5から入力されている
・1つの名前が2列に分かれてしまうため、B5:AC6で1名分のデータ(以降B7:AC8、B9:AC10・・と続く)
・コード1234とNO.567は本当は1234567という一つの名前コード(名前も「あいうえお」とつながっている)
・データは月により変動(50〜100件)

Book2(自分で作成した名前コード表)
sheet1

    A                   B                   C
名前コード   名前                グループ
1234567      あいうえお        G1
1234000      かきくけこ        G1
1313131      さしすせそ        G2

・名前コードはG1〜G5の5グループに分類されているので、その一覧表を作成
・更新ボタンを作成してあり、そこにこれから記載する動作をするようVBAを組みたい
・Book2のsheet2以降には、各グループのsheetを一つずつ作成してあり、Book1と同じ形式になっている(Book1の値のみ貼り付けられるように枠組みのみ用意してある)

行いたいこと
Book1のデータをBook2の表に従い、グループごとのsheetに振り分けたい

・Book2の名前コードとBook1の名前コード(コード+NO.)が一致したとき、名前コードに対するグループ名を取得
・Book2の名前コード分ループ
・取得したグループ名と同じグループsheetに、Book1のデータを設置(値のみ貼り付け)

説明が下手で申し訳ありませんが、少しでもご助言いただけますと幸いです。
宜しくお願い致します。

< 使用 Excel:Excel2013、使用 OS:Windows10 >


できているところまでのコードを提示してください。

(γ) 2016/08/17(水) 13:31


行き詰まった、というからには、ここまでに作成したVBAのソースがあるはずです。それを見せてください。
そうすれば、説明の足りていない箇所が明確になります。(例えば、Book2のsheet2以降のフォーマットがさっぱり判らなかったり)
そして、最終形丸ごとを提示して「お願いします」で済ませないでください。詰まっている部分を説明し、どうしたいのか、部分的に尋ねてください。貴方が試行錯誤している様を教えてください。そうしないと、何を教えて良いのか判らないのですよ。

また、データ例が抽象的過ぎるので、実際のデータのうち、個人や会社が特定されそうな部分を別な文字に変えた、もっとリアルなものにしてください。漢字なら漢字、数字なら数字、英字なら英字。全角なら全角、半角なら半角で、ありのままのデータにしないと、数字しかないと思っていたら英字が混じるとか、手入力で全角が混じっている、とか、VBAが誤動作する要素が判りませんから。
(???) 2016/08/17(水) 13:54


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.