Foxtable(狐表)用户栏目专家坐堂 → [求助]替换单元各中的换行符?


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

主题:[求助]替换单元各中的换行符?

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


加好友 发短信
等级:三尾狐 帖子:712 积分:5553 威望:0 精华:0 注册:2019/11/14 9:36:00
[求助]替换单元各中的换行符?  发帖心情 Post By:2021/2/9 11:28:00 [只看该作者]

 我由excel复制粘帖或导入过来的文本,在excel里有换行符,帖过来后还有,代码怎么删除这个换行,我试了几次都没成功
以下是代码:
Dim x As String
x = Tables("表B").Cols("藏品名称")
x = x.Replace(vbcrlf,"")
CurrentTable.Cols("藏品名称") = x
下面也不成功
CurrentTable.Cols("藏品名称") = CurrentTable.Cols("藏品名称").Replace(vbcrlf,"")

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


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/9 11:33:00 [只看该作者]

x = x.Replace(vbcr,"").Replace(vblf,"")

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


加好友 发短信
等级:三尾狐 帖子:712 积分:5553 威望:0 精华:0 注册:2019/11/14 9:36:00
  发帖心情 Post By:2021/2/9 11:45:00 [只看该作者]

 Dim x As Object
x = Tables("表B").Cols("藏品名称")
x = x.Replace(vbcr,"").Replace(vblf,"")
Tables("表B").Cols("藏品名称") = x

Tables("表B").Cols("藏品名称") = Tables("表B").Cols("藏品名称").Replace(vblf,"").Replace(vbcr,"")

红色的怎么都出错,
我把Replace(vblf,"")和Replace(vbcr,"")前后顺序倒了一下,还是出错

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


加好友 发短信
等级:超级版主 帖子:106665 积分:542508 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/9 11:50:00 [只看该作者]

Tables("表B").current("藏品名称") = x


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


加好友 发短信
等级:三尾狐 帖子:712 积分:5553 威望:0 精华:0 注册:2019/11/14 9:36:00
  发帖心情 Post By:2021/2/9 12:09:00 [只看该作者]

明白了,明白了


 回到顶部