2016-08-24 272 views
0

我在Excel和vba中的知识接近于零。 我试图做到以下几点:Excel VBA - 查找具有特定值的所有行并获取其行数

for each row in ActiveSheet.ListObjects("SheetPotatoData") 
    if cell (column 5):(row) value equals "potato" 
     do something with (column 2):(row) 

我真的很感激,如果你能见识一下正确的语法来做到这一点。

非常感谢!

+0

https://www.google.co.uk/search?q=get+range+value+vba&sourceid=ie7&rls=com.microsoft:en-GB:IE-地址&ie =&oe =&safe = active&gfe_rd = cr&ei = 3Ia9V8XpKZDCaPvoj6gC&gws_rd = ssl –

回答

3

看看这里:http://www.excel-easy.com/vba/range-object.html

For i = 1 To ActiveSheet.ListObjects("TableNameHere").ListRows.Count 
    If Cells(i,5).Value = "potato" Then 
     Cells(i,2).Value = "New value" 
    End If 
Next 
+0

感谢您不给我一个链接到谷歌搜索:)这正是我一直在寻找的!我简单地用ActiveSheet.ListObjects(“TableNameHere”)。ListRows.Count替换了50,现在它在整个表上循环。 – Sinros

+0

使用ActiveSheet.ListObjects(“TableNameHere”)更新答案。ListRows.Count' –

相关问题