DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub Worksheet_Change(ByVal Target As Range)
Target.Replace What:="ç", Replacement:="c", MatchCase:=True
Target.Replace What:="ğ", Replacement:="g", MatchCase:=True
Target.Replace What:="i", Replacement:="ı", MatchCase:=True
Target.Replace What:="ö", Replacement:="o", MatchCase:=True
Target.Replace What:="ş", Replacement:="s", MatchCase:=True
Target.Replace What:="ü", Replacement:="u", MatchCase:=True
Target.Replace What:="Ç", Replacement:="C", MatchCase:=True
Target.Replace What:="Ğ", Replacement:="G", MatchCase:=True
Target.Replace What:="İ", Replacement:="I", MatchCase:=True
Target.Replace What:="Ö", Replacement:="O", MatchCase:=True
Target.Replace What:="Ş", Replacement:="S", MatchCase:=True
Target.Replace What:="Ü", Replacement:="U", MatchCase:=True
End Sub