Dat Dosyasını Excele Çevirme

Bu dosya, metin tabanlı bir dat dosyasını seçip Excel sayfasına aktarmak için hazırlanmış makrolu bir çalışma kitabıdır. Dat dosyasındaki satırlar, makro çalıştırıldığında Sheet1 sayfasına yüklenir.

Dosyanın içeriği​

• Sheet1: Aktarılan verinin yazıldığı sayfadır. Mevcut örnekte A2:A71 aralığında sabit genişlikli satırlar bulunur. Her satırda öğrenci adı, sınıf bilgisi, numara ve kitapçık türü (A veya B) yer alır; ilk iki satır ANAHTAR A ve ANAHTAR B cevap anahtarı kayıtlarıdır.
• MemoQ_Data_Range_1: Sheet1 sayfasındaki A2:A71 aralığına tanımlı addır.
• Module2: Aktarımı yapan Verial makrosunu barındıran VBA modülüdür.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

• Verial: Önce dosya seçme penceresini açar; tek dosya seçimine izin verilir. Seçilen dosya, etkin sayfada A2 hücresinden başlayacak şekilde bir metin sorgusu (QueryTables) ile içeri alınır. Ayrıştırma sınırlayıcılıdır; ayırıcı olarak sekme ve noktalı virgül kullanılır, virgül ve boşluk ayırıcı sayılmaz. Karakter kodlaması 1252 olarak ayarlıdır, iki sütunun veri tipi metin olarak tanımlanır. İşlem sırasında ekran güncellemesi kapatılır, bitince açılır. Bir hata oluşursa makro mesaj vermeden sonlanır.

Makro dosya silme ya da dış bağlantı işlemi yapmaz; yalnızca kullanıcının seçtiği dosyayı okur.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Aktarım yapılacak sayfanın etkin olduğundan emin olun; veri A2 hücresinden başlar.
3. Alt+F8 ile Verial makrosunu seçip çalıştırın.
4. Açılan pencereden dönüştürülecek dat dosyasını seçin.
5. Dosyadaki satırlar sayfaya yüklenir; gerekirse sonuç ayrı bir dosya olarak kaydedilir.

Türkçe karakterler yanlış görünürse, makrodaki .TextFilePlatform değeri dat dosyasının kodlamasına göre değiştirilebilir.