vba - 使用基于多个变量的 VBA 填充 Excel 2013 中的列

Question

我有三列。 A 列显示从 1/1/2016 到年底的每个日期。 B 列当前为空。 C 列显示手动输入的日期(可以并且确实经常(手动)更改。

我想要一个 Sub(通过按钮)，按下该按钮时，将在 B 列中填充"is"或“否”值，具体取决于 A 列同一行中的值是否大于中显示的值C 栏

例如，由于 A1 (1/1/2016) 小于 C1 (1/4/2016)，B1 应显示“否”。而 A5 (1/5/2016) 大于 C1，应显示"is"。

    A            B            C
1/1/2016                  1/4/2016  
1/2/2016
1/3/2016
1/4/2016
1/5/2016
1/6/2016

Should Become

    A            B            C
1/1/2016        No        1/4/2016  
1/2/2016        No 
1/3/2016        No 
1/4/2016        No 
1/5/2016        Yes
1/6/2016        Yes

我是 VBA 新手，还没有看到任何与此直接相关的问题，因此任何简单的 VBA 建议都值得学习。

Answer 1

通常，不尝试编写答案的问题是不合适的，但这应该是一个简单的问题，希望能为您提供足够的信息，以便您将来可以开始解决此类问题。尝试添加

'Col A = Col 1, Col B = Col 2, etc.
'Cells(row num, col num)
finalRow = Cells(1000000,1).end(xlup).row
for i = 1 to finalRow
    if cells(i,1) < cells(i,3) then
        cells(i,2) = "No"
    else
        cells(i,2) = "Yes"
    end if
next i

到您的 VBA 编辑器。