如何将值乘以单元格范围

Question

我试图创建一个函数，在这个函数中，可以输入一个整数，表示在某个单元格中增加的百分比，然后通过此输入增加某个范围的值。我对vba很新，所以我不太清楚如何才能做到这一点。以下是我到目前为止的情况：

const example = ...
Object.keys( example ).forEach( ( key, index ) => {
    example[key]; // This is your array you wish to loop through.
});

我知道副本＆amp; paste special可能不是最有效的方法。任何正确方向的点都将非常感谢！

Answer 1

就个人而言，我会使用For循环并遍历范围内的每个单元格。另外，请注意：由于没有返回值，因此不需要Function - 也可以将Sub作为percent的参数。< / p>

Sub ADJUST(percent)
    If percent > 0 Then
        For Each cell In Range("K4:N20")
            cell.Value = cell.Value * (percent * 0.01)
        Next cell
    Else
        cell.Value = 0
    End If
End Function

测试：

Sub Test()
    Adjust (50)
End Sub

免责声明：有更简单的方法吗？最有可能。