excel - VBA 将负数转换为正数

Question

在将我的结果过滤到零以下的函数之后，我必须将其写为肯定结果，即没有“-”。但是，我收到错误 "Object variable or With block not set"。我做错了什么？

Dim cl As Range
cl = wbMe.Sheets("pochodne").Range("T35").Copy
   If cl.Value < 0 Then
       cl.Value = -cl.Value
   End If

Answer 1

对象需要“设置”，所以尝试:

Dim wbMe    As Excel.Workbook
Dim cl      As Excel.Range

Set wbMe = ThisWorkbook

Set cl = wbMe.Worksheets("pochodne").Range("T35")
If cl.Value < 0 Then
   cl.Value = -cl.Value
End If

这在这里有效。