 |
|
List Archives > 
Mathcad List Archive > 
Archive by date > 
This Month By Date > 
This Month By Topic
[mathcad] RE: Pasting MathCAD documents (V11) into MS Word (97)
| [mathcad] RE: Pasting MathCAD documents (V11) into MS Word (97) |
|
Author: Sander Lablans
Posted: Tue, 26 Oct 2004 11:31:53 +0200
|
Mr Oakley,
I am not sure if you already know the following piece of code, but (perhaps)
it will remove the "screen flickering":
*****************************
Sub removeAllFrames()
' Macro 25/10/04 by Philip Oakley
For Each frm in Word.ActiveDocument.Frames
With frm
.Select
.Delete
End with
Next frm
End Sub
*****************************
As I can't paste as .rtf in Word (I am using MathCAD 2001i Pro & Word 2000
and somehow I do not get the "... as RTF"-option), I can't test the change I
made in your code, but I assume it should work.
Regards,
Sander Lablans
(Excel & VBA)
From: Oakley, Philip (UK) "mailto:philip.oakley"
Sent: dinsdag 26 oktober 2004 10:42
To: Mathcad Discussion List
Subject: [mathcad] Pasting MathCAD documents (V11) into MS Word (97)
Hi
I had to paste a 20 page MathCAD document into Word for a report. The user
wanted to be able to edit the text elements when in the report and do all
the usual post processing for publication.
As most of you will know this can be excruciating, however I have found an
easy way for MathCAD V11 to Word 97.
The basic solution is to select all the MathCAD regions (ctrl-A, ctrl-C),
then in Word (in a blank document) to use >Edit>Paste Special, and select
paste as 'Formatted Text(RTF)'. At this stage it will look horrible with
lots of overlapping frames of text and equations.
Now the neat bit. Create (>Tools>Macro>Macros.. Create) and Run the
deceptively simple Word macro:
Sub removeAllFrames()
' Macro 25/10/04 by Philip Oakley
For Each frm In Word.ActiveDocument.Frames
With frm
.Select
.Delete
End With
Next frm
End Sub
The screen will flicker madly as Word repaginates after each change but when
finished you should find all the text and equation are in the right order
and readable, and easily adjustable for that glossy report.
Comments and improvements are welcomed
MathCAD Champion
Philip J Oakley BSc CEng MIEE
Principal Systems Engineer BAE Systems, Crewe Toll,
Phase 2, 1st(NW)107.
Tel : (+44 / 0) 131 343 8910
********************************************************************
This email and any attachments are confidential to the intended
recipient and may also be privileged. If you are not the intended
recipient please delete it from your system and notify the sender.
You should not copy it or use it for any purpose nor disclose or
distribute its contents to any other person.
********************************************************************
|
| [mathcad] RE: Pasting MathCAD documents (V11) into MS Word (97) |
|
Author: Jean L J Rosenfeld
Posted: Tue, 26 Oct 2004 19:49:52 +0100
|
Your added lines work fine, Mathcad 11, Word 2002.
The added lines make it easier on the eye, just the hour glass while the
macro does its stuff.
Thanks to both of you.
Jean L.J. Rosenfeld
Argoed Hall
Bryn-y-Baal
Mold
Flintshire CH7 6SQ
Wales, UK
Tel +44 1352 750566
E-mail "Jean.Rosenfeld"
From: Sander Lablans "mailto:s.lablans"
Sent: 26 October 2004 10:32
To: Mathcad Discussion List
Subject: [mathcad] RE: Pasting MathCAD documents (V11) into MS Word (97)
Mr Oakley,
I am not sure if you already know the following piece of code, but (perhaps)
it will remove the "screen flickering":
*****************************
Sub removeAllFrames()
' Macro 25/10/04 by Philip Oakley
For Each frm in Word.ActiveDocument.Frames
With frm
.Select
.Delete
End with
Next frm
End Sub
*****************************
As I can't paste as .rtf in Word (I am using MathCAD 2001i Pro & Word 2000
and somehow I do not get the "... as RTF"-option), I can't test the change I
made in your code, but I assume it should work.
Regards,
Sander Lablans
(Excel & VBA)
From: Oakley, Philip (UK) "mailto:philip.oakley"
Sent: dinsdag 26 oktober 2004 10:42
To: Mathcad Discussion List
Subject: [mathcad] Pasting MathCAD documents (V11) into MS Word (97)
Hi
I had to paste a 20 page MathCAD document into Word for a report. The user
wanted to be able to edit the text elements when in the report and do all
the usual post processing for publication.
As most of you will know this can be excruciating, however I have found an
easy way for MathCAD V11 to Word 97.
The basic solution is to select all the MathCAD regions (ctrl-A, ctrl-C),
then in Word (in a blank document) to use >Edit>Paste Special, and select
paste as 'Formatted Text(RTF)'. At this stage it will look horrible with
lots of overlapping frames of text and equations.
Now the neat bit. Create (>Tools>Macro>Macros.. Create) and Run the
deceptively simple Word macro:
Sub removeAllFrames()
' Macro 25/10/04 by Philip Oakley
For Each frm In Word.ActiveDocument.Frames
With frm
.Select
.Delete
End With
Next frm
End Sub
The screen will flicker madly as Word repaginates after each change but when
finished you should find all the text and equation are in the right order
and readable, and easily adjustable for that glossy report.
Comments and improvements are welcomed
MathCAD Champion
Philip J Oakley BSc CEng MIEE
Principal Systems Engineer BAE Systems, Crewe Toll,
Phase 2, 1st(NW)107.
Tel : (+44 / 0) 131 343 8910
********************************************************************
This email and any attachments are confidential to the intended
recipient and may also be privileged. If you are not the intended
recipient please delete it from your system and notify the sender.
You should not copy it or use it for any purpose nor disclose or
distribute its contents to any other person.
********************************************************************
|
| [mathcad] Re: Pasting MathCAD documents (V11) into MS Word (97) |
|
Author: Richard Jackson
Posted: Tue, 26 Oct 2004 16:24:31 -0400
|
Why not just save the file in Rich Text Format, and then open it in
Word?
Richard
On 26 Oct 2004 at 9:41, Oakley, Philip (UK) wrote:
Date sent: Tue, 26 Oct 2004 09:41:52 +0100
From: "Oakley, Philip (UK)" "philip.oakley"
Subject: [mathcad] Pasting MathCAD documents (V11) into MS Word (97)
To: Mathcad Discussion List "mathcad"
Send reply to: "mathcad"
> I had to paste a 20 page MathCAD document into Word for a report. The user wanted to be able to edit the text elements when in the report and do all the usual post processing for publication.
> As most of you will know this can be excruciating, however I have found an easy way for MathCAD V11 to Word 97.
>
> The basic solution is to select all the MathCAD regions (ctrl-A, ctrl-C), then in Word (in a blank document) to use >Edit>Paste Special, and select paste as 'Formatted Text(RTF)'. At this stage it will look horrible with lots of overlapping frames of text and equations.
>
> Now the neat bit. Create ( Tools Macro Macros.. Create) and Run the deceptively simple Word macro:
>
> Sub removeAllFrames()
> ' Macro 25/10/04 by Philip Oakley
> For Each frm In Word.ActiveDocument.Frames
> With frm
> .Select
> .Delete
> End With
> Next frm
> End Sub
>
> The screen will flicker madly as Word repaginates after each change but when finished you should find all the text and equation are in the right order and readable, and easily adjustable for that glossy report.
|
| [mathcad] Re: Pasting MathCAD documents (V11) into MS Word (97) |
|
Author: Oakley, Philip UK
Posted: Wed, 27 Oct 2004 10:38:00 +0100
|
Richard
Ta for the suggestion. I hadn't realised the "Save As RTF" option was there!
I have done a quick test and it basically avoids the copy/paste stage.
But still leaves you with all the frame boundaries attached to the 'top of page' and if your page sizes [print areas] are different you get overlaps.
So: a refined way is to set the Mathcad page print area to be smaller than the Word page print area, then either use mathcad page breaks and separate regions, or manually ensure no region crosses a page boundary, save the mathcad sheet as rtf and open in word. [you may have to ensure your 'Normal' styles are compatible as well!]
The macro script allows those that don't like/want frames to remove them.
Philip
From: Richard Jackson "mailto:Richard.Jackson"
Sent: 26 October 2004 21:25
To: Mathcad Discussion List
Subject: [mathcad] Re: Pasting MathCAD documents (V11) into MS Word (97)
Why not just save the file in Rich Text Format, and then open it in
Word?
Richard
Inserted->
Mr Oakley,
I am not sure if you already know the following piece of code, but (perhaps)
it will remove the "screen flickering":
*****************************
Sub removeAllFrames()
' Macro 25/10/04 by Philip Oakley
For Each frm in Word.ActiveDocument.Frames
With frm
.Select
.Delete
End with
Next frm
End Sub
*****************************
As I can't paste as .rtf in Word (I am using MathCAD 2001i Pro & Word 2000
and somehow I do not get the "... as RTF"-option), I can't test the change I
made in your code, but I assume it should work.
Regards,
Sander Lablans
(Excel & VBA)
->
On 26 Oct 2004 at 9:41, Oakley, Philip (UK) wrote:
Date sent: Tue, 26 Oct 2004 09:41:52 +0100
From: "Oakley, Philip (UK)" "philip.oakley"
Subject: [mathcad] Pasting MathCAD documents (V11) into MS Word (97)
To: Mathcad Discussion List "mathcad"
Send reply to: "mathcad"
> I had to paste a 20 page MathCAD document into Word for a report. The user wanted to be able to edit the text elements when in the report and do all the usual post processing for publication.
> As most of you will know this can be excruciating, however I have found an easy way for MathCAD V11 to Word 97.
>
> The basic solution is to select all the MathCAD regions (ctrl-A, ctrl-C), then in Word (in a blank document) to use >Edit>Paste Special, and select paste as 'Formatted Text(RTF)'. At this stage it will look horrible with lots of overlapping frames of text and equations.
>
> Now the neat bit. Create ( Tools Macro Macros.. Create) and Run the deceptively simple Word macro:
>
> Sub removeAllFrames()
> ' Macro 25/10/04 by Philip Oakley
> For Each frm In Word.ActiveDocument.Frames
> With frm
> .Select
> .Delete
> End With
> Next frm
> End Sub
>
> The screen will flicker madly as Word repaginates after each change but when finished you should find all the text and equation are in the right order and readable, and easily adjustable for that glossy report.
********************************************************************
This email and any attachments are confidential to the intended
recipient and may also be privileged. If you are not the intended
recipient please delete it from your system and notify the sender.
You should not copy it or use it for any purpose nor disclose or
distribute its contents to any other person.
********************************************************************
|
Previous by date: [mathcad] SV: Pasting MathCAD documents (V11) into MS Word (97), Nils-Johan Tufte
Next by date: [mathcad] RE: Pasting MathCAD documents (V11) into MS Word (97), Jean L J Rosenfeld
Previous thread: [mathcad] Pasting MathCAD documents (V11) into MS Word (97), Oakley, Philip UK
Next thread: [mathcad] RE: Pasting MathCAD documents (V11) into MS Word (97), Sander Lablans
|
|
|