Save Multiple Excel Sheets from a Workbook into Multiple Text Macintosh Format VBA

Hi All,

I have a VBA code that successfully saved multiple excel sheets into multiple Text Delimited files. Here is the VBA Code:

Please Login or Register  to view this content.

This code has fruitfully saved all text delimited files from a workbook into a folder.

But I want to save all these text files into Text Macintosh format. I am pretty new to VBA and I have found the above VBA code in ExcelForum.com only.

Can someone tell me what changes in the code would provide me Text Macintosh format files?

Thanks in Advance.

Please Login or Register  to view this content.

Originally Posted by slx

Please Login or Register  to view this content.

Thank you so much for your help. By the way FileFormat:=xlCSVMac generated CSV files. However, I have got a clue from your provided answer. I have just alter the file name a bit i.e. FileFormat:=xlTextMac, and it has produced the desire results I wanted.

Thank you again.