Excel Vba正数数字大局部换成文字|萝卜系统下载站

Microsoft Excel是Microsoft为使用Windows和Apple Macintosh操作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具，再加上成功的市场营销，使Excel成为最流行的个人计算机数据处理软件。

今天拿到了一个比较棘手的难题，

把数字全部换成正数这两个字。我最早用了定位，但定位只能是数字而不能正数。我又写了定义对象大于0，后来发现居然字母都被换掉了，这显然不是我要的。后来问了一个朋友原来也还要写段代码进行是不是数字的判断。最后的结果是

Sub ee()

Dim rng As Range

For Each rng In Range("a1:d8") ‘foreach的用法

If IsNumeric(rng) And rng.Value > 0 Then ‘判断是不是数字类型,还有是不是>0

rng.Value = "正数" ‘把正数赋给所有的对象

End If

End Sub

我后来又试了其他方法，都没成功。最后决定就用这段代码好了。

Excel Vba正数数字批量换成文字2

Excel整体界面趋于平面化，显得清新简洁。流畅的动画和平滑的过渡，带来不同以往的使用体验。

温馨提示：喜欢本站的话，请收藏一下本站！

当前位置:萝卜系统下载站 > 办公软件教程 > 详细页面