+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: İç İçe Yerinekoy Formülü (/konu-ic-ice-yerinekoy-formulu.html)
İç İçe Yerinekoy Formülü - enginbeyy - 09/09/2020
merhaba birden fazla kelimeyi hep aynı kelimeyle değiştirmek istiyorum.
mesela a1 hücresinde "fg" veya "as" veya "yd" veya "sy" bunlardan hangisi varsa hep "sd"ye dönüştürsün.
Tesekkürler.
RE: İç İçe Yerinekoy Formülü - berduş - 09/09/2020
RegEx fonksiyonunun replace komutunu arastırmanız işinize yaryabilir
RE: İç İçe Yerinekoy Formülü - enginbeyy - 09/09/2020
(09/09/2020, 10:42)berduş yazdı: RegEx fonksiyonunun replace komutunu arastırmanız işinize yaryabilirHocam Excel için soruyorum ama yine de bakayım mı buna.
RE: İç İçe Yerinekoy Formülü - berduş - 09/09/2020
excelde de çalışır diye biliyorum tabi kod sayfasında
RE: İç İçe Yerinekoy Formülü - berduş - 09/09/2020
önce çalışmanıza bir modül ekleyip aşağıdaki fonksiyonu tanımlayın
Function RegExpVeya(Mtn As String) As String
Dim RegEx As Object
Set RegEx = CreateObject("VBScript.RegExp")
RegEx.IgnoreCase = False
RegEx.Global = True
RegEx.Pattern = "fg|as|yd|sy"
RegExpVeya = RegEx.Replace(Mtn, "sd")
End Function=RegExpVeya(A1)RE: İç İçe Yerinekoy Formülü - enginbeyy - 09/09/2020
(09/09/2020, 11:42)berduş yazdı: önce çalışmanıza bir modül ekleyip aşağıdaki fonksiyonu tanımlayınhocam yaptım ama değiştirmeden veriyor.
sonra diyelim ki B1 hücresine şu eşitliği yazınFunction RegExpVeya(Mtn As String) As String
Dim RegEx As Object
Set RegEx = CreateObject("VBScript.RegExp")
RegEx.IgnoreCase = False
RegEx.Global = True
RegEx.Pattern = "fg|as|yd|sy"
RegExpVeya = RegEx.Replace(Mtn, "sd")
End Function
temel mantık bu=RegExpVeya(A1)