View Single Post
  #15   Report Post  
Posted to microsoft.public.word.mailmerge.fields
Brian Brian is offline
external usenet poster
 
Posts: 298
Default Word 2000 Macro not working properly w/merge

ok so i just replace the dim fDialog As FileDialog
with all the code you mentioned about, swap out that one line?

"Doug Robbins - Word MVP" wrote:

The macro is going to create a separate document for each record that was in
the original data source and it needs to save those documents somewhere. By
the DocDir = "C:\Path" statement and replacing Path with the actual path to
the folder where you want those documents to be saved, you are telling the
macro where to save them.

For example

DocDir = "C:\Application Data\[UserName]\Documents"

will, if my memory serves me correctly with respect to the Windows XP folder
structure, save the documents in the My Documents folder (if you replace
[UserName] with the user name that appears in Windows Explorer.

--
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, originally posted via msnews.microsoft.com
"Brian" wrote in message
...
I'm not sure i understand what you mean here.

"Doug Robbins - Word MVP" wrote:

Not necessarily where the Excel code is stored, but the path to where you
want the output of (what was originally a) mail merge operation to be
stored. When the macro is run, it creates a separate document for each
record in the data source and what those documents will be saved in the
folder specified by the DocDir = "C:\Path" statement.

--
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, originally posted via msnews.microsoft.com
"Brian" wrote in message
...
I think you may have lost me here, I replace all of the code and put the
path
the excel file is stored in?

"Graham Mayor" wrote:

Oops! You'll need to retain the line
sPassword = "" 'insert form password, if applicable, between quotes

--

Graham Mayor - Word MVP

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


Graham Mayor wrote:
I believe that this function was introduced with Word 2002. You can
by-pass it by changing the lines

Dim fDialog As FileDialog

Set fDialog = Application.FileDialog(msoFileDialogFolderPicker)
sPassword = "" 'insert form password, if applicable, between quotes
With fDialog
.Title = "Select Folder to store the documents and click OK"
.AllowMultiSelect = False
.InitialView = msoFileDialogViewList
If .Show -1 Then
MsgBox "Cancelled By User"
Exit Sub
End If
DocDir = fDialog.SelectedItems.Item(1)
If Right(DocDir, 1) "\" Then DocDir = DocDir + "\"
End With

for

DocDir = "c:\path\"

where C:\Path is the folder that you would have selected had you
been
able to


Brian wrote:
here is where i get the error user defined type not definted
Dim fDialog As FileDialog

"Brian" wrote:

I'm getting an error in this line of code, states it's undefined
Code:
Dim fDialog As FileDialog


"Brian" wrote:

the code in that link doesn't work, I'm getting some complier
errors, and I'm not very familiar w/programming to try to fix it.


"Doug Robbins - Word MVP" wrote:

See the article "Combining FormFields and Mail Merge" on the
following page of fellow MVP Graham Mayor's website:

http://www.gmayor.com/Form_Fields_and_Mail_Merge.htm

If that information is of use to you, please do consider
contributing to the maintenance of that website to ensure its
continued availability.


--
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, originally posted via
msnews.microsoft.com "Brian"
wrote in message
...
I'm creating a word merge into a new doc. I have text fields
that
aren't merging, so I looked for help and found this macro on MS
support that's suppose to fix it and have the merge retain any
text fields. http://support.microsoft.com/kb/211308/
I put it all in, and it works except on the 2nd page of the doc
it leaves the place holders. The doc is only two pages after
the
merge, 3 before the merge, anyone know why the it creates text
fields on the first page, but not
on the second page?