Hi all,
I'm having a problem with my Word output. My target Word file has around 350 pages.
After generating the Word file, the entire contents need to be added to a bigger Word document.
Simple copy and paste does not work mainly because of heading numbering.
In the bigger Word document, my source Word document should start with heading 2.3.2.1. But since my Flare output does not have heading numbering, after I paste the document in the big Word document, there are no heading numbers. I've tried Paste Special > Keep destination formatting and it hasn't worked.
What I've done is manually apply the heading styles once again in the big Word document. But as you can imagine, for a 350 page document that is a cumbersome process.
What am I doing wrong? Any ideas on how I can achieve the page numbering with a few simple steps?
Any help in this regard is highly appreciated.
Thanks
TeSol
Heading numbering in Word output
-
- Propellus Maximus
- Posts: 1238
- Joined: Mon Feb 27, 2006 5:56 am
- Location: Melbourne, Australia
Re: Heading numbering in Word output
What styles does your Flare output have? I'm guessing it has the default styles like "h1", "h2", and so on.
To get them to work smoothly with Word documents, these need to the be Word default headings of "Heading 1", and so on.
I usually do a find/replace to make these conversions. You can manually find/replace and just select the styles to change.
I posted a macro some time ago that you can put into your templates to do this - have a look at:
viewtopic.php?f=10&t=17019
To get them to work smoothly with Word documents, these need to the be Word default headings of "Heading 1", and so on.
I usually do a find/replace to make these conversions. You can manually find/replace and just select the styles to change.
I posted a macro some time ago that you can put into your templates to do this - have a look at:
viewtopic.php?f=10&t=17019
Margaret Hassall - Melbourne
Re: Heading numbering in Word output
Thanks Margaret.
Yes, that's exactly my problem and your macro works great.
Unfortunately, my heading levels h6.heading7 and h6.heading8 don't work with the macro. And most of the headings from the Flare output should fall into those levels when inserted into the big Word document.
So, the Find and Replace method has to be done for those levels. I know its just 2 additional steps but wish the macro had worked for them too.
Thanks for your help. Much appreciated.
Regards,
TeSol
Yes, that's exactly my problem and your macro works great.
Unfortunately, my heading levels h6.heading7 and h6.heading8 don't work with the macro. And most of the headings from the Flare output should fall into those levels when inserted into the big Word document.
So, the Find and Replace method has to be done for those levels. I know its just 2 additional steps but wish the macro had worked for them too.
Thanks for your help. Much appreciated.
Regards,
TeSol
-
- Propellus Maximus
- Posts: 1238
- Joined: Mon Feb 27, 2006 5:56 am
- Location: Melbourne, Australia
Re: Heading numbering in Word output
I will see if I can make a quick adjustment. I think I left the macro plain early on as I can't easily assume what the names of the sub-styles will be.
Margaret Hassall - Melbourne
-
- Propellus Maximus
- Posts: 1238
- Joined: Mon Feb 27, 2006 5:56 am
- Location: Melbourne, Australia
Re: Heading numbering in Word output
Try including the following code into the macro from before. I have added the sub-headings before the main "h6" otherwise they will all be converted to Heading 6 in Word.
Code: Select all
Selection.Find.Style = ActiveDocument.Styles("h6.heading7")
Selection.Find.Replacement.Style = ActiveDocument.Styles("Heading 7")
Selection.Find.Execute Replace:=wdReplaceAll
Selection.Find.Style = ActiveDocument.Styles("h6.heading8")
Selection.Find.Replacement.Style = ActiveDocument.Styles("Heading 8")
Selection.Find.Execute Replace:=wdReplaceAll
Selection.Find.Style = ActiveDocument.Styles("h6.heading9")
Selection.Find.Replacement.Style = ActiveDocument.Styles("Heading 9")
Selection.Find.Execute Replace:=wdReplaceAll
Selection.Find.Style = ActiveDocument.Styles("h6")
Selection.Find.Replacement.Style = ActiveDocument.Styles("Heading 6")
Selection.Find.Execute Replace:=wdReplaceAll
Margaret Hassall - Melbourne
Re: Heading numbering in Word output
Hi Margaret,
That works perfectly! Thanks for all the help.
Much appreciated.
Regards,
TeSol
That works perfectly! Thanks for all the help.
Much appreciated.
Regards,
TeSol