ID の簡単な検索でランタイム エラー 91 が発生しました... なぜですか? (解決済み: セルがコンマ付きの数値としてフォーマットされていたため、検索に失敗しました -- 奇妙ですが本当です。フォーマットを「一般」に変更したら、完璧に機能しました! 皆さん、ありがとうございます!)
Public Sub SearchID()
Dim foundCell As Range
Dim searchEmpID As String
Dim searchRange As Range
Dim rowFound As Integer
searchEmpID = "EmpID_0112"
Set searchRange = Sheets("HoursData").Range("DY2:DY999")
Sheets("HoursData").Select
Set foundCell = searchRange.Find(What:=searchEmpID, LookIn:=xlValues, LookAt:=xlWhole, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False)
MsgBox Sheets("HoursData").Range("DY115").Value '<<<<< データ/ID はそこにあります。スクリーンショットを参照してください。
rowFound = foundCell.Row '<<<<<<<<<<<< Why this produces Runtime Error 91/Object Variable Not Set...???
End Sub