Belirli sayfalar hariç arama

[acar6783]

Hayırlı akşamlar

Kendimce Olması lazım ama nedense birtürlü aşağıda yazılı sayfalar dışında arama yaptıramıyorum kodlara.
And Yerine Or da denedim fakat yine de olmaması gereken sayfalarda bulup seçiyor.

For i = 1 To Sheets.Count
say = WorksheetFunction.CountIf(Sheets(i).Range("A1:T50"), TextBox1.Text)

If say > 0 Then
 If Sheets(i).Name <> "AnaSayfa" And _
Sheets(i).Name <> "Data" And _
 Sheets(i).Name <> "Şablon" Then
 Sheets(Sheets(i).Name).Select
End If
End If
Next i

 

[PLİNT]

Merhaba
Kodlardaki hatadan değilde
mesela kodlardaki "AnaSayfa" sayfa adında "Anasayfa" küçük harf ise veya adın sonunda/başında boşluk varsa olabilir.

 

[acar6783]

Aklıma geldi o durum fakat sayfa isimleri sayfalardan kopyalayarak yazdım.
Cok garip