ekzeldeki verileri farklı kaydet komutuyl .csv olarak kaydediyorum ve .csv uzantısını .txt yapıp açıyorum herşey normal güzel alanları ; karakteriyle ayırmış oluyor. Ekzeldeki verileri .csv formatında C:\ sürücüsüne kaydeden makro yapıyorum .csv uzantısını .txt olarak değiştirip açıyorum lakin (,) karakteriyle alanları ayırmış oluyor. Makro düzenlemeye girip ne yapmalıyım ki alanları ; karakteriyle ayırmış olsun? bu makroyu office excell 2007 versiyonunda yaptım.
-
DİKKAT DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
exceldeki verileri txt dosyasına dönüştüren makro yapmak.
- Konbuyu başlatan KAYALARLI
- Başlangıç tarihi
Range("A3").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
ChDir "C:\x"
ActiveWorkbook.SaveAs Filename:="C:\x\SON HAL EMEKLİ HARİKA.csv", FileFormat _
:=xlCSV, CreateBackup:=False böyle bir makro yazdım ama noktalı virgül ile ayıracağına virgül ile ayırıyor. Makro doğru çalışıyor lakin noktalı virgül ayracı kullanmasını istiyorum
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
ChDir "C:\x"
ActiveWorkbook.SaveAs Filename:="C:\x\SON HAL EMEKLİ HARİKA.csv", FileFormat _
:=xlCSV, CreateBackup:=False böyle bir makro yazdım ama noktalı virgül ile ayıracağına virgül ile ayırıyor. Makro doğru çalışıyor lakin noktalı virgül ayracı kullanmasını istiyorum
24625589382,66325012,hasan,saĞir,0815,01,2,3000,
Makronun Sonucu Bu Şekİlde VİrgÜl Yerİne Noktali VİrgÜl Koymasini İstİyorum. Şİmdİden Yardimlariniz İÇİn TeŞekkÜr Ederİm.
Makronun Sonucu Bu Şekİlde VİrgÜl Yerİne Noktali VİrgÜl Koymasini İstİyorum. Şİmdİden Yardimlariniz İÇİn TeŞekkÜr Ederİm.