Hücre içerisinde virgül varsa komut çalışsın VBA ile

[nihattt]

Range("M1").Value değeri içerisinde virgül varsa bir komut dizisi yoksa başka bir komut dizisi çalıştırmak istiyorum.
basit birşey gibi ama bulamadım bir türlü. bunu VBA ile yapmak istiyorum.

 

[nihattt]

bu şekilde yaptım oldu. bulmasam uyuyamazdım tşk ederim yine de.
If Range("M1").Value Like "*,*" Then

 

[Korhan Ayhan]

Alternatifler,

If InStr(1, Range("M1").Value, ",") > 0 Then

If Len(Replace(Range("M1").Value, ",", "")) > 0 Then

 

[nihattt]

teşekkür ederim. emeğinize sağlık