xls to txt converting

Hello addictive_mate,

You mention several different programming languages: VB.net, XML, and VBScript. I am not sure what your question really is as you have not given any details about the Excel workbook.

If it is a single sheet then you can simply save a copy of the workbook as a CSV or Comma Separated Value file. This is a special type of text file that can be read by Excel and most plain text editors. There are other ways to create text files depending on your conversion needs. It would be beneficial for you to post the workbook you want to convert.

Hello addictive_mate,

If the workbook is saved using the CSV method then each sheet becomes a separate text file. If you have more than 1 sheet in the workbook and want the entire workbook saved as a text file then a different method must be employed. To implement an alternative method, it is best to know what the physical layout and format of the file is before coding a solution. This is why I asked you to post the workbook.

Hello addictive_mate,

Copy this code to a standard VBA module in the workbook's VBA Project. Change the NewName and FilePath to what you want to use.

Sub SaveAsTextFile()

  Dim FilePath As String
  Dim NewName As String
  Dim NewWkb As Workbook
  
    FilePath = "C:\Documents and Settings\Owner"
    FilePath = IIf(Right(FilePath, 1) <> "\", FilePath & "\", FilePath)
    
    NewName = "Text Copy of " & ActiveWorkbook.Name
      
      Worksheets("Sheet1").Copy
      
      Set NewWkb = ActiveWorkbook
      
        With NewWkb
          .SaveAs FilePath & NewName, xlCSV
          .Saved = True
          .Close
        End With
    
End Sub