Objective:
1. I now have a total of eight 1 page reports: (RM_Page_1, RM_Page_2,RM_Page_3...etc)
2a. I want to be able to select a button to print all eight reports based on the current record appearing on my form.
2b. I also want to be able to filter all the records based on several...
Ok,
In an effort to retain any of my dwindling sanity I will redefine the cureent successes/failures/desires.
I'm also going to repost the current working code as a new thread so that hopefully, some other participants will help bring this to fruition.
The current code that is executing...
After standing back from it for a few days here's what I d' like to report (npi)...and again ask for some further direction
Although the routine works, it collates in this sequence:
(Recall that Report 1 has 3 pages, Report 2 - 4 pages, Report 3 - 1 page)
Page 1 (page 1 of report 1)
Page 4...
Then I get this error
"Object doesn't support this property or method"
and the following line is highlighted
DoCmd.Print A_PAGES, MyPageNum, MyPageNum
I get a syntax error and the first line of the following gets highlighted. This whole section appears red...
DoCmd SelectObject A_REPORT, Rpt1, True
DoCmd Print A_PAGES, MyPageNum, MyPageNum
DoCmd SelectObject A_REPORT, Rpt2, True
DoCmd Print...
Thanks, I'm not a programmer, any help is appreciated
Option Compare Database
'Option Explicit
Private Sub Command369_Click()
'Function CollateReports
Dim NumPages, RMsection1 As String, RMSection2 As String, RMsection13 As String
Dim MyPageNum As Integer
' Set the page number...
I have 3 reports that I need to print before moving to the next record. The Reports are named RMSection1 (3 Pages), RMSection2(4 Pages) , & RMSection3 (1 page).
I found some code from MS but I can't get it to work can anyone help?
The following code example sounds exactly like what I need...
I've scoured lots of books for this particular answer, to no avail, I will take a look. I used to have code (written mostly by a MS Excel help tech), that would identify each button on each custom toolbar and apply the macro source path specified in the code to each. That, however was circa...
ok,
one last challenge, I've posted this one before and never gotten a response...
I've got many macros, many custom toolbars, always changing - adding/removing buttons.
I also work on several different workstations.
In the old days... you could just copy your .xlb file and your .pst, plop...
do you mean:
If InStr(UCase(C.Text), "SEE COMMENT") > 0 And Len(C.Text) < 15 Then
Will this also catch "See Comments" ?
(several different people were working on the data)
You've been a great help, and thanks for making it easy to grasp....
I added:
Application.ScreenUpdating = False (after the Dim Statements)
and
C.Offset(0, nCommentCol).HorizontalAlignment = xlLeft (after the Wraptext = False line)
I find it most amusing that there is actually less code...
I can easily understand the points that you've made and I'm in total agreement with you. I'm not a programmer, just a data monkey, and seldom anymore get the time to document each step of code even though it may benefit me later, especially in a in a case where I'm asking someone else to...
Thanks for your help it works great! and it will save me lots of time. As far as the style of my code...Anyone who wants to suggest improvements has my full attention, I need any and all the help that's offerred, with thanks!
MoD
I need what turns out to be an 8 page report for each record in my database. I created 3 reports in Access because the format I needed to replicate only allowed 3 pages to fit on the first report, 4 pages on the second report, and 1 page on the 3rd report. Is there a way to lengthen a report so...
You sure made it sound simple enough, I'm using Excel 2K, but I'm still learning the basics of programming, can you show me how I would apply it to where I have the options positioned in the following code? (the code - by the way is a huge time saver when you're data is loaded with comments)...
I have data that once extracted from comments, includes line returns. I can "Un-Wrap" but the resulting text then includes a CHAR (10) line return? I've tried to use Trim, Clean but neither has worked. I think it's a CHAR(10). Does anyone know how I can get rid of these pesky...
Thanks for taking a look at this, I wasn't able to get it to work by evaluating the scores (1-4), but I did get it to work by evaluating the Text result, ie, (if "Manage" then.. ). As far as using the scores, you were right, some of the logic didn't work, I have it working now in...
I want to be able to automatically display one of four actions (ie. A-Accept, W-Watch, R-Resolve, M-Manage)in a textbox [FMRES] when scores 1-4 in two other textboxes [IMP] and [Prob] are entered.
The Actions are based on a simple grid system
PROB RESULTS
4...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.