2017-07-06 57 views
-2

如何比較單元格中的文本與字符串?我想知道一個簡單而直接的方法來做到這一點,因爲我下面的方式並不包括ABC的重複次數。如何比較單元格文本和字符串?

ABC這個詞在excel中是C17。

感謝,

Sub MediaFornecedores() 


Dim counter As Integer 
Dim i As Integer 
Dim ABC As String 


i = 14 
counter = 0 

Do While i < 5 

    If UCase(Cells(i, 3)) = "ABC" Then 
     counter = counter + 1 
    End If 

i = i + 1 
Loop 

Debug.Print counter 

End Sub 
+0

你可以定義到底是什麼 「不工作」 的主張?見[mcve]。 –

+5

你永遠不會進入循環,因爲「i」不小於5. –

回答

1

這裏應該有一些聲明......

Dim i As Integer 
Dim test As String 
Dim counter As Integer 

Set i = 1 
Set counter = 0 
Set test = "ABC" 

Do While i < 5 
    If ActiveWorksheet.Cells(i, 3) = test Then 
     counter = counter + 1 
    End If 
    i = i + 1 
Loop 
+1

如果你擺脫了3個變量的Set語句, –

+0

我對VBA語法仍然很陌生。謝謝你的提示。 –

+0

不,它沒有。計數器在直接框中仍然爲0。 – MiguelLeal