VBA Like statement

[crmpicco]

Is my syntax wrong here?

Trim(Range(sRange).Text) Like Not "Page" Then

[crmpicco]

sorry, heres my whole code. what am i missing?

If Trim(Range(sLeftRange).Text) <> UCase(Trim(Range(sLeftRange).Text)) And 
Trim(Range(sRange).Text) Like Not "Page" Then 
Range(sLeftRange).Interior.ColorIndex = iColour
End If

[crmpicco]

changed to this, but still same problem....

If Trim(Range(sLeftRange).Text) <> UCase(Trim(Range(sLeftRange).Text)) And Not Trim(Range(sLeftRange).Text) Like "Page" Then
                                Range(sLeftRange).Interior.ColorIndex = iColour
                            End If

[crmpicco]

this is confusing

http://www.sunny-beach.net/manual/249.htm

[johnske]

Hi crmpicco,

Yes, your syntax is wrong, try this

Sub LikeItOrNot()
Dim sRange
sRange = "A1"
If Not Trim(Range(sRange).Text) Like "Page" Then
MsgBox "Not Page"
Else
MsgBox "Page"
End If
End Sub

Note that while 'like' can be used as shown above for an exact match, the 'like' atatement is usually used with a wild-card character to find similar words E.G. "*Page" will give "Front Page", "Last Page",...etc. OR, "Page*" will give "Page one", Page two", etc.

HTH,
John

[crmpicco]

nice 1:

If Trim(Range(sLeftRange).Text) <> UCase(Trim(Range(sLeftRange).Text)) And Not Trim(Range(sLeftRange).Text) Like "*Page*" Then
                                Range(sLeftRange).Interior.ColorIndex = iColour
                            End If

[johnske]

Not a prob, glad to be able to help