[[20210719095927]]　『特定キーワードのみを検索したい』（2021-ii）　ページの最後に飛ぶ

『特定キーワードのみを検索したい』（2021-ii）

行単位に異なる文章が入力されているシートから
検索するキーワードが含む文章の行を抽出したいと考えています。

例えば
　「LED」の検索キーワードで検索すると
　3行目　xxxLED表示がある
　10行目　xxxxx Knowledgeベースのデータxxx

10行目は、Knowledgeに「LED」が含まれるため検索され
想定している動作になりません。
　
プログラム中のLookATのパラメータをxlWhole
とすると検索結果が「0」となってしまいます。

何か良い方法ありませんでしょうか？

＜プログラムの抜粋＞
For i = 4 To end_row + 3

keyWord = Sheets("分析候補データ").Cells(i, 4).Value
quickID = Sheets("分析候補データ").Cells(i, 10).Value

day_hantei = Sheets("分析候補データ").Cells(i, 14).Value

Sheets("P_SFDC").Select

Set myRange = Worksheets("P_SFDC").Range("M:M")
Set myObj = myRange.Find(keyWord, LookAt:=xlPart)

If myObj Is Nothing Then

'MsgBox "'" & keyWord & "'はありませんでした"

Else

Set myCell = myObj

Set myCell = myRange.FindNext(myCell)

If Cells(myCell.Row, 3).Value = "" Then

Exit Do

Else

If day_hantei = Cells(myCell.Row, 21).Value Then

Cells(myCell.Row, 24) = "1"
Cells(myCell.Row, 25) = keyWord & "," & Cells(myCell.Row, 25)
Cells(myCell.Row, 26) = i & "行目" & vbLf & Cells(myCell.Row, 26)
Cells(myCell.Row, 27) = quickID & "," & vbLf & Cells(myCell.Row, 27)

End If

Loop While myCell.Row <> myObj.Row

End If

＜使用 Excel：unknown、使用 OS：unknown ＞

情報が抜けていたため追記します。　
　使用EXCEL：Office365
　使用OS:Windows8.1

よろしくお願いいたします。
（2021-ii） 2021/07/19(月) 10:30

大文字と小文字を区別すればよろしいかと思います。

ご参考
https://docs.microsoft.com/ja-jp/office/vba/api/excel.range.find
（あ） 2021/07/19(月) 10:35

（あ）さんありがとうございます。

説明不足ですみません。

英文字ではあれば、大文字、小文字の区別も考えていたのですが
片かなの場合にいい方法はありますでしょうか？

例えば
　ログのキーワード検索したとき
　＜検索結果＞
　　1行目　xxxxxxxxログ表示xxxxx
　　2行目　xxxプログラムxxxx　

（2021-ii） 2021/07/19(月) 10:58

聞く前に手動で検索できるのかを確認しながらマクロ記録してそれを使ってください。
どこかでみた、意味も解らないコードを真似て動きません見つかりませんでは、
話にならないと考えます。
（何でも聞けば済むと・・・） 2021/07/19(月) 11:00

「ログ」を含むカタカナ部分を取り出して、
意味のある単語のときは除外するとかでしょうか。
（やり方は存じません）

（あ） 2021/07/19(月) 11:28

セルの値が１つの単語の文字列なら、比較は容易ですが、
複数の単語が連なった文字列では、簡単にはいかないと思いますよ。
質問者さんが、プログラムは１つの単語、ログ表示はログ+表示と判断できる
知識があるから可能であって、EXCELにも判断できるデータを準備すれば可能かと。

精々、ログであってプログラムでないといった判定なら簡単にできそうですが。
（tkit） 2021/07/19(月) 13:38

（あ）さん、（tkit）さん

ご回答ありがとうございます。
再検討したいと思います。
（2021-ii） 2021/07/19(月) 14:40

コメント返信：

[ 一覧(最新更新順) ]

[[20210719095927]] 『特定キーワードのみを検索したい』（2021-ii） ページの最後に飛ぶ

[[20210719095927]]　『特定キーワードのみを検索したい』（2021-ii）　ページの最後に飛ぶ