Email and possibly a Fax with Word [Resolved]

**RobDog888** · Feb 18th, 2005, 11:54 PM

So your saying that you have 7 clients that each get 4 pages and all 28 pages are in the one MM doc?

**dglienna** · Feb 19th, 2005, 12:05 AM

it varies from day to day, but that is the general overview. x clients get y sheets. they are grouped together with the SQL statement.

**RobDog888** · Feb 19th, 2005, 12:24 AM

Why are all the clients grouped together if you are breaking them apart and sending them separately?
Would it be better to have a MM for a particular client of whatever number of pages that they may have.
Send that out to them and then do another one for another client and so on?

Perhaps you could have a UserForm populated with clients. Then you could choose which client that
particular MM is going to be for and modify the query to be parameterized for the client name, etc?

**dglienna** · Feb 19th, 2005, 12:44 AM

The clients never change. Just the data that is sent to them. We query based on a date, and then set up the table with the relationship of the first client y times, then the second client y times. Then the mail merge does all of the work correctly.

Because the number of pages changes each time, I can't use the more than the one page merge .dot file. It would be nice if the document would reproduce on the next page for different records that are to be sent. Then, I could have a 4 page merge document today, and an 8 page merge document tomorrow.

Can you think of any way to do *that* ?

**RobDog888** · Feb 19th, 2005, 02:31 PM

You can do this to save the document where you want with the name you want.
Do it before you close the doc so you dont need to be bothered saving again.

VB Code:

Documents(1).SaveAs "FileName:=" & app.Path & "\SomePreknownName_" & Format(Now, "MM-DD-YYYY_hh-mm-ss AMPM") & ".doc"

**dglienna** · Feb 19th, 2005, 02:52 PM

I'm getting a 5096 error. It's saying something about the filename. its EEsD797.tmp. Any idea?

VB Code:

moApp.Documents(1).SaveAs "FileName:=" & App.Path & "\Listing" & Format(Now, "MM-DD-YYYY") & ".doc"

error is %1 is longer than 127 characters

**RobDog888** · Feb 19th, 2005, 03:07 PM

Sorry about that, there is no app.path in Office only Application.Path.
If that still gives an error then try hardcoding in a simple path and filename.

VB Code:

Documents(1).SaveAs "FileName:=" & Application.Path & "\Listing" & Format(Now, "MM-DD-YYYY") & ".doc"

Thread: Email and possibly a Fax with Word [Resolved]

Thread Tools

Display

Hybrid View

Re: Email and possibly a Fax Question with Word

Re: Email and possibly a Fax Question with Word

Re: Email and possibly a Fax Question with Word

Re: Email and possibly a Fax Question with Word

Re: Email and possibly a Fax Question with Word

Re: Email and possibly a Fax Question with Word

Re: Email and possibly a Fax Question with Word

Posting Permissions