Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9571 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【26590】製品別のグラフ 超超初心者 05/7/11(月) 15:38 質問[未読]
【26591】Re:製品別のグラフ IROC 05/7/11(月) 16:04 回答[未読]
【26611】Re:製品別のグラフ 超超初心者 05/7/12(火) 9:34 質問[未読]
【26615】Re:製品別のグラフ IROC 05/7/12(火) 10:26 回答[未読]
【26630】Re:製品別のグラフ 超超初心者 05/7/12(火) 12:53 お礼[未読]
【26590】製品別のグラフ
質問  超超初心者 E-MAIL  - 05/7/11(月) 15:38 -
引用なし
パスワード
   VBA初心者です。
下記のようなエクセルの表があります。
製品ごとに症状のカウント数を作ろうとしています。
その時製品ごとに一つのグラフにしたいのですが、
毎回製品の数も症状の数も違うので、どのように
コードをかけばいいのかぜんぜんわかりません。
よろしくご指導ください。


製品　　　　　　　　　　症状　　　　　　　　　　カウント

GLC150-BG41-ADK-24V　　　　異物混入　　　　　　　　9
GLC150-BG41-ADK-24V　　　　画面に傷　　　　　　　　1
GLC150-BG41-ADK-24V　　　　異物混入　　　　　　　　1
GLC150-BG41-ADPC-24V　　　　ＯＵＴ出力しない　　　　1
GLC150-BG41-XY32KF-24V　　　　タッチパネル一部入力不可1
GLC2400-TC41-24V　　　　過電圧　　　　　　　　　　　　1
GP2300-LG41-24V　　　　　　　　縦線　　　　　　　　　　1
GP2301H-LG41-24V　　　　ねじ破損　　　　　　　　2
GP2301H-LG41-24V　　　　リフレクタめくれ　　　　1
GP2301H-SC41-24V　　　　バックライト消灯　　　　1
GP2301-LG41-24V　　　　　　　　タッチがきかない　　　　1
GP2301-LG41-24V　　　　 　　　　画面が暗い　　　　　　　　2
GP2301-LG41-24V　　　　 画面非表示　 　　　　　　　　1
GP2301-LG41-24V 　　　　通信異常　　　　　　　　2
GP2301-SC41-24V　　　　 　　　　リフレクターめくれ　　　　1
GP2301-SC41-24V　　　　 　　　　リフレクタめくれ　　　　1
GP2301-TC41-24V　　　　 　　　　タッチパネルが反応しない1
GP2301-TC41-24V　　　　 　　　　画面非表示　　　　　　　　1
GP2401H-TC41-24V　　　　起動しない　　　　　　　　1
【26591】Re:製品別のグラフ
回答  IROC  - 05/7/11(月) 16:04 -
引用なし
パスワード
   >毎回製品の数も症状の数も違うので、

Range("A65536").End(Xlup).Row

これでデータの最下行を求めることができます。
【26611】Re:製品別のグラフ
質問  超超初心者 E-MAIL  - 05/7/12(火) 9:34 -
引用なし
パスワード
   ▼IROC さん：
レスありがとうございましたm(__)m
今、GLC150-BG41-ADK-24Vは
GLC150-BG41-ADK-24V　　　　異物混入　　　　　　　　9
GLC150-BG41-ADK-24V　　　　画面に傷　　　　　　　　1
GLC150-BG41-ADK-24V　　　　異物混入　　　　　　　　1
とデータが３行ありますが、行数は作業をするたびに違います。
１行もないときもあります。
またグラフは製品ごとに今回は１１種類作りたいのです。
GLC150-BG41-ADK-24V　　　　
GLC150-BG41-ADPC-24V　　　
GLC150-BG41-XY32KF-24V
GLC2400-TC41-24V　　
GP2300-LG41-24V　　　
GP2301H-LG41-24V　　　　
GP2301H-SC41-24V　　　　
GP2301-LG41-24V　　　　　　　　
GP2301-SC41-24V　　　　 　　　　
GP2301-TC41-24V　　　　 　　　　
GP2401H-TC41-24V　　　
作成するたびに製品数も製品ごとの行数も違う為どのようにすれば
VBAでグラフを作成できるのか悩んでいます。
【26615】Re:製品別のグラフ
回答  IROC  - 05/7/12(火) 10:26 -
引用なし
パスワード
   実際に作業するとき、どのように行うかを考え、
それを自動化（マクロ化）するように考えてみてください。

製品の種類ごとにグラフを作成する場合、
製品の種類ごとのデータを取得する必要があります。

たとえば、「並び替え」を行ったあと
１行ずつFOR-NEXTで調べていき下のセルと比較し、
品名が異なるまでの範囲を１つの製品のグループとして判断する。
もしくは、
フィルタオプションの「重複を無視する」の条件で
製品リストを作成し、そのリストをキーワードに
オートフィルタでデータを抽出しながらグラフを作成するとか、
方法はいろいろ考えることができます。


データ量のは、先の構文で取得できるので問題ありません。
【26630】Re:製品別のグラフ
お礼  超超初心者 E-MAIL  - 05/7/12(火) 12:53 -
引用なし
パスワード
   ▼IROC さん：
とても参考になりました。どうやりたいかじっくり考え
作成していきます。どうもありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9571 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free