Excelマクロ！フォーム中級編（その３）（項目設定シートからフォームのラベルに必須項目・日付項目かわかるように設定・IMEモードの設定・コンボボックスへ選択肢を追加）

[@nanakumi28]

すごいですね。Excelそのものやテーブル機能のようにいい感じに認識して設定を適応してくれるユーザーフォームなんて・・・！！

[@akios8492]

ありがとうございます！
ご活用いただければ幸いです。

[@mizukitanaka1824]

rowLast = .Cells(Rows.Count,c).End(xlUp).Row
For i = 5 to rowLast
Me.Controls(“ComboBox”&b).AddItem.Cells(i,c).Value
Next
上記の4行以降から実行エラーが出ます。
エラー内容は「実行時エラー424 オブジェクトが必要です」。
全てのコードを見比べましたが、違いが見当たらず、原因が不明です。
アドバイス、ご意見頂ければ幸いです。

[@akios8492]

Me.Controls(“ComboBox”&b).AddItem.Cells(i,c).Value
を
Me.Controls("ComboBox" & b).AddItem .Cells(i, c).Value
に変更してみてください！
スペースが入っていないところがあるのかな？と思います。

[@mizukitanaka1824]

ありがとうございます。
伺ったコードと動画を改めて見返して試してみます。

[@akios8492]

また何かございましたらご連絡ください。

[@mizukitanaka1824]

お世話になります。
伺った箇所については、AddItemと .Cellsの間にスペースを開けることでエラーなく実行出来ました。有難うございました。
ちなみにここのスペースを開ける理由は、どの様に理解したら宜しいでしょうか？
また今後、新たにコードを書いていく上で、同じ様にスペースを開けないとエラーになるケースがございましたらご教示下さい。

[@akios8492]

AddItemはメソッドですので、どの値を追加するかを引数で指定する必要があります。
Googleでプロパティとメソッドの違い等で検索していただけると違いが詳しくわかると思います。
他にもWorkbooks.Open file名など、どのファイルを開きたいか名前で指定するときにも名前が必要です。
文字列をつないだりするときの &の前後にも空白が必要です。
ComboBox1.AddItem.Cells(1, 1).Valueとつなげてしまうとコンボボックス１には、そもそもCellsというプロパティやメソッドはないのでエラーになってしまいます。
ComboBox1と.Cells(1, 1).Valueは全くの別物なのでつないでしまうとうまく実行できません。
上手に説明できなくて申し訳ございません。