Excel VBA 質問スレ Part66

[981 デフォルトの名無しさん 2020/06/24(水) 14:58:07.29 ID:ec8khzg7]

ごめん間違えた
これです
Sub Sample1()
Dim Target As Range
Set Target = Range("P:P").Find(What:="田中")
MsgBox Target.Offset(0, 1)
End Sub