去掉回车看看
Dim t As Table = Tables("表A")For Each r As Row In t.rows r("第一列") = r("第一列").replace(chr(13), "").replace(chr(10), "")Next
加好友 
发短信
Post By：2017/12/12 16:01:00 [显示全部帖子]
