参考 http://www.foxtable.com/webhelp/scr/1485.htm
一般是find之后没有找到对应的行,你要加入判断
If fdr IsNot Nothing Then
fdr("第一列")
End If