如何遍历多行,并调用vba取决于哪一行被标记

我有一个表格检索到用户可用的报告列表。 然后,用户在他们希望生成的报告旁边的特定列中input“X”。

如何遍历每个可用的行并计算出用户是否input了'X'?

A | B | C | D 001 | REPORT A | fnReportA | X 002 | REPORT B | fnReportB | <NULL> 003 | REPORT C | fnReportC | <NULL> 

要么

当检索列表时,如何遍历每一行,并在链接到vba的每行的末尾放置一个button以生成报告?

For Each都会做你想要做的searchtypes

一个简单的例子:

 Option Explicit Sub testit() Dim c As Range For Each c In Range("D2:D10").Cells If c.Value = "X" Then Debug.Print c.Row End If Next End Sub 

这将打印每个具有X的单元格的行号。