文本型百分比转化数值

raorulin

各位老师你们好：我现在发现了1个问题，要将表中的文本型数字转化成数字，（为百分比），用VBA 中val,*1,+0的方法都不行，其他类型的数字却可以，就百分比不行。有没有办法将文本型的百分比转化成数值呢? 谢谢大家了。

wolf03

用函数value转成小数是可以的

raorulin

wolf03 发表于 2012-4-12 16:44
用函数value转成小数是可以的

谢谢。在表中我知道该怎么做，因为天天要这样做，所以就想用VBA的方法去做。还是谢谢你。

oobird

wajour

粘贴板也很方便

raorulin

wajour 发表于 2012-4-12 16:54
粘贴板也很方便

我想学习下VBA的方法，VBA中文本型的方法val,*1,+0,数组对整数，小数都可以适用，就百分比不行，谢谢

raorulin

oobird 发表于 2012-4-12 16:53

谢谢你的回复，我想用VBA的方法尝试，在VBA中val,+0,*1对整数和小数都适用，为什么百分比的时候老是提醒错误，说类型不匹配的。

Eutopian

逐個單元格來
selection.value=format(selection.value,"0.00_")

全部單元格一起來,先選起有數值的
with selection
  .value=.value
  .NumberFormatLocal = "0.00_ "
end with

oobird

vba的做法

Sub yy()
a = Range([a1], [a1].End(4))
Range([a1], [a1].End(4)) = a
End Sub

mjzxlmg

Sub yy()
Range([a1], [a1].End(4)).Value = Range([a1], [a1].End(4)).Value
End Sub