コンボボックスで1Gから6Gのどれかを1つ選択させたいん
ですが、Arrayの使い方に問題があるんでしょうか？
教えてください。
よろしくお願いします。

Dim h as variant

With teamControl("CmboBox", ix)
　　'繰り返し処理：1Gから6Gを選択'
    For h = Array("1G","2G","3G","4G","5G","6G")
    　　'追加'
        .AddItem CStr(h)
    Next
End With

> ですが、Arrayの使い方に問題があるんでしょうか？
Array の使い方はともかく…For ステートメントが文法違反です。


>     For h = Array("1G","2G","3G","4G","5G","6G")

For Each h In Array("1G","2G","3G","4G","5G","6G")

魔界の仮面弁士さん、回答ありがとうございます。
おかげさまで解決しました。