循环通过十进制序列

Question

我在VBA中为excel编写一个循环,我想循环一系列十进制数,而不是整数.

例如:

For i = 1 To 10
    'Do something
Next i

但是,我想增加0.5(或者可能是5,或者除了1以外的任何数字),而不是增加1.

Answer 1

Dim i as Single

For i = 1 To 10 Step 0.5
    '
Next

但请注意,由于浮动数字不准确,您可能会得到一些不需要的数字.