Excel VBA 質問スレ Part33
レス数が900を超えています。1000を超えると表示できなくなるよ。
0903デフォルトの名無しさん
2014/06/25(水) 21:24:19.82ID:IMwLZcWPエラーのセルは数字以外のデータ("NaN")だって前提で良いのか？
Dim lastgoodrow As Long
Dim i As Long
For i = lastrow To 1 Step -1
If IsNumeric(.Cells(i, 1)) Then
lastgoodrow = i
Exit For
End If
Next
こんな感じでいけるんじゃね
Do Loopでもやれなくはないけど
レス数が900を超えています。1000を超えると表示できなくなるよ。