Trim

[sujee]

Merhaba,

Aşağıdaki kod parçasında "Y" yerine "Y1","Y2","Y3" gibi ifadeler vereceğim. Fakat referans olarak her zaman ilk karakter olan "Y" harfini işleme aldırmak istiyorum. Bu hali ile "1Y" verdiğimde çalışıyor ama "Y1" verdiğimde renklendirmeyi yapmıyor. Nasıl bir değişiklik yapmam lazım?


If alan.Offset(0, 3).Value <> "" Then Kontrol = Trim(Right(alan.Offset(0, 3).Value, 10))
If alan.Value >= Kontrol And Trim(Right(alan.Offset(0, 4).Value, 1)) = "Y" Then alan.Interior.ColorIndex = 4 'YEŞİL

 

[Korhan Ayhan]

Merhaba,

Sondaki "Sağdan" komutu yerine "Soldan" komutunu kullanmayı deneyin.

Yani "Right" yerine "Left" komutunu kullanın.

 

[sujee]

Tesekkur ederim