2017-02-12 52 views
0

我想循環檢查工作表A上的單元格列&檢查工作表B中某列中是否存在該值。如果值爲那麼我需要將表A中的整行着色爲橙色。到目前爲止,我有:VBA - 引用循環中的變量針對另一個工作表中的單元格區域

For Each Cell In Sheets(5).Range("A9:A" & LastRow) 

    If Cell.Value = Sheets(6).Range(E2:E750) Then 
     Cell.EntireRow.Interior.ColorIndex = 44 

    End If 

Next Cell 

消息錯誤說有在IF行了語法錯誤,但是我已經關閉了「如果」,所以那不是它。我認爲這與'表格(6)。範圍(E2:E750)'參考有關。

我希望這將是一個快速修復,但無法在任何地方看到答案在線。

在此先感謝...

回答

0

一些錯誤:

  • Range(E2:E750)是無效Range語法,而Range("E2:E750")是一個有效的

  • 檢查在一些價值發生您想使用的範圍Find()方法Range對象

以上所有東西可能會導致:

With Sheets(6).Range("E2:E750") '<--| reference fully qualified lookup range 
    For Each Cell In Sheets(5).Range("A9:A" & LastRow) 
     If Not .Find(what:=Cell.Value, lookat:=xlWhole, LookIn:=xlValues) Is Nothing Then Cell.EntireRow.Interior.ColorIndex = 44 
    Next Cell 
End With 
+0

謝謝哥們,一如既往這似乎是簡單的語法去讓我失望。由於時間限制,我在自學時跳過了基本課程,所以我想我可能不得不重新訪問... –

+0

不客氣 – user3598756

+0

只是還有一個問題... 雖然此方法工作正常,但某些數據I我在表格(6)中引用了.Range(「E2:E750」)的格式不同。 此方法可以很好地引用我的初始值(E.G'123')與存在具有完全相同值的單元格的引用範圍。例如,當範圍內的參考值=(E.G,'121 122 123 124 125')或=(E.G,'121,122,123,124,125')時,是否有任何方法進行通配符搜索? –

相關問題