error in code

[fizz83]

would anyone be able to tell me why using:
If oWorksheetExisting.Range("A11:A28") generates a type mismatch, is there a better way to test if the cell is in a specific range without using a second for loop?
thanks


For Each Cell In oWorksheetExisting.Range("A6:M30")

If Cell = "" Then
End If

If oWorksheetExisting.Range("A11:A28") Then
Stng = Cell
oWorksheet.Cells(CellCount, 1).Value = Stng
End If

Next Cell

 

[HBWAL]

if union(rng1, rng2).address =rng2.address then
InRange = True
End If