小编use*_*266的帖子

我正在尝试在excel模块中创建自定义函数,如下所示:

Function STATUS(valuex As String)

    If ActiveCell.Offset(0, 1).Value = valuex Then

    ActiveCell.Value = ActiveCell.Offset(0, -1).Value

    'Remove value from left column
     Activecell.offset(0,1).clearcontents

   End If

End Function

它基本上会这样做:

Number  Result  Status
          11    System
22              Type
          33    System
          44    System
55              Hardware
66              Type
          77    System
          88    System
99              Software
110             Type
         121    System
         132    System
143             Hardware
154             Type
165             Type
         176    System
187             Hardware
198             Type
209             Software

如果right cell = valuex(例如字符串"System")类似于valuex,则将左单元格值放在公式/函数单元格中并删除左列值.

但无论我编程什么,它返回的都是零(0)或名称#错误.

请帮忙