Excel VBA質問箱 IV

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

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


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

18287 / 76738

←次へ　｜　前へ→


	【63894】選択ボックス作成について

ひいろ - 09/12/29(火) 18:21 -


	引用なし

	パスワード

エクセルのプルダウンメニューは文字が小さいのでＶＢＡで選択ボックスを作っています。
そこで，別シートに選択項目を羅列し，メインシートのセルを選択したときに
別シートの選択項目を呼び出し，そこから選べるようにしたいのですが…
作ってみたものの，表示される項目と表示されない項目があります。
ちなみに，ウィンドウは表示されるのですが中身がカラなのです。
原因がお分かりの方教えてもらえませんか？

Sub Worksheet_SelectionChange(ByVal target As Excel.Range)
　　If ActiveCell.Row > 11 Then
　　　　If ActiveCell.Column = 2 Then
　　　　　　Call dspName(1)
　　Elself ActiveCell.Column = 4 Then
　　　　Call dspName(2)
　　Elself ActiveCell.Column = 6 Then
　　　　Call dspName(4)
　　Elself ActiveCell.Column = 8 Then
　　　　Call dspName(5)
　　Elself ActiveCell.Column = 10 Then
　　　　Call dspName(4)
　　Elself ActiveCell.Column = 12 Then
　　　　Call dspName(5)
　　Elself ActiveCell.Column = 13 Then
　　　　Call dspName(6)
　　End If
End If
End Sub

(1),(2),(4)はきちんと表示されるのですが，それ以外がウィンドウは出てくるのですが肝心の項目が表示されないので，選択できない状態です。

0 hits

▼

【63894】選択ボックス作成について ひいろ 09/12/29(火) 18:21

≪