在Excel VBA中将货币转换为数字

Question

每当我尝试对NIS（新以色列谢克尔）货币格式的单元格进行任何计算时，都会出现错误13类型不匹配。使用美元$，一切正常。

我想在VBA中以货币格式的单元格进行计算。 例如

Target = Target * -1

为什么这不适用于美元以外的货币？

Answer 1

您使用的变量是否有Target.value而不是Target的任何原因？

以下内容在货币固定的单元格中对我有用：

    Dim Target As Variant

    'Currency Formated Cell
    Set Target = Cells(6, 14)

    Target = Target * 2

    'Printed the calculation
    Cells(7, 14) = Target