以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  列中值替换  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=61586)

--  作者:一笑
--  发布时间:2014/12/15 14:53:00
--  列中值替换
在“统计”表中有一个列名为“机型1”的数据列,想把列中原来字符“G450”和"G550"替换为“GV”,如何用代码实现,谢谢!
--  作者:新福星
--  发布时间:2014/12/15 14:59:00
--  
DataTables("统计").ReplaceFor(“机型1”,“GV”,机型1=‘G450’ Or 机型1=‘G550‘")
--  作者:有点甜
--  发布时间:2014/12/15 15:01:00
--  
For Each r As Row In Tables("表A").Rows
    r("第一列") = r("第一列").replace("G", "VG")
Next

--  作者:一笑
--  发布时间:2014/12/15 15:37:00
--  
谢谢两位指教。
另外,甜老师,你的代码一次替换一种字符,处于学习目的,如果要同时替换两种字符,代码如何改动,自己改了改,不管用,谢谢:
For Each r As Row In Tables("表A").Rows
    r("第一列") = r("第一列").replace("G450" or "G550" , "GV")
Next


--  作者:有点甜
--  发布时间:2014/12/15 15:42:00
--  
For Each r As Row In Tables("表A").Rows
    \'If r("第一列").Contains("G450") Then
        r("第一列") = r("第一列").replace("G450", "VG")
    \'Else If r("第一列").Contains("G550")
        r("第一列") = r("第一列").replace("G550", "VG")
    \'End If
Next