excelde birbiriyle makro bağlantısı olan iki çalışma kitabu kullanıyorum. bunlardan birisi csv8virgüller ayrılmış) formatında kaydedilmek zorunda. ancak dosyayı bu formatta kaydederken sürekli "çalışma kitabınızı virgülle ayırmış.... " diye başlayan bir uyarı geliyor . dolayısı ile 1. dosyadaki verileri al ikinci dosyaya kaydet ve 2. dosyası csv formatı olarak kaydet adımlarını bulunduran makro kısmını yapamıyor. bu uyarınnın kapatılması mümkünmüdür. Kullandığım makroya ait kodlar aşağıdaki gibidir.
Range("Z13:AA43").Select
Application.CutCopyMode = False
Selection.Copy
Windows("2.csv").Activate
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
ActiveWindow.SmallScroll Down:=6
Windows("2.csv").Activate
ActiveWorkbook.Save
Windows("TOPCAM EVRAKSON.xlsm").Activate
Sheets("ERD").Select
Range("O1").Select
Range("Z13:AA43").Select
Application.CutCopyMode = False
Selection.Copy
Windows("2.csv").Activate
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
ActiveWindow.SmallScroll Down:=6
Windows("2.csv").Activate
ActiveWorkbook.Save
Windows("TOPCAM EVRAKSON.xlsm").Activate
Sheets("ERD").Select
Range("O1").Select