[[20120509063533]]　『VBAに関心を示した中年のおっさん』（）　ページの最後に飛ぶ

『VBAに関心を示した中年のおっさん』（）
始めまして、最近ユーザーフォームに関心を抱きましたVBA素人ですが、お教えてください。
　貴様が出されていましたリストボックスコンボボックス連携リストコンボVBA----
［書籍］を選択するとコンボボックス２に［文庫］［専門書］［図鑑］が表示される。

コンボボックス連携の作成手順（RowSource方式）に従いまして記述し、実行しましたら記述最後のPrivate Sub Userform_Activate()

  .ComboBox2.RowSource="sheet3!C2:C6"でデッバクし実行時エラー３８０RowSourceプロパティを設定できません。プロパテイの値が無効です。とのコメントがでます。
　ユーザーフォーム画面に戻りますとコンボボックス１、２には表示はありません。

　使用してますエクセルは２００３にOSはWindowsXPです。宜しくお願いします。

 「sheet3」が存在しないとか…？
 「Sheet3」ではなく、「sheet3」ですか？

 前後が見えていませんが、.ComboBox2～となっていると言うことは
 With UserForm1とか何かしら記入されていますよね？

 (毛虫通過中)

 う～ん　
 やっぱり、Activate のコードを全てアップしてもらったほうがいいかな？
 それと、Initializeルーティンがあればそれも。

 ところで、シート名、Sheet3 ではなく、sheet3 でも、エクセルは気を利かせて正しく参照してくれる。

 (ぶらっと)

 >ぶらっと様
 そ、そうでした…エクセルはそんな私のようなおばかさんじゃありませんね。
 ご指摘ありがとうございます。

 そうするとぶらっと様が仰っているように前後のコードが原因ですね…

 レスを汚してしまって申し訳ありませんでした。

 (毛虫通過中@撤退)

 To 毛虫通過中さん

 いやいや、毛虫通過中さんの指摘は的を得ているかも。

 To スレ主さん

 Sheet3 を sheet3 でも、これはＯＫだけど、もし、そのブックに Sheet3 も sheet3 もなければ
 (つまり、存在しないシートを指定すれば）380 エラーで落ちるよ。

 ところで、タイトルはあくまでタイトル。質問内容が明確にわかる表現にしよう。
 もし、『VBAに関心を示した中年のおっさん』が　ＨＮ　のつもりなら
 『RowSorce設定時のエラー』(VBAに関心を示した中年のおっさん） 
 といった感じでね。

 (ぶらっと)

コメント返信：