txt dosyası oluşturmak

[bulentcigali]

ben excelde yapmış olduğum bir tablonun istenilen sütunlarını seçip diskete txt dosyası olarak çıkmak istiyorum.yardımcı olursanız sevinirim.iyi çalışmalar

 

[Kemal Demir]

Sn.bulentcigali

Sub textyap()
ADRES="C:\deneme\textdosyasi.txt"
ActiveWorkbook.SaveAs Filename:=ADRES, FileFormat:=xlText
End Sub


istemiş oldugunuz ilgili sutunları başka bir sheet'e tasıyınız.

Adresi siz istediğiniz şekilde değiştirebilirsiniz.