[已解决]如何把表格中“△、#、\”等符号全部替换为“0”

lianzi

如何把表格中“△、#、\”等符号全部替换为“0”

最佳答案

月排行榜 / 总排行榜

xdragon

2014-3-14 14:04

参与参与

跳转到最佳答案楼层

珺珺妈

替换3次即可。

我心飞翔410

不知道你的等 是不是不止这几个啊

ghostjiao

1. Sub 替换()
   
2. Dim rng As Range
   
3.     For Each rng In Range("B2:O27")
   
4.         If Application.IsNumber(rng) = False Then
   
5.         rng.Value = 0
   
6.         End If
   
7.     Next
   
8. End Sub
   

复制代码

;刚学一点vba 感觉这个比较好使

ghostjiao

我心飞翔410 发表于 2014-3-14 13:58
不知道你的等 是不是不止这几个啊

{:112:}学委 还记得我吗？

lianzi

我心飞翔410 发表于 2014-3-14 13:58
不知道你的等 是不是不止这几个啊

是的，不只这几个，有好多特殊符号

冠军欧洲2010

1. Sub A()
   
2.     Dim RG As Range
   
3.     For Each RG In [B2:O27]
   
4.         If Not VBA.IsNumeric(RG) Then
   
5.             RG = 0
   
6.         End If
   
7.     Next
   
8. End Sub
   

复制代码

xdragon

参与参与

lianzi

xdragon 发表于 2014-3-14 14:04
参与参与

谢谢，这个方法可以以最简单的方式实现我要做的内容

tgydslr