Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

70377 / 76738

←次へ　｜　前へ→


	【10871】起動時にコンボボックスに入力

セルゲイ - 04/2/17(火) 16:38 -


	引用なし

	パスワード

いつも勉強させてもらっています。 Excelシート起動時に"Sheet1"のCombobox1に"Sheet2"のA列のデータを入力したいのですが。。 ↓のような処理を起動時に行いたいのですが、Workbook_Open()に記述してもComboBox1を認識してくれず、変数を定義しろと表示されます；； With ComboBox1 　　.Clear 　　s = Worksheets("Sheet2").Range("A65535").End(xlUp).Row - 1 　　For i = 0 To s 　　　　.AddItem (Worksheets("Sheet2").Cells(1 + i, 1).Value) 　　Next i 　　.ListIndex = s 　　.Style = fmStyleDropDownList End With 何かいい方法はないでしょうか？またComboBoxのデータはエクセルシートを閉じると消えてしまうものなのでしょうか？バージョンはExcel2000です。説明不足ですがよろしくお願いします。