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 =...
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]...
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.
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."
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.
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...
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.
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
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...
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.
...look thru records to see if an assistant has been picked matching combo2 and courseID.
So combo2 afterupdate grows to include ...
if dcount("*", "teacher assistant", "[courseID]=" & me.courseID & " and [staffID]=" & me.combo2) > 0 then
msgbox...
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...
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.
If you must break a table in multiple tables (you shouldn't unless it has more then 255 fields) then your relationship between the tables is one-to-one.
So key personID in each table. Open relationships and connect the tables by personID with Enforce Referential Integrity checked.
Next build a...
Try turning it around and get a good null check
If IsNull(Me("FromDepth" & intCtr)) Then
Me("Detail" & intCtr).Visible = True
Else
Me("lblDrillF" & intCtr).Visible = True
End If
The closest I can get is to put the Docs in a subreport actual size (size mode left at Clip). One the main form make the subs short. If the are tall on the sub they will grow on the main and vice versa.
Not sure how you are controlling what doc to show. I was testing with unbound object frame.
Not sure I'm following but you put the group header field in the page header rather than the group header.
This could be misleading as some details may go with another group header but don't show that way because it's in the page header which changes only once per page.
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.