[Phil00]

Hey,

I'm using the macro found on G Mayor's site to help me merge letters to
seperate files. I finally got everything working. When i dont split the files
everything runs perfect, but as soon as i use the macro, split the files, i
notice the formating becomes ruined. I now have a combination of fonts in the
document as well as what seem to be random page and section breaks.

Any ideas?

Thanks.

Phil

[Graham Mayor]

The macro creates a new document for each record based on normal.dot. If
your merge document is based on some other template then there will be some
inevitable differences in formatting when you run the macro. You could edit
the code to base your merge documents on a *blank version* of your letter
template if you wish eg change the line

Set NewDoc = Documents.Add(Visible:=False)
to
Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

or better still create your merge documents from normal.dot
--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


Phil00 wrote:
Hey,

I'm using the macro found on G Mayor's site to help me merge letters
to seperate files. I finally got everything working. When i dont
split the files everything runs perfect, but as soon as i use the
macro, split the files, i notice the formating becomes ruined. I now
have a combination of fonts in the document as well as what seem to
be random page and section breaks.

Any ideas?

Thanks.

Phil

[Phil00]

Alright, so im new to this whole macro thing in word. This document is
created from a 2 page template. If I were to use this code

Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

Would i change the path to correspond where the template is? I tryed that
and got an error code indicating an error within the script.

Thanks for your prompt response though!!!

I look like a hero working on this in my office! hahaha


"Graham Mayor" wrote:

The macro creates a new document for each record based on normal.dot. If
your merge document is based on some other template then there will be some
inevitable differences in formatting when you run the macro. You could edit
the code to base your merge documents on a *blank version* of your letter
template if you wish eg change the line

Set NewDoc = Documents.Add(Visible:=False)
to
Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

or better still create your merge documents from normal.dot
--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


Phil00 wrote:
Hey,

I'm using the macro found on G Mayor's site to help me merge letters
to seperate files. I finally got everything working. When i dont
split the files everything runs perfect, but as soon as i use the
macro, split the files, i notice the formating becomes ruined. I now
have a combination of fonts in the document as well as what seem to
be random page and section breaks.

Any ideas?

Thanks.

Phil

[Phil W]

The exact error code is 4605 command not available.

Originally Posted by Phil00

Alright, so im new to this whole macro thing in word. This document is
created from a 2 page template. If I were to use this code

Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

Would i change the path to correspond where the template is? I tryed that
and got an error code indicating an error within the script.

Thanks for your prompt response though!!!

I look like a hero working on this in my office! hahaha


"Graham Mayor" wrote:

The macro creates a new document for each record based on normal.dot. If
your merge document is based on some other template then there will be some
inevitable differences in formatting when you run the macro. You could edit
the code to base your merge documents on a *blank version* of your letter
template if you wish eg change the line

Set NewDoc = Documents.Add(Visible:=False)
to
Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

or better still create your merge documents from normal.dot
--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


Phil00 wrote:
Hey,

I'm using the macro found on G Mayor's site to help me merge letters
to seperate files. I finally got everything working. When i dont
split the files everything runs perfect, but as soon as i use the
macro, split the files, i notice the formating becomes ruined. I now
have a combination of fonts in the document as well as what seem to
be random page and section breaks.

Any ideas?

Thanks.

Phil

[Graham Mayor]

The original command Creates (Documents.Add) new documents based on the
default template i.e. normal.dot.
The revised command creates the documents based on the particular named
template. Here
D:\Word Templates Path\TemplateName.dot
Change that to the path and name of the blank template you wish to use and
note that the line has broken in the e-mail editor so it should all be on
the same line.
--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org



Phil00 wrote:
Alright, so im new to this whole macro thing in word. This document
is created from a 2 page template. If I were to use this code

Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

Would i change the path to correspond where the template is? I tryed
that and got an error code indicating an error within the script.

Thanks for your prompt response though!!!

I look like a hero working on this in my office! hahaha


"Graham Mayor" wrote:

The macro creates a new document for each record based on
normal.dot. If your merge document is based on some other template
then there will be some inevitable differences in formatting when
you run the macro. You could edit the code to base your merge
documents on a *blank version* of your letter template if you wish
eg change the line

Set NewDoc = Documents.Add(Visible:=False)
to
Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

or better still create your merge documents from normal.dot
--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


Phil00 wrote:
Hey,

I'm using the macro found on G Mayor's site to help me merge letters
to seperate files. I finally got everything working. When i dont
split the files everything runs perfect, but as soon as i use the
macro, split the files, i notice the formating becomes ruined. I now
have a combination of fonts in the document as well as what seem to
be random page and section breaks.

Any ideas?

Thanks.

Phil

[Doug Robbins - Word MVP]

If in the code, you have the command split across two rows, place the cursor
at the end of the first line and press delete, to get the command all on one
row.

Or, insert a Visual Basic line break character (space then underscore) as
follows

