如果條件列表對象值和字符串excel使用VBA

我是VBA中列出對象的新手。我有一個ListObjects表，並基於該表中單元格中的數據，我想更新工作簿中的另一個工作表。我的代碼如下所示。如果條件列表對象值和字符串excel使用VBA

Set tb1 = ActiveSheet.ListObjects("Table1") 

For i = 2 To Count 
    If tb1.Range(i, 6).Value = "Yes" Then 
     Worksheets("Sheet2").Cells(i,1).Value = tb1.Range(i,1).Value 
    Endif 
Next i

但是我在If條件中得到類型不匹配錯誤。你能建議我如何着手解決這個問題嗎？

在此先感謝！

問候，哈日

來源

2017-07-25 Harikrishnan K

你是如何定義TB1：從你的病情是否像

刪除值？的ListObject？ TableObject？ – PGCodeRider

你的桌子第六欄有什麼樣的數據？任何錯誤代碼（'＃N/A'等）？ – YowE3K

'Set tb1'之後的'For'塊之前是否有'Count = tb1.ListRows.Count'？ – PatricK

你有沒有在你對於語句中指定計數？

If tb1.Range(i, 6) = "Yes" Then 
    Worksheets("Sheet2").Cells(i,1) = tb1.Range(i,1) 
Endif

來源

2017-07-25 01:43:24 BData

如果條件列表對象值和字符串excel使用VBA

回答

相關問題