Saving to Mac text

I need, for production reasons, to save from Word 2003 to Western
European (Mac)text format. This is possible from the Save As dialogue
box but I cannot figure a way of doing it in a macro.

If I simply record the macro it records the SAVEAS format:= as
straight Windows text, which produces the wrong quote and double-quote
symbols on the Mac.

The Visual Basic Help is unhelpful on the point as it simply says the
formats are listed in the SaveAs menu, and these are useless for the
format:= "xxxx" line.

I got a listing of filters using the sample FileConverter code but
this does not include Western European (Mac).

Any suggestions?

Helmut
Fri Aug 06 05:33:59 CDT 2004

Hi,
if I record such a macro, I get,
FileFormat:=105
Word 5.1 for Mactintosh.
HTH
Greetings from Bavaria, Germany
Helmut Weber, MVP
"red.sys" & chr(64) & "t-online.de"
Word XP, Win 98

Helmut
Fri Aug 06 05:41:58 CDT 2004

Hi again,
hmm..., think I misunderstood.
In Word XP I can't find an option to save as
Western European (Mac)text. But if a translation table
Word - MacText would help you, I could supply one,
at least partially, as I am using a german version.
Greetings from Bavaria, Germany
Helmut Weber
"red.sys" & chr(64) & "t-online.de"
Word XP, Win 98

clive_akass
Fri Aug 06 10:33:30 CDT 2004

Helmut Weber <elmkqznfwvccbf@mailinator.com> wrote in message news:<9hn6h013la9m84cpr8h5o77hbt03kidqur@4ax.com>...
> Hi,
> if I record such a macro, I get,
> FileFormat:=105
> Word 5.1 for Mactintosh.
> HTH
> Greetings from Bavaria, Germany
> Helmut Weber, MVP
> "red.sys" & chr(64) & "t-online.de"
> Word XP, Win 98


Thanks for that. Unfortunately I need it to be in text format. The mac
uses different symbols for quotes and double quotes.

clive_akass
Fri Aug 06 10:43:13 CDT 2004

Helmut Weber <elmkqznfwvccbf@mailinator.com> wrote in message news:<bsn6h0him887uck8gq08n00cgrflm2i958@4ax.com>...
> Hi again,
> hmm..., think I misunderstood.
> In Word XP I can't find an option to save as
> Western European (Mac)text. But if a translation table
> Word - MacText would help you, I could supply one,
> at least partially, as I am using a german version.
> Greetings from Bavaria, Germany
> Helmut Weber
> "red.sys" & chr(64) & "t-online.de"
> Word XP, Win 98

Helmut

Thanks again for your help. I know the translation needed from looking
at a hex dump but I guess that if I change the symbols it will revert
to standard text when saved. As the correct filter option is in the
SaveAs dialoque box, there must surely be a VB line that can invoke
it.

Klaus
Mon Aug 09 15:27:59 CDT 2004

Hi Clive,

Strange. For me the macro recorder produced the correct code:

ActiveDocument.SaveAs FileName:="Test.txt", _
FileFormat:=wdFormatText, _
...
Encoding:=10000, InsertLineBreaks:=False, _
AllowSubstitutions:= False, LineEnding:=wdCROnly

In the object browser I can verify that msoEncodingMacRoman = 10000.

Regards,
Klaus


"cakass" <clive_akass@vnu.co.uk> wrote:
> I need, for production reasons, to save from Word 2003 to Western
> European (Mac)text format. This is possible from the Save As dialogue
> box but I cannot figure a way of doing it in a macro.
>
> If I simply record the macro it records the SAVEAS format:= as
> straight Windows text, which produces the wrong quote and double-quote
> symbols on the Mac.
>
> The Visual Basic Help is unhelpful on the point as it simply says the
> formats are listed in the SaveAs menu, and these are useless for the
> format:= "xxxx" line.
>
> I got a listing of filters using the sample FileConverter code but
> this does not include Western European (Mac).
>
> Any suggestions?

clive_akass
Tue Aug 10 04:57:32 CDT 2004

I have tried encoding := 10000 but it does not give the correct
format. That is, it does not give the same format as I get when I save
as Western European(Mac) manually via the dialogue box.

clive_akass@vnu.co.uk (cakass) wrote in message news:<cec0378e.0408060210.1641979a@posting.google.com>...
> I need, for production reasons, to save from Word 2003 to Western
> European (Mac)text format. This is possible from the Save As dialogue
> box but I cannot figure a way of doing it in a macro.
>
> If I simply record the macro it records the SAVEAS format:= as
> straight Windows text, which produces the wrong quote and double-quote
> symbols on the Mac.
>
> The Visual Basic Help is unhelpful on the point as it simply says the
> formats are listed in the SaveAs menu, and these are useless for the
> format:= "xxxx" line.
>
> I got a listing of filters using the sample FileConverter code but
> this does not include Western European (Mac).
>
> Any suggestions?

Klaus
Tue Aug 10 08:07:48 CDT 2004

"cakass" <clive_akass@vnu.co.uk> wrote:
> I have tried encoding := 10000 but it does not give the correct
> format. That is, it does not give the same format as I get when I save
> as Western European(Mac) manually via the dialogue box.


Hi Clive,

It does for me ...
Can you post your code?

Regards,
Klaus