Bir xls'deki makroyu diğer xls için çalıştırmak

[BUL_TR]

Değerli arkadaşlar;

Problemi şöyle özetleyebilirim:
ANA_DOSYA.xls' deki makro, sabit olan SATISLAR.xls'i açıp sheet1'deki bilgileri Sheet2'ye sıralarını değiştirerek yerleştirecek, Sheet2'yi SATISLAR_txt.TXT olarak kaydedecek.

Ekteki dosyada SATISLAR.xls'deki sheet1'deki C sütununu seçtirdim. Sheet2'ye A sütunu olarak kopyalamak istiyorum. Ama aktif olan ANA_DOSYA 'daki bir hücreyi kopyalandığı için paste ederken hata alıyorum.

Yardımlarınız için şimdiden teşekkürler, iyi çalışmalar.

 

[BUL_TR]

Günaydın arkadaşlar,
Hafta sonu olduğundan soru güme gitti galiba...
Yardımcı olabilecek arkadaşlar varsa sevineceğim..

İyi çalışmalar, iyi seneler...

 

[BUL_TR]

Yardım için hala beklemedeyim

 

[BUL_TR]

Biraz daha bekleyeyim bari...

 

[Zeki Gürsoy]

Deneyin.

Sub Sutun_Ayarla()
Dim Wb As Workbook
Set Wb = Workbooks.Open( _
    ThisWorkbook.Path & "\SATISLAR.xls")
    
    
    Wb.Sheets("Sayfa1").[c:c].Copy _
            Wb.Sheets("Sayfa2").[a:a]
    
    Wb.SaveAs "C:\SATISLAR_txt.txt", FileFormat:=xlText
    
    Wb.Close False
    
    Set Wb = Nothing
    
End Sub

 

[BUL_TR]

Hocam teşekkürler,

Yediğin ıslama köfteler helal olsun sana...