设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 19237|回复: 12
打印 上一主题 下一主题

[其它] 有什么方法,一次性去掉 excel 某一列中的所有标点符号吗?

[复制链接]
跳转到指定楼层
1#
发表于 2010-7-18 10:38:31 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
excel中,某一个字段(列)中,含有很多不同的标点符号,除了使用逐个替换的方法外,还有什么方法,可以一次性的去掉所有的不同的标点符号啊?请高手帮忙!在此先感谢了!

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
 楼主| 发表于 2010-7-18 10:45:21 | 只看该作者
补充:在accsee中也有这种情况,请问如何解决啊?多谢!!
3#
发表于 2010-7-18 11:23:59 | 只看该作者
知道这些符号的ASC码在什么区间就可以用循环替换的方法搞定。
4#
 楼主| 发表于 2010-7-18 12:57:33 | 只看该作者
请问有具体的步骤吗?

点击这里给我发消息

5#
发表于 2010-7-18 18:28:33 | 只看该作者
6#
 楼主| 发表于 2010-7-18 21:24:55 | 只看该作者
有什么方法,一次性去掉 access或者excel 某一列中的所有标点符号吗?

附件中的例子供参考

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

点击这里给我发消息

7#
发表于 2010-7-18 23:21:39 | 只看该作者
可以转到WORD里用替换完成
感谢OFFICE SYSTEM MVP 宋翔 支持

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
8#
 楼主| 发表于 2010-7-19 09:35:07 | 只看该作者
pureshadow 您好!您说的在Word中使用高级中的“使用通配符”,那么在查找内容里怎么写啊。多谢指点。上面有附件例子,可供参考使用


   
9#
发表于 2010-7-19 14:54:57 | 只看该作者
pureshadow 您好!您说的在Word中使用高级中的“使用通配符”,那么在查找内容里怎么写啊。多谢指点。上面有 ...
accsee使用中 发表于 2010-7-19 09:35

7楼的pureshadow管管不是已经给出截图了吗


10#
发表于 2010-7-20 11:48:28 | 只看该作者
本帖最后由 方漠 于 2010-7-20 11:53 编辑

可以写个自定义函数,把要去掉的特殊符号列举在清单上面就行了. 如下(全角符号不可辨认了,你自己列一下就行.):


Function RemoveSymbol(StrK As String) As String

'~!@#$%^&*()_-+=<>,.?/;:'"\|¡££¬£¡¡¤#£¤%¡­¡­¡ª*£¨£©£­¡ª£½+¡¶¡·£¬¡££»£º¡®¡°¡±¡¯¡¢|

'¡º¡»

StrK = Replace(StrK, "¡º", "")
StrK = Replace(StrK, "-", "")
StrK = Replace(StrK, "¡»", "")
StrK = Replace(StrK, "£º", "")
StrK = Replace(StrK, "¡°", "")
StrK = Replace(StrK, "¡±", "")
StrK = Replace(StrK, "*", "")
StrK = Replace(StrK, "¡¶", "")
StrK = Replace(StrK, "¡·", "")
StrK = Replace(StrK, "£¨", "")
StrK = Replace(StrK, "£©", "")
'.............. list all the symbol here with Replace Function
RemoveSymbol = StrK

End Function


此代码也可以在ACCESS VBA中直接使用.在QUERY里可以直接调用此函数.
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-25 18:59 , Processed in 0.100457 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表