Klasör İçindeki Dosya İsimlerini Güncelleme

[mertatakan3838]

Sistem dili İngilizce olan şirket bilgisayarında klasör içindeki dosya isimlerinde Türkçe karakter olduğu için makro hata vermekte. Ben klasör içindeki dosya isimlerindeki Türkçe karakter sorununu elle düzelttiğimde çalıştırmak istediğim makro görevini yapmaktadır. Ancak klasör içindeki dosya adeti çok olunca malüm elle düzeltme imkanı olmamaktadır. Benim yapmak istediğim klasör içindeki dosya isimlerindeki Türkçe karakter sorununu topluca makro ile halletmek. Bu konuda değerli hocalarımdan destek bekliyorum. Saygılarımla NOT: Dosya uzantıları pdf

 

[Ömer BARAN]

Sayın @mertatakan_3838,
Bilgisayarda değilim.
En azından kullandığınız mevcut kodu foruma eklerseniz iyi olur.
Bu şekilde daha hızlı sonuca ulaşılabilir.

 

[mertatakan3838]

Ömer hocam bu çalışmayı Klasör içindeki dosya isimlerini değiştirmede kullanıyorum. Sistem dili Türkçe olan bilgisayarda sorunsuz çalışıyor ancak sistem dili ingilizce olan şirket bilgisayarında klasör içindeki dosyaların isimlerinde Türkçe karakter olunca hata veriyor

 

[Ömer BARAN]

Yanlış düşünmüyorsam;
degistirme isimli makroda, aşağıda yeşil renklendirdiğim kısımları ekleyerek deneyin.

Bu kodu görmek için giriş yapmanız gerekmektedir (8 satır). Giriş Yap

 

[mertatakan3838]

İş yerindeki bilgisayarda deneyip size dönüş yapacağım hocam

 

[cakarem]

Sayın @mertatakan_3838
Sorunuz çözüme ulaştı ise cevabını olduğunu düşündüğünüz mesajın sağ tarafında ÇÖZÜLDÜ ikonunu tıklarsanız konuyu kapatmış oluruz.

 

[mertatakan3838]

Deneme fırsatım olmadı daha deneyince dönüş yapacağım

 

[mertatakan3838]

Değişiklikleri yapıp denedim ama maalesef dosya bulunamadı hatası aldım ömer hocam

 

[Ömer BARAN]

Örnek belgenizde eski ve yeni isimler için bir liste vardı gibi aklımda kalmış.
Sorun yaratan dosya adına ait örnek verinin de olduğu yeni bir örnek bege yükleyin isterseniz.

Önerdiğim değişiklik yeni isimdeki Türkçe karakterleri ayıklamaya yönelik idi.
Belki de ben yanlış düşündüm.

 

[mertatakan3838]

sorun bilgisayarın sistem dilinin ingilizce olması nedeni ile klasör içindeki dosya isimlerini değiştirmek istediğimde türkçe karakterli dosya ismi gördüğü zaman hata veriyor. Klasör içindeki dosya isimlerindeki Türkçe karakter sorununa elle düzeltip makroyu yeniden çalıştırdığımda makro çalışıyor sorun olmuyor.

 

[Ömer BARAN]

ESki ismi Türkçe karakter içerdiğinde öyle mi? Hatayı hangi kod satırında veriyor merak ettim.
Benim bilgisayar dilim Türkçe olduğundan deneme şansım yok ama hatanın kaynağını görebiliriz belki diye soruyorum.
Kodlarda yer alan On Error... satırlarını devre dışı bırakıp (satırın sol başına TEK TIRNAK işareti koyun) işlem yapmayı deneyin,
hata alınan satırda kod çalışmayı durdurur ve hata satırını sarı renge boyayarak VBA ekranını gösterir.
O satırı merak ettim ben.

 

[mertatakan3838]

Sirkete gidince ekran görüntüsünü alıp paylaşırım Ömer hocam benim evdeki bilgisayarda Türkçe

 

[yukselendincer]

Bu sorun bende de mevcut. İş bilgisayarımda bir şekilde oluyor ama ingilizce olan ev bilgisayarımda olmuyor. Klasördeki dosyalarda içinde türkçe karakter olanları ingilizce ile yer değiştirip, zıp yapıyorum.
Bakın aşağıdaki gibi kodum var. eski yazanda türkçe karakter var, diğerinde ingilizce. Ama bu satırda hata alıyorum. Türkçe karakterli dosyayı bulamadığını iddia ediyor.
Name FolderName & eski(i) As FolderName & yeni(i)