Excel VBA質問箱 IV

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

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


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

55947 / 76732

←次へ　｜　前へ→


	【25550】ComboBoxでの参照（文字と数値の違いについて）

氷 - 05/6/4(土) 0:17 -


	引用なし

	パスワード

シートに貼り付けた「ComboBox1」に、同一シートのA1～A10の値が入っています。
そして、Comboボックスに適当な値を入力して、それがA1～A10に該当していれば、何番目で該当したかを、セル「A15」に出力し、該当しなかったり、ComboBox1の中身が空っぽなら、セル「A15」には何も表示しないようにするプログラムを作りました。
以下に記述します。

Private Sub ComboBox1_Change()

Dim i As Long

For i = 1 To 10
　If ComboBox1 = Worksheets("Sheet1").Cells(i,1) Then
　　Range("A15") = i
　　Exit For
　ElseIf ComboBox1 = "" Then
　　Range("A15") = ""
　Else
　　Range("A15") = ""
　End If
Next

End Sub

A1～A10に入っているデータが、文字列の場合は問題なく動いたのですが、数値が入っている場合には上手く行きませんでした。
文字列処理と数値処理では、何か記述が違うのでしょうか？

1 hits

▼

【25550】ComboBoxでの参照（文字と数値の違いについて） 氷 05/6/4(土) 0:17

≪