Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by MoDiggity

  1. MoDiggity

    I need help refining a routine for printing multiple reports

    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...
  2. MoDiggity

    Printing Consectutive Reports

    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...
  3. MoDiggity

    Printing Consectutive Reports

    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...
  4. MoDiggity

    Printing Consectutive Reports

    It works, sort of, not collating correctly, but I think you've helped enough to get me thru the rest, thank you very much. Mo D
  5. MoDiggity

    Printing Consectutive Reports

    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
  6. MoDiggity

    Printing Consectutive Reports

    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...
  7. MoDiggity

    Printing Consectutive Reports

    4 is the highest number of pages. Although I've saveed it, I get a message that says the macro cannot be found, do I need to add anything?
  8. MoDiggity

    Printing Consectutive Reports

    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...
  9. MoDiggity

    Printing Consectutive Reports

    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...
  10. MoDiggity

    Removing Return Characters

    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...
  11. MoDiggity

    Removing Return Characters

    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...
  12. MoDiggity

    Removing Return Characters

    do you mean: If InStr(UCase(C.Text), &quot;SEE COMMENT&quot;) > 0 And Len(C.Text) < 15 Then Will this also catch &quot;See Comments&quot; ? (several different people were working on the data)
  13. MoDiggity

    Removing Return Characters

    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...
  14. MoDiggity

    Removing Return Characters

    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...
  15. MoDiggity

    Removing Return Characters

    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
See more

Part and Inventory Search

Back
Top