Çözüldü Makro ile büyük harf kontrolünde Hata

[japonbaba]

Merhabalar, Makro ile (F5:AJ204) Satır Aralıklarını Büyük harf kontrolünü sağladığım bir kod düzenim var. Lakin artık satır düzenim değişti 1 satır Harften1satır rakamlardan oluşuyor ÖrnekF5:AJ5)=Harf (F6:AJ6)=Rakam bu şekilde 204 satıra kadar gidiyor fakat kodlar harf yerine rakam gördüğü için hata vermeye başladı. Bende For Next döngüsü içerisine alarak 2 şer adım atlama ile çözerim diye düşündün bu sefer döngüye girer girmez Is Nothing Then Exit Sub kendini sonlandırıyor. nasıl bir çözüm sağlayabilirim yardımcı olurmusunuz?

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

[/CODE]

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[martinmax]

aşağıdaki satırı eskisi ile değiştirin.
If Intersect(Target, Range(x & Sayi & ":" & sat & Sayi)) Is Nothing Then Exit Sub

eğer çalışmaz ise örnek dosya yükleyin ordan devam edelim.

 

[japonbaba]

aşağıdaki satırı eskisi ile değiştirin.
If Intersect(Target, Range(x & Sayi & ":" & sat & Sayi)) Is Nothing Then Exit Sub

eğer çalışmaz ise örnek dosya yükleyin ordan devam edelim.

Aynı şekilde Sub dan çıkış veriyor yarın örnek dosya atacağım teşekkür ederim. Yada for next ile değilde zaten yukarıdaki ilk kodlamada satır içerisindeki veriyi target a atadığı için atadığı veri isnumarik kontrolü yapamazmıyız rakam ise direk çık değilse devam et gibi?

 

[japonbaba]

aşağıdaki satırı eskisi ile değiştirin.
If Intersect(Target, Range(x & Sayi & ":" & sat & Sayi)) Is Nothing Then Exit Sub

eğer çalışmaz ise örnek dosya yükleyin ordan devam edelim.

Teşekkür ederim Satırın en başına aşağıdaki kodu ekleyerek çözdüm HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

Kodun tamamı şöyle oldu belirlenen alanda rakam görürse sub dan çıkıyor yoksa devam edip küçük harf ise büyük harfe çeviriyor.
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[Patron]

Deneyiniz.
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[OmaR]

Teşekkür ederim Satırın en başına aşağıdaki kodu ekleyerek çözdüm HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

Kodun tamamı şöyle oldu belirlenen alanda rakam görürse sub dan çıkıyor yoksa devam edip küçük harf ise büyük harfe çeviriyor.
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[japonbaba]

Deneyiniz.
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

İki çözümü de denedim ikisi de mükemmel çalışmakta Çok teşekkür ederim yardımlarınızdan ötürü