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    OUT出力しない    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
とデータが3行ありますが、行数は作業をするたびに違います。
1行もないときもあります。
またグラフは製品ごとに今回は11種類作りたいのです。
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 -

引用なし
パスワード
   実際に作業するとき、どのように行うかを考え、
それを自動化(マクロ化)するように考えてみてください。

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

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


データ量のは、先の構文で取得できるので問題ありません。

【26630】Re:製品別のグラフ
お礼  超超初心者 E-MAIL  - 05/7/12(火) 12:53 -

引用なし
パスワード
   ▼IROC さん:
とても参考になりました。どうやりたいかじっくり考え
作成していきます。どうもありがとうございました。

9571 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free