配列の場合はバリアント型
Dim c as Variant
For Each c In 配列
処理
Next c
------------------------------------------------
コレクションの場合はバリアント型またはオブジェクト型
Dim c as Object または as Variant
For Each c In コレクション
処理
Next c
Microsoft Office ブログランキングへ
Chabin の Excel VBA ノート