vba、targetのRow,Colomnの値取得

いつもお世話になります

多分、簡単ことと思いますが
分からないので教えてください

今、Cells,Find で文字を検索し二つ見つかりました
見つかったセルを
Set Target = Union(Target, FoundCell)
でセットしたのですが

二つ目のアドレスの見方が分かりません
Target.Count は　２です
一つ目のセルアドレスは　Target.Row で出てきますが
二つ目はどのようなステートメントになるのですか？

以上、よろしくお願い申し上げます

No.1 ベストアンサー 回答者： siffon9 回答日時： 2017/05/26 18:19

For Eachを使用して、Target内のセルを一つずつ読み取りましょう。

Sub Sample()
　　Dim Target As Range, FoundCell As Range
　　Dim r As Range
　　
　　Set Target = Range("A1")
　　Set FoundCell = Range("A3")
　　Set Target = Union(Target, FoundCell)
　　
　　MsgBox Target.Count
　　For Each r In Target
　　　　MsgBox r.Row
　　Next
End Sub

この回答へのお礼

ありがとうございます
出来ました

これからもよろしくお願いいたします

お礼日時：2017/05/26 18:26