Excel VBA質問箱 IV

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

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


48121 / 76737 ←次へ | 前へ→

【33553】Re:複雑です、、
発言  kobasan  - 06/1/15(日) 8:43 -

引用なし
パスワード
   ponpon さん、おはようございます。
ムーン さん、Hirohumiさん、おはようございます。

>Dic.Item(dkey) = Dic.Item(dkey) + r.Offset(, 3).Text
>この段階で、    ~~~~~~~~~~~~~~~~は、まだ定義されていないので
>エラーになるような気がするのですが(もちろんエラーにはなりませんが)。
>Range("A1").Value = Range("A1").Value + 1の様な場合は、
>初めは、Range("A1").Value がNULL値(?)=0または、""と考えられるのですが・・・
>Dic.Item(dkey) = Dic.Item(dkey) + r.Offset(, 3).Text
>の場合は、まだ辞書(Dic)に何も登録していないのに、同じように考えて
>いいのでしょうか?

私も、この質問箱で、このやり方を勉強させてもらいました。
このやり方は、一石二鳥というか非常においしい話で、

dkeyがkeyに登録されてなかったら、keyに追加登録し、Itemも登録してくれる

という動きをしているわけです。
つまり、
Dic.Add myKey, r.Offset(0, 3).Text
もやってくれているわけです。

この動きを利用すると、重複しているデータを簡単に集計したり、
今回のように、同じkeyのデータを簡単にまとめることができます。
こんな説明でいいでしょうか。

ついでに、この勉強は「とまとさん」の投稿で勉強させてもらいました。
「とまと」で検索してみてください。

0 hits

【33528】複雑です、、 ムーン 06/1/14(土) 13:44 質問
【33530】Re:複雑です、、 kobasan 06/1/14(土) 16:20 回答
【33552】Re:複雑です、、 ponpon 06/1/15(日) 2:13 質問
【33553】Re:複雑です、、 kobasan 06/1/15(日) 8:43 発言
【33555】Re:複雑です、、 ponpon 06/1/15(日) 11:11 お礼
【33577】Re:複雑です、、 ムーン 06/1/16(月) 9:05 お礼
【33576】Re:複雑です、、 ムーン 06/1/16(月) 9:03 お礼
【33551】Re:複雑です、、 Hirofumi 06/1/14(土) 23:35 回答
【33578】Re:複雑です、、 ムーン 06/1/16(月) 9:07 お礼

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