merhaba,

1 excell dosyası yaptım, bunu eğer kendim manuel farklı kaydet CSV olarak kaydet dediğimde istediğim oluyor
kayıt yaparken değerlerin arasına ";" koyarak kaydediyor ve yine excell de aç dediğimde sanki excelmiş gibi sutunlara yerleşmiş şekilde açılıyor.

ama sorunum şu,
makro ile kaydetmek istiyorum o zaman değerlerin arasına "," koyarak kayıt yapıyor istediğim şekilde açamıyor ve okutamıyorum.

notepat.exe görüntüsü ile

istediğim sonuç


AKBNK;0;0;H;E;70;10;E;8;1;3;E
ARCLK;0;0;H;E;60;15;E;2;1;2;E
ASELS;0;0;H;E;60;10;E;3;1;2;E
BIMAS;0;0;H;E;60;10;E;1;1;2;E
EKGYO;0;0;H;E;60;10;E;24;2;2;E
EREGL;0;0;H;E;60;10;E;3;1;2;E
FROTO;0;0;H;E;60;10;E;1;1;2;E


makro ile yaparsam elde ettiğim sonuç

AKBNK,0,0,H,E,70,10,E,8,1,3,E
ARCLK,0,0,H,E,60,15,E,2,1,2,E
ASELS,0,0,H,E,60,10,E,3,1,2,E
BIMAS,0,0,H,E,60,10,E,1,1,2,E
EKGYO,0,0,H,E,60,10,E,24,2,2,E
EREGL,0,0,H,E,60,10,E,3,1,2,E
FROTO,0,0,H,E,60,10,E,1,1,2,E



makro aşağıda

Kod:
Sub KAYDET()
'
' KAYDET Makro
'
' Klavye Kısayolu: Ctrl+ÜstKrkt+B
'
    ActiveWorkbook.Save
    Range("A1:L60").Select
    Selection.Copy
    Workbooks.Add
    ActiveSheet.Paste
    Application.CutCopyMode = False
    ActiveWorkbook.SaveAs Filename:="D:\Listeler\Vdl_Spot_O.Csv", _
        FileFormat:=xlCSV, CreateBackup:=False
    ActiveWorkbook.Save
    ActiveWindow.Close
    Range("A1").Select
End Sub

makro ile kaydederken ";" olarak yaptırmanın bir yolu var mıdır?

FileFormat:=xlCSVMSDOS, olarak denedim onda da sonuç bozuk.

windows bölgesel ayarlardan ayraç ";" olmalı demişler baktım orası doğru (hatta tersini yapıyor diye "," olarakta denedim) olmuyor.