Bu dosya, web sitelerinden kopyalanan veya csv olarak açılan verilerde bozuk görünen Türkçe harflerin makrolarla toplu olarak düzeltilmesini sağlar. Örneğin ÅŸ yerine ş, ı yerine ı, ç yerine ç konur. Aynı işlem yedi farklı kodlama yöntemiyle hazırlandığından, yöntemler karşılaştırılabilir.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- data: A sütununda bozuk harf karşılıkları (ÅŸ, ı, Ç, İ, ü, Ö, Ü, ÄŸ, ö, ç vb.) listelenir. D:N aralığında hava durumu tablosu (sıcaklık, nem, rüzgar yönü, uç sıcaklık) örnek veri olarak bulunur.
- test: Aynı hava durumu tablosunun bozuk karakterli hali yer alır (ör. "Eylül", "Salı", "KuzeydoÄŸudan"). Makroların denendiği örnek veridir.
Makrolar
Makrolar Module1 modülündedir. Hepsi bozuk karakterleri bularak doğru karşılığıyla değiştirir (Replace); farkları bul/değiştir çiftlerinin nereden alındığı ve aralığın nasıl seçildiğidir.- BulDegistir1: Scripting.Dictionary kullanır; çiftler kodun içine yazılıdır. C:AA sütunlarında değiştirir.
- BulDegistir2: Dictionary kullanır; çiftler A2:B13 hücrelerinden okunur. C:AA sütunlarında değiştirir.
- BulDegistir3: Dizi (Array) yöntemi; çiftler kodda yazılıdır. Çalışınca sütun seçmeniz için bir pencere açılır.
- BulDegistir4: Dizi yöntemi; çiftler A2:B13 hücrelerinden alınır. Sütun seçim penceresi açılır.
- BulDegistir5: Döngü yöntemi; A1:B14 satırlarını sondan başa tarar ve C:AA sütunlarında değiştirir.
- BulDegistir6: Döngü yöntemi; A sütunundaki son dolu satıra kadar giden çiftleri kullanır, C:AA sütunlarında değiştirir.
- BulDegistir7: Range yöntemi; "Örnek" adlı sayfadaki A2:B13 çiftlerini kullanır. Dosyada bu adda sayfa bulunmadığından, kullanmadan önce kodda sayfa adı mevcut sayfaya göre düzenlenmelidir.
Nasıl kullanılır
- Dosyayı açıp makroları etkinleştirin.
- Düzeltilecek veriyi C:AA sütunlarına yapıştırın. Bul/Değiştir çiftleri A ve B sütunlarında tutulur; gerekirse yeni çiftler eklenebilir.
- Alt+F8 ile makro listesini açın ve bir BulDegistir makrosunu seçip çalıştırın.
- BulDegistir3 ve BulDegistir4 çalışırken açılan pencerede düzeltilecek sütunları seçin.
- Önce test sayfasındaki örnek veride denemeniz önerilir.