Excel VBA質問箱 IV

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

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


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

7289 / 76732

←次へ　｜　前へ→


	【75031】文字列検索をするには

Sugano - 13/11/16(土) 18:10 -


	引用なし

	パスワード

　Excelブック画面にて、検索したい文字列を入力して、検索してくれることを
したいので、取りあえず以下のコードを書いて、一応正確に探してくれます。
　
　ただ、検索したい文字列は固定ではなく、毎回変わりますので、検索条件を
入力する機能を追加したいですが、その方法は分からなくて、このサイドに投稿
しました。ご伝授していただけませんか？よろしくお願いします。

Sub Sample2()
　　Dim FoundCell As Range　　''またはバリアント型(Variant)とする
　　Set FoundCell = Range("A1").CurrentRegion.Find(What:="あいうえお")
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　↑可変値
　　If FoundCell Is Nothing Then
　　　　MsgBox "検索に失敗しました"
　　Else
　　　　FoundCell.Select
　　End If
End Sub

325 hits

▼

【75031】文字列検索をするには Sugano 13/11/16(土) 18:10

≪