VBA StringArray（）要素と文字列を比較する

Question

文字列の最初の単語が "The"か "the"であるかによって2つの異なる処理が必要な小さなVBAプログラムを作成しています。これまでのところ、私はこれを持っていますが、それはそれらと一致していません。

Sub Venues() 

Dim masterFile As Workbook 
Set masterFile = ActiveWorkbook 

Dim venueSplitArray() As String 
Dim tempString As String 
venueSplitArray() = Split(masterFile.Sheets(Week).Cells(I, "E")) 
tempString = venueSplitArray(0) 

If StrComp(tempString = "The", 1) And StrComp(tempString = "the", 1) Then 
    ''''''CODE''''' 
Else 
    ''''''CODE''''' 
End If 

End Sub 

しかし、これは私のために働いていないと、常に文字列が一致しないことを返します。

Answer 1

あなたは「」または「」、そして使用の両方受け入れる場合：

If StrComp(tempString, "The", vbTextCompare) Then 

をあなたは「」「」からを区別したい場合には、使用：

If StrComp(tempString, "The", vbBinaryCompare) Then