For-Loop指定索引值Excel VBA

时间:2013-07-29 16:50:49

标签: vba excel-vba for-loop excel

对这个问题天真的性质表示歉意,但我对VBA来说很新。

我有一列数据,其中包含特定网页的综合浏览量。

然后我有一个单独的工作表,根据页面浏览量是否超过特定数量,指定索引值介于1到30之间。

例如,如果一个页面有10,000个页面浏览量,那么索引值为4,因为索引4是任何数字,包括8,640和最多10,368,它将成为索引5。

由于我有很多行数据要完成此索引,我想创建一个循环,它将检查每个页面应分配的索引,然后在同一行的新列中打印索引。

我一直在寻找教程,但找不到任何具体到足以帮助我的东西。如果有人有任何建议或一个简单的例子让我开始,将非常感激:)

1 个答案:

答案 0 :(得分:2)

是的,你可以用VBA做到这一点,尽管其他人已经提到它不是必需的。 忘记循环,它缓慢且不必要。

Sub HTH()

    With Sheet1.Range("A1", Sheet1.Cells(Rows.Count, "A").End(xlUp)).Offset(, 1)
        .Formula = "=VLOOKUP(A1,Sheet2!A$1:B$5,2)"
        .Value = .Value
    End With

End Sub

假设你的索引是这样的:

A1      B1
1       1
5       2
500     3
8640    4
10,368  5

您的综合浏览量位于第2页的A列。