• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

VLOOKUP "i" ve "ı" harflerini aynı kabul edebilir mi?

Katılım
14 Ekim 2005
Mesajlar
187
Excel Vers. ve Dili
Office 365 for Business
Merhaba,
Biri türkçe biri ingilizce harflerle oluşturulmış iki dosyayı eşleştirme problemi yaşıyorum. "İ" ve "I" harflerinin farklı görmeyecek bir sistem mümkün mü?
 
Bilgisyaraın kendi dili üzerinde yapılması bildiğim kadarıyla mümkün değil. Yani ya bilgisayar dili Türkçe'dir yahut İngilizce. Alternatifler

Kod:
Belki
Function TRSiz(ByVal vdata As String) As String
Dim tmp As String
tmp = Replace(vdata, "İ", "I")
tmp = Replace(tmp, "İ", "I")
tmp = Replace(tmp, "ı", "i")
tmp = Replace(tmp, "Ğ", "G")
tmp = Replace(tmp, "ğ", "g")
tmp = Replace(tmp, "Ş", "S")
tmp = Replace(tmp, "ş", "s")
tmp = Replace(tmp, "Ç", "C")
tmp = Replace(tmp, "ç", "c")
tmp = Replace(tmp, "Ü", "U")
tmp = Replace(tmp, "ü", "u")
TRSiz = tmp
End Function

Veya

Function Degis(Veri As String)
    Degis = Replace(Veri, "İ", "I")
End Function

Veya

Sub CommandButton1_Click()
On Error Resume Next
Dim i As Integer
Trk = Array("ı", "İ", "ğ", "Ğ", "ü", "Ü", "ş", "Ş", "ö", "Ö", "ç", "Ç")
Ing = Array("i", "I", "g", "G", "u", "U", "s", "S", "o", "O", "c", "C")
For Each Hucre In Selection
For i = 0 To 11
Hucre.Value = Replace(Hucre, Trk(i), Ing(i))
Next i
Next Hucre
MsgBox "Değişiklikler Yapılmıştır. www.excel.web.tr ailesine teşekkürler"
End Sub

Veya

YERİNEKOY(A1;"İ";"I")
 
Geri
Üst