I use the following code to send a number of reports to my printer. There are about 16 reports in total, I have reduced the code just to keep things simple.
Private Sub CmdPrintFullNutriPlan_Click()
'Main Folder
'Soil Analysis Results for NutriPlan
DoCmd.OpenReport...
I have a text box on a report with control source =[ProductName] & " - " & [ProductComment]
The font colour of the text box is blue and font size is 14. Is there any way to retain that formatting for [ProductName] but have [ProductComment] in a smaller red font?
I am using Access 2007 and the following code to generate and save a PDF. The PDF is automatically saved in the Sales folder but is there an easy way to open the "file save as"/ Explorer window (sorry not sure what it is called) prepopulated with the me.SaveAs as the file name so that the user...
I have a subform which I use for data entry and editing. There are two tables which are potentially updated and the query behind the form is:
SELECT tblSoilAnalysisResults.AnalysisNumber, tblSoilAnalysisResults.FieldCode, tblSoilAnalysisResults.DateOfAnalysis, tblSoilAnalysisResults.LabRef...
I have a form from which I print or PDF my reports and one button on the form I use creates a whole load of PDF reports using the code below. Most of the reports have code in the NoData which is fine for when the report is opened individually but this means that if I run the full code and a...
I am using the inbuilt PDF creator in Access 2007 to generate some of my reports however some of the files sizes are quite large.
If I use a website such as http://smallpdf.com/compress-pdf to compress the file it always manages to reduce the file size sometimes quite dramatically. Are there...
After much googling I have found 2 ways to create a dynamic search form which works for me.
In the first method the search box on the main form updates a hidden text box on the main form which is then used in a parameter query to fill the sub form. In the second method the code behind the...
I am trying to use Duane's Concatenate module to create a report label but I keep getting a "wrong number of arguements error message. My code is
SELECT tblSltFarm.FarmAccountNumber, Concatenate("SELECT AccountName FROM QrySLTFarm2
WHERE FarmAccountNumber =" & [FarmAccountNumber], ", "...
This is more to do with form aesthetics and consistency rather than anything else.
I have quite a busy form that is one of the main forms used when using my database. There is an unbound list box and an unbound text box, both of which have vertical scroll bars and then there is a continuous...
I regularly use the Access forums but am new here. I am in the process of setting up a small network. I currently have "computer 1" which has a partitioned hard drive and "computer 2" which is mapped to the partions. Both are running Windows 7 Professional.
Both computers are in the Homegroup...
I have Acccess 2007 and a text box on a report with the code
=([ProductName] & " @ " & [ApplicationRate] & [ApplicationUnits])
Is it possible to have [Productname] as one colour, font size and bold and [ApplicationRate] & [ApplicationUnits] as a different colour font and non bold, without...
Hi all, I have the following query
SELECT tblFieldDetails.FieldCode, tblFieldDetails.FieldName, tblOMApplications.OMApplicationMonth, Sum(qryrpt10FTotalOMNP1.TotalNAppliedByOM) AS SumOfTotalNAppliedByOM
FROM (qrySLTReport INNER JOIN tblFieldDetails ON qrySLTReport.FarmAccountNumber =...
I have a report to which I would like to add some explanatory notes to the end.
The report has one record per page but there are information boxes and calculation on each page and I would now like to add a page at the end of the report which explains how some of the calculations are worked out...
I have a report with a sub report and historically the subreport has only been 1 page so I have been able to use a record count to give me the total number of pages in the page.. of .. footer.
Some of the subreports are now stretching to 2 pages so using the above means I can get page 64 of 58...
I have a spreadsheet that now has just over 1000 lines. I regularly use my mouse wheel to scroll up and down the sheet but now as I move from line 999 to 1000 the spreadsheet shifts to the right a little and back to the left when scrolling up the sheet.
I believe that the cause is when the line...
For the last few days I have been having an issue with my computer randomly freezing and even after being left for 30 minutes the only solution is to pull the plug.
Today as I was closing the computer down I had several error messages saying the DDE Server Window could not be closed or words...
Whilst researching another issue I came across this page which suggests that I should code in a save before closing forms
http://allenbrowne.com/bug-01.html
using
' Never use Close without explicitly saving the record first:
' If Me.Dirty Then
' Me.Dirty = False
' End If
'...
I use a field ApplicationOrder to sort the records in my database. ApplicationOrder is numeric and I want to sort and name the ApplicationOrder and save the name as TimingLabel in a query.
I am stepping into new ground but have created the following function
Public Function...
I have two different search criteria on one of my forms. Search 1 is via a list box which lists all current entries and clicking on the list box invokes a filter
Private Sub QuickSearch_Click()
Me.frmIfFertAppln.Form.Filter = "[FieldCode] = " & Me.QuickSearch.Column(0)...
I have an unbound list box that I am using as a selection point for a data input form. On the left of the main form is the list box with a list of names and on the right is a subform which holds the relevant data.
When I select a name in the list box the subform updates but the list box then...
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.