Foxtable(狐表)用户栏目专家坐堂 → 如何去除列各单元的换行符?代码错误请指正!


  共有7009人关注过本帖树形打印复制链接

主题:如何去除列各单元的换行符?代码错误请指正!

帅哥哟,离线,有人找我吗?
xnsiwei
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
如何去除列各单元的换行符?代码错误请指正!  发帖心情 Post By:2022/10/17 17:52:00 [只看该作者]

在命令行执行代码:
Dim x As Object
x = Tables("rw4").Cols("牵头单位")
x = x.Replace(vbcr, "").Replace(vblf, "")
Tables("rw4").Cols("牵头单位") = Tables("rw4").Cols("牵头单位").Replace(vblf, "").Replace(vbcr, "")

出现错误了

[此贴子已经被作者于2022/10/17 17:53:10编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/17 20:09:00 [只看该作者]

Tables("rw4").current("牵头单位") = Tables("rw4").current("牵头单位").Replace(vblf, "").Replace(vbcr, "")

 回到顶部
帅哥哟,离线,有人找我吗?
xnsiwei
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/10/19 9:50:00 [只看该作者]

在命令行执行代码:
Dim x As Object
x = Tables("rw4").Cols("牵头单位")
x = x.Replace(vbcr, "").Replace(vblf, "")
Tables("rw4").current("牵头单位") = Tables("rw4").current("牵头单位").Replace(vblf, "").Replace(vbcr, "")

再次出现错误了:
此主题相关图片如下:11.png
按此在新窗口浏览图片

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/19 9:52:00 [只看该作者]

前面3行代码去掉

 回到顶部
帅哥哟,离线,有人找我吗?
xnsiwei
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/10/20 16:11:00 [只看该作者]

Tables("rw4").current("牵头单位") = Tables("rw4").current("牵头单位").Replace(vblf, "").Replace(vbcr, "")

这行代码只能处理当前行,不能处理所有的行,如何才能处理所有的行,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/20 16:26:00 [只看该作者]

循环遍历所有行:http://www.foxtable.com/webhelp/topics/1438.htm

For Each r As Row In Tables("订单").Rows
   
r("牵头单位") = r("牵头单位").Replace(vblf, "").Replace(vbcr, "")
Next

 回到顶部
帅哥哟,离线,有人找我吗?
xnsiwei
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/10/20 17:08:00 [只看该作者]

问题解决,非常感谢

 回到顶部