[VBA ] 請問Excel中的取代怎麼寫

[illusionn (幻想)]

請問如何把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)
推 abliou:那就把abs去掉就好啦..