2009-08-01から1ヶ月間の記事一覧

Scripting.DictionaryのKeyは型に注意

hash("111")とhash(111)は別物みたいです。 Dim hash As Object Set hash = CreateObject("Scripting.Dictionary") hash("111") = "str" 'keyが文字列 hash(111) = "num" 'key整数型 MsgBox hash("111") MsgBox hash(111)

選択範囲から重複を抽出(エクセル)

重複がある奴の背景に色を塗ります。よくCOUNTIFとかで重複チェックを紹介してますが、あれだと一個目が何処にあるか分かりません。これは重複してる物は一つめから分かります。 マクロ実行↓ Sub 選択範囲を重複チェック() Dim seen As Object Set seen = Cr…

マクロでハッシュを使う(Scripting.Dictionary)

Scripting.Dictionaryと言う奴を使えばできるそうです。MSDNの説明にPerlのハッシュと同じと書いてあって男らしいと思いました。 Dim hash As Object Set hash = CreateObject("Scripting.Dictionary") hash("key1") = "unko" hash("key2") = Array("aaa", "…