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!

  • Congratulations TouchToneTommy 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 tsumrall

  1. tsumrall

    Sorting for a report specified in report prompt

    on the form that opens the report you can have a combo box with the fields of your table (field List) On the On Open Event of your report use Me.OrderBy = Forms![MyForm]![Combo] or prompt user when report is opened Private Sub Report_Open(Cancel As Integer) Dim Mysortfield Mysortfield =...
  2. tsumrall

    Many-to-many query looking for aggregate condition

    I made a small data set like you have and this seemed to work. Not sure what the goldenmem was so I left that out. A claim may show twice because it doesn't fall in 2 different coverage periods. Am I missing something? SELECT [CLAIM].[membno], [CLAIM].[claimdate], [CLAIM].[claimno]...
  3. tsumrall

    Query for current month

    Format your date as "mm yyyy" and set it's critera to format(Now(), "mm yyyy")
  4. tsumrall

    Need to use a min date fn

    Make a "group by" query with two fields. 1. Serial Number as Group by 2. Date as Min This should give you 1 record per serial number and it's earist date. Link this to your query above by Serial Number and date and you should only get those records.
  5. tsumrall

    Legend propery for MS Charts

    According to VB Help om LegendEntry Objects ... "You cannot change the text of a legend entry. LegendEntry objects support font formatting, and they can be deleted."
  6. tsumrall

    ACCESS REPORT LEAVES WORDS OUT WHEN PRINTING

    Which words don't print? left right top or bottom
  7. tsumrall

    Legend propery for MS Charts

    Reports are funny that way as you have to do your coding before it gets formatted for print. What event did you try to put the code under? I saved my form as a report then put the same code under the Detail Event On Format and it worked.
  8. tsumrall

    Report Header - Many Records; Header for Each Record

    Well you can't ... so we have to cheat. Let's try this (if I'm following right). Click your "sorting and grouping" button. Pick a field that makes each record unique (like the key) so that it really doesn't group at all. Change "Group Header" to Yes. Put the data you have...
  9. tsumrall

    Legend propery for MS Charts

    Sorry it's object not project. Double check that it's got a check next to it and has floated up with the rest of the selected refs. I can send a small test mdb.
  10. tsumrall

    TEXT box displays field infomation

    Easiest way 1. Make sure your form's row source points to your table. 2. Click the field list Button and drag the field you want to the form. if that does't work something else is wrong
  11. tsumrall

    Create Sequentiaql Numbering on a Subform

    The seq number in your table behind your subform needs to be a number not autonumber. On the subform make it's default value =dmax("[partnumber]", "subformpartnumber","[catalog number]=" & me.catalog number) + 1 Catalog number is likely what you use to link the...
  12. tsumrall

    TEXT box displays field infomation

    What do you want the timestamp to do? Normally it's used to record when a record was edited or added. It's only bound to itself (if on a form) and not bound to another field.
  13. tsumrall

    2 fields cannot equal each other

    So we have 2 checks to make. First check is: are the two combos the same. If they are then msg the user and null the combos out. But we need to check both combos becuase you may not be able to tell which the user clicks first. Note that this is a real time check not a history test so we don't...
  14. tsumrall

    Legend propery for MS Charts

    x.x meant I couldn't tell what version you had. I have 9.0 as well and it works. I have a chart on a form called mychart. I have a button with the onclick event like Private Sub Command1_Click() mychart.Legend.Font.Bold = True mychart.HasLegend = True mychart.Legend.Font.ColorIndex = 5...
  15. tsumrall

    Report Header - Many Records; Header for Each Record

    Depends on what you have in your Report Header. If you have stuff that doesn't change just put it in the detail above your record and don't use a report header. If you are putting a record on each page then use Page Header instead of Report Header.

Part and Inventory Search

Back
Top