Excel Karakter Kontrolü

[usngl]

Arkadaşlar elimde şöyle bir kod var:

ActiveCell.FormulaR1C1 = "=IF(LEN(RC[-1])=11,RIGHT(RC[-1],10),RC[-1])"

Fark edersiniz ki bu kod ilgili hücreye eğer 11 karakter uzunluğunda bir değer varsa ilk karakterini silmesini ve geri kalan 10 karakteri almasını söylüyor, formül olarak yapıştırıyor.

Bense 11 karakter uzunlukla birlikte bir kısıt daha eklemek istiyorum. Şöyle ki, hem 11 karakter olduğunda hemde ilk karakter S harfi olduğunda bu kural uygulansın. Şu şekilde bir derleme yaptım ancak ısrarla çalıştıramadım. Ne yapabilirim yardım edin lütfen. Şimdiden teşekkürler.

ActiveCell.FormulaR1C1 = "=IF(LEN(RC[-1])=11,IF(Left(RC[-1],1)="S", RIGHT(RC[-1],10),RC[-1]),RC[-1])"

 

[Ömer BARAN]

Merhaba.

Aşağıdakilerden biri olabilir.
-- İlkini F4 hücresine uyguladığınızı varsaydım.
-- İkincisini istediğiniz hücreye uygulayabilirsiniz.
.

"=IF(AND(LEN([B][COLOR="red"]E[/COLOR][/B][B][COLOR="Blue"]4[/COLOR][/B])=11,LEFT([B][COLOR="red"]E[/COLOR][/B][B][COLOR="Blue"]4[/COLOR][/B],1)=""S""),RIGHT([B][COLOR="red"]E[/COLOR][/B][B][COLOR="Blue"]4[/COLOR][/B],10),[B][COLOR="red"]E[/COLOR][/B][B][COLOR="Blue"]4[/COLOR][/B])"
"=IF(AND(LEN(RC[-1])=11,LEFT(RC[-1],1)=""S""),RIGHT(RC[-1],10),RC[-1])"