用for循环语句，赋值变量从1 to 10
如果输入错误，则提示对话框"输入错误"， 再弹出一个输入对话框重新输入
现在的问题是: 这个错误信息不知道放哪了。
向我下面这样输入的话，当n=2，我在input里面输入cell(3,1)的值，他也会跳到else，提示输入错误，求大佬帮忙
If StrPtr(m) <> 0 Then
For n = 2 To t
If Cells(n, 1) = m Then
yw = Cells(n, 4)
sx = Cells(n, 6)
yy = Cells(n, 8)
zf = Cells(n, 9)
pm = Cells(n, 10)
xm = Cells(n, 2)
i = xm & " 你好" & vbCrLf & "你的排名: " & pm & vbCrLf & "你的总成绩: " & zf & vbCrLf & "语文: " & yw & vbCrLf & "数学: " & sx & vbCrLf & "英语: " & yy & vbCrLf & "总分: " & zf
MsgBox i
Exit For
Else
MsgBox "输入错误"
m = InputBox("请输入你的学号")
End If
Next
End If

你的Ｍ一开始就没东西，不管你后面输入什么都肯定会跑到else

不需要else，else里的内容放到for循环外，
上面exit for改成exit sub

初学者逻辑流程错误，画画流程图吧。