Set NewDoc = Documents.Add(Template:="D:\Word Templates _
Path\TemplateName.dot", Visible:=False)


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"Phil W" wrote in message
...

The exact error code is 4605 command not available.

Phil00;325336 Wrote:
Alright, so im new to this whole macro thing in word. This document is

created from a 2 page template. If I were to use this code

Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

Would i change the path to correspond where the template is? I tryed
that
and got an error code indicating an error within the script.

Thanks for your prompt response though!!!

I look like a hero working on this in my office! hahaha


"Graham Mayor" wrote:
-
The macro creates a new document for each record based on normal.dot.
If
your merge document is based on some other template then there will be
some
inevitable differences in formatting when you run the macro. You could
edit
the code to base your merge documents on a *blank version* of your
letter
template if you wish eg change the line

Set NewDoc = Documents.Add(Visible:=False)
to
Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

or better still create your merge documents from normal.dot
--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


Phil00 wrote:-
Hey,

I'm using the macro found on G Mayor's site to help me merge letters
to seperate files. I finally got everything working. When i dont
split the files everything runs perfect, but as soon as i use the
macro, split the files, i notice the formating becomes ruined. I now
have a combination of fonts in the document as well as what seem to
be random page and section breaks.

Any ideas?

Thanks.

Phil -


-




--
Phil W

[Phil00]

Hmm€¦the line of code that was given to me from Graham was on one line from
the start. I guess I do not fully understand this. Its getting to be rather
frustrating. I created a template and put it in the template folder and
directed the path in that code to grab that .dot file, didnt work. I then
directed that path to lead to a document used for the mail merge minus any
fields filled out or anything, it didnt work. Ive tried multiple
combinations. Of course Im sure its, just a minor detail being overlooked.
Is there a way I could forward or post the file somewhere to get a second
opinion straight from you guys, the mvps?

Thanks again.


"Doug Robbins - Word MVP" wrote:

If in the code, you have the command split across two rows, place the cursor
at the end of the first line and press delete, to get the command all on one
row.

Or, insert a Visual Basic line break character (space then underscore) as
follows

Set NewDoc = Documents.Add(Template:="D:\Word Templates _
Path\TemplateName.dot", Visible:=False)


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"Phil W" wrote in message
...

The exact error code is 4605 command not available.

Phil00;325336 Wrote:
Alright, so im new to this whole macro thing in word. This document is

created from a 2 page template. If I were to use this code

Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

Would i change the path to correspond where the template is? I tryed
that
and got an error code indicating an error within the script.

Thanks for your prompt response though!!!

I look like a hero working on this in my office! hahaha


"Graham Mayor" wrote:
-
The macro creates a new document for each record based on normal.dot.
If
your merge document is based on some other template then there will be
some
inevitable differences in formatting when you run the macro. You could
edit
the code to base your merge documents on a *blank version* of your
letter
template if you wish eg change the line

Set NewDoc = Documents.Add(Visible:=False)
to
Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

or better still create your merge documents from normal.dot
--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


Phil00 wrote:-
Hey,

I'm using the macro found on G Mayor's site to help me merge letters
to seperate files. I finally got everything working. When i dont
split the files everything runs perfect, but as soon as i use the
macro, split the files, i notice the formating becomes ruined. I now
have a combination of fonts in the document as well as what seem to
be random page and section breaks.

Any ideas?

Thanks.

Phil -


-




--
Phil W

[Phil00]

well i've made SOME progress now, for fun i changed the defualt font from
times new roman to arial narrow. That worked..although that cant be a
perminant fix becasue the font is suppose to chnageh throughout the document
i.e in the tables and titles etc.

Also for some reason it still inserts RANDOM page and section breaks making
my 2 page document into a 4 page document.

"Doug Robbins - Word MVP" wrote:

If in the code, you have the command split across two rows, place the cursor
at the end of the first line and press delete, to get the command all on one
row.

Or, insert a Visual Basic line break character (space then underscore) as
follows

Set NewDoc = Documents.Add(Template:="D:\Word Templates _
Path\TemplateName.dot", Visible:=False)


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"Phil W" wrote in message
...

The exact error code is 4605 command not available.

Phil00;325336 Wrote:
Alright, so im new to this whole macro thing in word. This document is

created from a 2 page template. If I were to use this code

Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

Would i change the path to correspond where the template is? I tryed
that
and got an error code indicating an error within the script.

Thanks for your prompt response though!!!

I look like a hero working on this in my office! hahaha


"Graham Mayor" wrote:
-
The macro creates a new document for each record based on normal.dot.
If
your merge document is based on some other template then there will be
some
inevitable differences in formatting when you run the macro. You could
edit
the code to base your merge documents on a *blank version* of your
letter
template if you wish eg change the line

Set NewDoc = Documents.Add(Visible:=False)
to
Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

or better still create your merge documents from normal.dot
--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


Phil00 wrote:-
Hey,

I'm using the macro found on G Mayor's site to help me merge letters
to seperate files. I finally got everything working. When i dont
split the files everything runs perfect, but as soon as i use the
macro, split the files, i notice the formating becomes ruined. I now
have a combination of fonts in the document as well as what seem to
be random page and section breaks.

Any ideas?

Thanks.

Phil -


-




--
Phil W

[Graham Mayor]

Send me a copy of the merge document (and a small sample of data - 2 or
three records) and I'll have a look at it tomorrow. Use the link on the home
page of my web site (and don't change the default subject).

--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org



Phil00 wrote:
well i've made SOME progress now, for fun i changed the defualt font
from times new roman to arial narrow. That worked..although that cant
be a perminant fix becasue the font is suppose to chnageh throughout
the document i.e in the tables and titles etc.

Also for some reason it still inserts RANDOM page and section breaks
making my 2 page document into a 4 page document.

"Doug Robbins - Word MVP" wrote:

If in the code, you have the command split across two rows, place
the cursor at the end of the first line and press delete, to get the
command all on one row.

Or, insert a Visual Basic line break character (space then
underscore) as follows

Set NewDoc = Documents.Add(Template:="D:\Word Templates _
Path\TemplateName.dot", Visible:=False)


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"Phil W" wrote in message
...

The exact error code is 4605 command not available.

Phil00;325336 Wrote:
Alright, so im new to this whole macro thing in word. This
document is

created from a 2 page template. If I were to use this code

Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

Would i change the path to correspond where the template is? I
tryed that
and got an error code indicating an error within the script.

Thanks for your prompt response though!!!

I look like a hero working on this in my office! hahaha


"Graham Mayor" wrote:
-
The macro creates a new document for each record based on
normal.dot. If
your merge document is based on some other template then there
will be some
inevitable differences in formatting when you run the macro. You
could edit
the code to base your merge documents on a *blank version* of your
letter
template if you wish eg change the line

Set NewDoc = Documents.Add(Visible:=False)
to
Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

or better still create your merge documents from normal.dot
--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


Phil00 wrote:-
Hey,

I'm using the macro found on G Mayor's site to help me merge
letters to seperate files. I finally got everything working. When
i dont
split the files everything runs perfect, but as soon as i use the
macro, split the files, i notice the formating becomes ruined. I
now have a combination of fonts in the document as well as what
seem to
be random page and section breaks.

Any ideas?

Thanks.

Phil -


-




--
Phil W

[Phil00]

Awsome, thanks Graham and Doug for your help. I've emailed the files to you
Graham, let me know if you don't get them or have another problem. (outside
of my problem because for that i cant help you haha)

"Graham Mayor" wrote:

Send me a copy of the merge document (and a small sample of data - 2 or
three records) and I'll have a look at it tomorrow. Use the link on the home
page of my web site (and don't change the default subject).

--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org



Phil00 wrote:
well i've made SOME progress now, for fun i changed the defualt font
from times new roman to arial narrow. That worked..although that cant
be a perminant fix becasue the font is suppose to chnageh throughout
the document i.e in the tables and titles etc.

Also for some reason it still inserts RANDOM page and section breaks
making my 2 page document into a 4 page document.

"Doug Robbins - Word MVP" wrote:

If in the code, you have the command split across two rows, place
the cursor at the end of the first line and press delete, to get the
command all on one row.

Or, insert a Visual Basic line break character (space then
underscore) as follows

Set NewDoc = Documents.Add(Template:="D:\Word Templates _
Path\TemplateName.dot", Visible:=False)


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"Phil W" wrote in message
...

The exact error code is 4605 command not available.

Phil00;325336 Wrote:
Alright, so im new to this whole macro thing in word. This
document is

created from a 2 page template. If I were to use this code

Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

Would i change the path to correspond where the template is? I
tryed that
and got an error code indicating an error within the script.

Thanks for your prompt response though!!!

I look like a hero working on this in my office! hahaha


"Graham Mayor" wrote:
-
The macro creates a new document for each record based on
normal.dot. If
your merge document is based on some other template then there
will be some
inevitable differences in formatting when you run the macro. You
could edit
the code to base your merge documents on a *blank version* of your
letter
template if you wish eg change the line

Set NewDoc = Documents.Add(Visible:=False)
to
Set NewDoc = Documents.Add(Template:="D:\Word Templates
Path\TemplateName.dot", Visible:=False)

or better still create your merge documents from normal.dot
--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


Phil00 wrote:-
Hey,

I'm using the macro found on G Mayor's site to help me merge
letters to seperate files. I finally got everything working. When
i dont
split the files everything runs perfect, but as soon as i use the
macro, split the files, i notice the formating becomes ruined. I
now have a combination of fonts in the document as well as what
seem to
be random page and section breaks.

Any ideas?

Thanks.

Phil -


-




--
Phil W