作者illusionn (幻想)
看板Visual_Basic
标题[VBA ] 请问Excel中的取代怎麽写
时间Sat May 6 18:09:30 2006
请问如何把excel中为负的值全部取代为0
Sub RoundToZero()
For Each
myObject in
myCollection
'myObject和myCollection应该要如何宣告才能对选取范围
中的每一个储存格作以下的判断
If
Abs(myObject.Value) < 0 Then myObject.Value = 0
^^^ Abs是绝对值，如果只要对判断储存格内的值是否<0，应该如何改呢？
Next
End Sub
麻烦了～感激～～
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.116.86.67
※ 编辑: illusionn 来自: 140.116.86.67 (05/07 17:20)
1F：推 abliou:那就把abs去掉就好啦.. 05/07 19:30