(22/10/2023, 11:44)feraz yazdı:

(22/10/2023, 11:18)mert_0671 yazdı:

(22/10/2023, 02:49)feraz yazdı: Alttaki for döngüsüne dic.existst eklemeyi unuttum hata vermemesi için.
Kod hata verirse eklenir ikinci döngüdeki For i = 2 To son bu satırın üstüne on error resume next eklenebilinir.

Üstad bunları hapabileceğini umuyorum bayağıdır Vba ile uğraşıyon

Teşekkürler hocam ilk etapta hata verdi sonra Alttaki for döngüsüne dic.existst ekleyince çalıştı. Teşekkürler yardımlarınız için

Rica ederim,kolay gelsin.

---

Set dic = CreateObject("Scripting.Dictionary")

Bunun altına
dic.comparemode=1
Yazarsanız harf duyarlılığı sorun olmaz diye biliyorum yani küçük yada büyük yazılınca.

Teşekkürler hocam hepsi büyük harf verilerin bunuda ek bilgi olarak kaydettim teşkkürler