Adrianna
Registered User.
- Local time
- Today, 09:10
- Joined
- Oct 16, 2000
- Messages
- 254
Okay, I can't seem to figure out how to pull this off and I've used publish to Word and Mail Merge before, but neither seem to provide a good answer...
The issue is getting 32 Data Rollup Queries, which provides sums and counts of various different types of assets, into the same word document, following the TitlePage and the Individual Asset Headers. The only element that "joins" these assets are the owning subsidiaries, although the information is queried using this, it is not displayed.
OPTION ISSUES
1) Publishing to Word: If the subreports = No Data then I want the words, "No Data Provided" to appear on the Parent report. This looks okay in access, but gets all screwy in Word.
2) I can publish Queries directly to Word and the formatting remains, but I'm not able to control where in Word items apprear. If I use bookmarks, then I can't figure out how to pass the entire query, it seems to only allow individual fields to be passed.
So, I want to:
Dim DRrst As DAO.Recordset
...
oApp.ActiveDocument.Bookmarks(strHeader).Select
Selection.Text = DRrst
...
Any ideas?
The issue is getting 32 Data Rollup Queries, which provides sums and counts of various different types of assets, into the same word document, following the TitlePage and the Individual Asset Headers. The only element that "joins" these assets are the owning subsidiaries, although the information is queried using this, it is not displayed.
OPTION ISSUES
1) Publishing to Word: If the subreports = No Data then I want the words, "No Data Provided" to appear on the Parent report. This looks okay in access, but gets all screwy in Word.
2) I can publish Queries directly to Word and the formatting remains, but I'm not able to control where in Word items apprear. If I use bookmarks, then I can't figure out how to pass the entire query, it seems to only allow individual fields to be passed.
So, I want to:
Dim DRrst As DAO.Recordset
...
oApp.ActiveDocument.Bookmarks(strHeader).Select
Selection.Text = DRrst
...
Any ideas?