excel中VBA运行出错时不弹出系统对话框而弹出自己写的提示框,不出错则正常运行，问：可以定位到出错点吗

Private Sub CommandButton1_Click()
On Error GoTo ErrDeal
比如 1/0 或者 单元格里不是数字参与了计算出错

Exit Sub
ErrDeal:
MsgBox "错误描述：" & Err.Description, vbCritical + vbOKOnly, "很抱歉，程序出了一个错误"
End Sub

请问运行出错后，可以把单元格定位到出现 分母为零或者不是数字的单元格上吗？怎么用VBA代码实现呢？？？？？

相关了解……