参考
http://www.foxtable.com/webhelp/scr/0050.htm
drawcell事件,写代码
If e.col.name = "A" Then
e.text = CInt(e.text)
End If