Question

如何从同一个数字中减去多个值？

例如：

A = 1000

x = 200

y = 300

z = 400

在迭代1中：A - x = 800

在迭代2中：A - y = 500

在迭代3中：A - Z = 100

我们可以指定一个临时变量来解决这个问题吗？另外，我希望在单个单元格中减去所有这些值，这意味着值应该在单个单元格中保持变化，如下所示A1：800，A1：500，A1：100

Answer 1

这应该让你开始编程冒险：

Dim i As Long
Dim a As Double
Dim values As Variant
a = 1000
values = Array(200, 300, 400)
For i = LBound(values) To UBound(values)
    a = a - values(i)
    Range("A1") = a
    MsgBox "Cell A1 now contains: " & Range("A1").Value
Next i

从相同的数字中减去多个值

1 个答案: