Excel VBA質問箱 IV

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

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


58908 / 76732 ←次へ | 前へ→

【22544】Re:検索方法を教えて下さい
お礼  たかし E-MAIL  - 05/2/23(水) 16:19 -

引用なし
パスワード
   ▼G-Luck さん:
ありがとう御座いました。
うまくいきました。
分からないことがいっぱいありそうなので、また活用したいと思います。
そのときは、宜しくお願いします。

>▼たかし さん:
>>▼G-Luck さん:
>>早速試してみました。うまくいきました。
>>ありがとう御座います。
>>
>>そこで、隣のC列も条件に入れようとしたのですが、うまくいきません。
>>C列には同じ数値があるのに入力してしまいます。
>>どこがおかしいのか教えて下さい。
>>宜しくお願いします。
>>
>>Private Sub test()
>>
>> Const myMessage As String = "同じ値が入力されています"
>> Dim rg As Range
>>
>> Set rg = Range("B:B").Find(TextBox.Value)
>> If rg Is Nothing Then
>>  Set rg = Range("C:C")Find(TextBox.Value)
>               ↑.
>
>>  If rg As Nothing Then
>      ↑Is
>スペルミスでは?
>
>>   '代入処理
>>  Else
>>   MsgBox myMassage
>>  End If
>> Else
>>  MsgBox myMessage
>> End If
>>End Sub
>
>後、Findの検索範囲を変更すれば、Ifを重ね無くてもいいと思います。
>Set rg = Range("B:C").Find(TextBox.Value)

0 hits

【22515】検索方法を教えて下さい たかし 05/2/23(水) 11:15 質問
【22519】Re:検索方法を教えて下さい G-Luck 05/2/23(水) 11:55 回答
【22521】Re:検索方法を教えて下さい たかし 05/2/23(水) 12:42 お礼
【22531】Re:検索方法を教えて下さい たかし 05/2/23(水) 14:57 質問
【22534】Re:検索方法を教えて下さい G-Luck 05/2/23(水) 15:11 回答
【22544】Re:検索方法を教えて下さい たかし 05/2/23(水) 16:19 お礼

58908 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free