住所の一部分をＨＩＴしたら 選択

いつもお世話になっております。
わかる方教えてくれませんでしょぅか

Range("B3").value　には住所があり
一部分がＨＩＴすると背景色をつける
というものです。

がＨＩＴした値を選択するには
どうしたらいいのか
教えてくれませんでしょぅか

Dim myRng as Range
For Each myRng in Range("D5:D8")
If Range("B3").value Like "*" & myRng.Value & "*" then
myRng.Interior.ColorIndex = 3
End if
Next

No.1 ベストアンサー 回答者： fujillin 回答日時： 2021/09/12 20:10

こんばんは

＞ＨＩＴした値を選択するには
＞どうしたらいいのか
ヒットしたセルを全部選択状態にしたいという事でしょうか？？

ループの中でヒットした個々のセルはわかると思うので、Rangeの変数にUNIONで逐次追加保管してゆき、ループが終わったらまとめてSelectすれば宜しいでしょう。
https://docs.microsoft.com/ja-jp/office/vba/api/ …

この回答へのお礼

ありがとうございました。
union(target,c)
でなんとかいけました

お礼日時：2021/09/12 20:40