Exporting Excel Data As Unformatted Text

[monir]

Hello;

I'll try to simplify what I'm trying to do without getting into too much
details that might be considered irrelevant to my question.

1. A set of VBA procedures are run successfully, and the results are
compiled on a single w/s "mySheet" in a single w/b "myBook".

2. I intend to repeat 1. above 1,000s of times (same w/b, same w/s).

3. Consider a single run. The results of interest on "mySheet" are confined
to a range, say, A20:K40, named "myInpRange", with a 7-digit run identifier
ID automatically generated and stored in cell F5, say, F5 = 1234567

4. I've successfuly performed the following tasks manually:
....a) copy range A20:K40 of "mySheet"
....b) Open a new MS Word document
....c) Paste Special as Unformatted Text
....d) Save the Word file for this run As: LL_1234567.inp (="LL_" & F5 &
".inp")
....e) Close the Word file.
....f) Repeat a) to e) above for the next run.

Q: How to code a VBA Excel macro to handle Excel & Word, and run from a
button on the w/s "mySheet" to perform the tasks a) to e) above ??

In case you might wonder why I do have to go through this trouble. Well, my
next set of programs are DOS-Applications, which only allow their redirected
input data files to be as described above.

Your help would be greatly appreciated. Have a pleasant w/e.

[monir]

Sorry, I forgot to mention that I tried "Record New Macro". The end result
was, let me say, not impressive!!

Regards.

"monir" wrote:

> Hello;
>
> I'll try to simplify what I'm trying to do without getting into too much
> details that might be considered irrelevant to my question.
>
> 1. A set of VBA procedures are run successfully, and the results are
> compiled on a single w/s "mySheet" in a single w/b "myBook".
>
> 2. I intend to repeat 1. above 1,000s of times (same w/b, same w/s).
>
> 3. Consider a single run. The results of interest on "mySheet" are confined
> to a range, say, A20:K40, named "myInpRange", with a 7-digit run identifier
> ID automatically generated and stored in cell F5, say, F5 = 1234567
>
> 4. I've successfuly performed the following tasks manually:
> ...a) copy range A20:K40 of "mySheet"
> ...b) Open a new MS Word document
> ...c) Paste Special as Unformatted Text
> ...d) Save the Word file for this run As: LL_1234567.inp (="LL_" & F5 &
> ".inp")
> ...e) Close the Word file.
> ...f) Repeat a) to e) above for the next run.
>
> Q: How to code a VBA Excel macro to handle Excel & Word, and run from a
> button on the w/s "mySheet" to perform the tasks a) to e) above ??
>
> In case you might wonder why I do have to go through this trouble. Well, my
> next set of programs are DOS-Applications, which only allow their redirected
> input data files to be as described above.
>
> Your help would be greatly appreciated. Have a pleasant w/e.