snyperx3,
I never said you couldn't use VBA for calculations, I was just pointing out another method that does work with less considerations necessary for its use.
Si hoc legere scis, nimis eruditionis habes
Kent,
This is a typical downfall of using VBA to calculate totals. The problem is the code could be called multiple times, once for preview, once for printing, etc., explaining the incorrect printed totals.
Can you use the RunningSum textbox property to calculate your totals instead??
Si hoc...
Wow, I didn't realize we had implemented voting for preferential solutions here in the threads.
That being the case, I'll say that I prefer mine. [wink]
Si hoc legere scis, nimis eruditionis habes
Robert,
There may be a more elaborate way to accomplish this, but this is what has worked for me:
Create a query (qrySelectDistCustomers) that is nothing more than:
SELECT DISTINCT Customernr FROM T_Sales;
You main query SQL should look something like this after you add the subquery you just...
batteam,
Can you change your Select Case statement to an embedded IIf statement?? An IIf statement will work in the Field/Expression section of the Sorting and Grouping dialog box. You have to repeat the calculation logic there, not refer to the calculated control....
Si hoc legere scis, nimis...
THWatson,
Changing margins page-to-page is very difficult, if not impossible. I had bookmarked the following site that shows how to simulate moving margins by moving controls. If your report doesn't have a lot of controls, this might be an option.....
How to simulate odd and even margins...
In a new module, add a function using this as an example:
Function Xferxls_LateChgs_Daily()
Dim strFileName As String
strFileName = "c:\Charge_Posting_Daily_" & Format(Date - 1, "mm-dd-yy") & ".xls"
DoCmd.TransferSpreadsheet acExport, 8, "qryLateChgsDaily_xtab", strFileName
End Function
This...
Sure, grouping is inherently part of the solution I suggested. Just specify the grouping to be done by your date field and include that date control with your text string of meds and you should be all set.....
Si hoc legere scis, nimis eruditionis habes
lagg,
Is [hours_worked] a calculated control?? You can't sum a calculated control, but you can have Access do it for you.
Add another text box to your detail section with the same control source as [hours_worked], but set its Running Sum property to Over All and its Visible property to No...
I would export it to a .csv file (comma-separated values).
Break that file into two files and import them into two worksheets in the same workbook....
Si hoc legere scis, nimis eruditionis habes
If you only want the signature to appear at the bottom of the last page, try something like this:
In your page footer, if you don't have one already, add a text box whose control source holds the Page and Pages properties. Something like:
="Page " & Page & " of " & Pages
Make it invisible if...
Ted,
Is it possible that Expr2-5 could be null?? If so, try wrapping an Nz around them too:
=NZ(Sum(([Amount])-(Nz([Expr2])+Nz([Expr3])+Nz([Expr4])+Nz([Expr5]))))*IIf([PayingInNo] Is Null,1,0)
Si hoc legere scis, nimis eruditionis habes
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.