• Merhaba Ziyaretçi,
    10 Kasım'a Kadar VIP Paket %50 İNDİRİMLİ (bir kere öde, ömür boyu kullan)
    İndirimden yararlanmak için resme tıklayın. 👇🏻
  • Sn. Ziyaretçi,
    PEAKUP E-Book & Makale & Videoları yayınlandı.

Makale INSTR

Murat OSMA

Yönetici
Site Yöneticisi
Katılım
25 May 2018
Mesajlar
1,249
En iyi yanıt
9
Puanları
113
Konum
İstanbul
Web sitesi
excelarsivi.com
Ad Soyad
Murat OSMA
InStr( [Start], String1, String2, [Compare] )

Bir metindeki bir dizenin konumunu tam sayı olarak döndürür. (Long)


[Start]

Aramaya başlamak istediğiniz konumu temsil eden isteğe bağlı bir tam sayı argümanı.
Eğer atlanırsa, [Start] argümanı varsayılan 1 değerini alır. (Integer)

String1

Aramak istediğiniz metin (String).

String2

Aramak istediğiniz alt metin. (String)

[Compare]

Yapılacak karşılaştırmanın türünü belirten isteğe bağlı bir argüman, bir vbCompareMethod sabitidir. (Integer)
0 = vbBinaryCompare - İkili karşılaştırma yapar
1 = vbTextCompare - Metin karşılaştırması yapar
2 = vbDatabaseCompare - Veritabanı karşılaştırması yapar
(Access veritabanı kullanır)

Açıklamalar
* Bu, varsayılan olarak büyük / küçük harfe duyarlıdır.
* String2, String1 içinde bulunamazsa, 0 döndürülür .
* [Start] boş bırakılırsa, 1 kullanılır. (yani ilk karakterden aramaya başlarsınız).
* [Start] sıfır ise, bir hata oluşur.
* Belirtilen bir Seçenek Karşılaştırması bildirimi yoksa, vbBinaryCompare (0) kullanılır.
* [Compare] null ise, bir hata oluşur.
* [Compare] belirtildiğinde, [Start] da sağlanmalıdır.
* String1 = String2 veya String2, String1"in başlangıcı ise, 1 döndürülür.
* En sonundan başlamak için INSTRREV işlevini kullanabilirsiniz.
* Variant / String veri türü yerine bir Metin veri türü döndürmek için INSTR$ işlevini kullanabilirsiniz.
* Geçerli argümanlar ile INSTR$ yazıyorsanız, editör otomatik olarak bu işlevi sadece INSTR olarak değiştirecektir.
* Bayt verileriyle kullanılan INSTRB işlevini kullanabilirsiniz.

Örnek Kullanım
PHP:
Sub ExcelTurkey()
    MsgBox InStr("C:\Temp\", "C:\")
    MsgBox InStr(0, "C:\Temp\", "C:\")
    MsgBox InStr(1, "C:\Temp\", "C:\")
    MsgBox InStr(1, "anametin", "metin")
    MsgBox InStr("anametin", "anametin")
    MsgBox InStr("anametin", "nothing")
    MsgBox InStr("excelarsivi", "a")
End Sub
 
Son düzenleme:
Üst Alt