Printing Current Date
Dec 29, 2006When I print queries (and maybe forms) I would like to have the date printed on the sheet so I know when I printed it out. How should I do this??
Thanks
When I print queries (and maybe forms) I would like to have the date printed on the sheet so I know when I printed it out. How should I do this??
Thanks
Hi Guys (again),
Hope you can help and I'll explain this as well as I can but I've put it in general as it's a culmination of things.
I have written a call monitoring database for a call centre (all good so far), but they want historical searches (again all good). I've written the relevant queries for these so that the searches can be done for Adviser, Manager and also by a date range. However, they now want to be able to print out the current search from the screen.
The way I have done it is this. I have written the report be adding in a subreport and putting in the relevant historical search form, and then written a macro that is assigned to a button on the historical search form to print the current record.
The problem that I am having is that when they click on the button to give them the history they fill in the relevant advisor or manager name and the date range which gives them the info in form format but, when they click on the button to print the current 'screen' if you like, it asks for the information again. I know this is because the actual report is written from the same query but is there anyway that it will just print what's displayed on the screen? I don't do VBA so if it has to be done that way could you please display it as it should be inserted.
I do hope that that has made sense and that someone can at least help me, cos you're all wonderful and I've had some really excellent help in the past from this site.
Thanks in advance.
Donna x :confused: (as always)
This could go in forms or reports, I think but:
I have a database which I am developing over time as I see ways of improving it and as I learn bits of vba. My current problem relates to invoicing (that I have probably created for myself!): I currently have two invoice report layouts because of different invoicing addresses.
I now want to add a cmd button to my invoice entry form that will firstly preview, then print the current record. I found elsewhere in the forum a way of previewing just the current record by way of specifying in the underlying qry the ClientID so that it selects the record displayed on the form.
I have this line of code which then previews the invoice:
DoCmd.OpenReport "rptInvoicePrivateClients", acViewPreview
This does not take account, though of the different invoice layouts.
I think strictly speaking I should only have one invoice report, but what I want to say is this:
If the client is a private client, then preview rptInvoicePrivate,
Else preview rptInvoiceLocumWork
I have tried entering this code that does not work
If SolicitorID = "1" Then
DoCmd.OpenReport "rptInvoicePrivateClients", acViewPreview
Else
DoCmd.OpenReport "rptInvoiceLocumWork", acViewPreview
End If
It comes back with a message that SolicitorID is not defined, but I have included Option Explicit.
Any help please
Hi Everyone,
I'm probably going about this the wrong way all together, but what I'm trying to do is print a single record from a form in a report.
Basically after the client fills in the form they can print their "results report" using the click box (command button) in the bottom corner of the form. When the client clicks on the button it prints all the records ("result reports") of all the clients...no good of course.
Here's the code for the button:
Private Sub PrintSingleChamber_Click()
On Error GoTo Err_PrintSingleChamber_Click
Dim stDocName As String
stDocName = "SingleChamberPrintOut"
DoCmd.OpenReport stDocName, acNormal
Exit_PrintSingleChamber_Click:
Exit Sub
Err_PrintSingleChamber_Click:
MsgBox Err.Description
Resume Exit_PrintSingleChamber_Click
End Sub
Can someone point me in the right direction? :confused:
Thanks again,
Mark
Hello,
I have done a search on this forum and found all the postings relating to printing only the current record for a report. I have a command button and have followed what these posts say. The report prints the current record but leaves out the data from the subform.
The database is a recipe organizer. The main form is called Recipes and the subform contains the ingredients for each recipe. This subform is called Ingredients.
I set up a command button with the following code:
Private Sub Print_Recipe_Click()
On Error GoTo Err_Print_Recipe_Click
Dim stDocName As String
stDocName = "Family Recipes"
DoCmd.OpenReport stDocName, acNormal, , "[RecipeID] = " & Forms!RECIPES![RecipeID]
Exit_Print_Recipe_Click:
Exit Sub
Err_Print_Recipe_Click:
MsgBox Err.Description
Resume Exit_Print_Recipe_Click
End Sub
Since the RecipeID is used in both forms and the report, I thought it would be the best field to use since it linked all the information together.
So what do I need to do so that the subform data prints out on the report?
Thanks
GeekyGirl
I currently am trying to print the current record that I have selected on my form and the subform that I have on the same page. If I try to print selected record it will only print out the main form correctly and will print out the first record on the sub form. I have tried to make a reprot of the current form and it only will do the main form and nothing from the sub form. I am willing to try whatever method would work in getting this to work. Thanks
View 2 Replies View RelatedHi All,
Having a problem with a report, I have a form that i use to enter a new record to my database, what I want to do is put a button at the bottom of the form to print the record (via a report)
If I base this on a record that already exists, it works fine.
However,
If I have just entered the record the query the report runs off doesn't see the new record. To print that record I have to exit the completed record, then go back in to it and print.
My aim is to remove this additional part of the process, I'm sure it's something really simple, but can anyone help?
Many Thanks
Paul
I have a main form with a subform. The subform has linked tables from the main form. People are on the main form with the index PersonId and they are linked to incidents by IncidentId.
I want to put in two buttons.
First put a print report button for each subform whereby it will only produce a report for the records I can see on screen . i.e. if a person is linked to two incidents I just want the report for those two incidents.
Secondly I would also like a print all button on the subform where it prints reports containing the current IncidentId number.
I have made a navigation form that prints the current record out as a PDF and also the option to send the current record by email as a PDF. Both work perfect when you open the form outside the navigation form. But when you open it inside the navigation form, it does not print any of the information.
The problem is in the Query report, In the criteria box for field [RequsetID] it has
Code : [Forms]![FRMRequestForm]![RequestID]
(The above works outside the navigation form.)
I have also tried adding the navigation form name
Code : [Forms]![Main]![FRMRequestForm]![RequestID]
But none work.
What I really need is for when the form opens, it looks at todays date, then matches current user and then goes to that record for today, if no current user there, then will goto new record..
i know, sounds complicated, and probably is really easy, but my heads not with it today, as about to get drunk as its my 40th, and got people ringing and texting and still trying to get this done....
I've included a copy of this database, named Timecards..
I have a button on a FORM to print the current record with the following code:
DoCmd.RunCommand acCmdSelectRecord
DoCmd.PrintOut acSelection
But what I need is that before printing, open the preview to set the margins and page size ... or at least to pre-configure so that when you press the button, and comes preformatted.
I have a report that displays simple date fields. One of the fields is "lease execution". On the report, I want "lease execution" to display differently depending on the date the report was run.
So:
- If the "lease execution" date is more than 120 days away from today, I want it to display as Q YYYY.
- If the "lease execution" date is between 120 and 90 days away from today, I want it to display as MM/YYYY
- If the "lease execution" date is 90 days or less away, I want it to display the normal date MM/DD/YYYY
I was thinking I would need to do DateDiff() to figure out an amount of days that's between Now() and [Lease_Execution]. Then based on that amount make the report show it differently. Pseudocode would be: if DateDiff() = 40, then display [lease_execution] as MM/DD/YYYY
I am building a database to track contract of employees so that I can know which contracts are valid and which are expired.
My table has the following fields:
ID (Primary key)
Employee ID (Foreign key to link to the employee table)
Start_Date
End_Date
Status (Either valid or expired)
Challenge
I want when I enter the end date, the system checks the end date against the current date and fills in the status field with either valid or expired as appropriate. For instance if the contract end date is March 10,2016, the status must be filled in the word valid.
i have just started to use access and i know how to insert the current date into a field using date() but i am not sure will this change the date everytime i open the form ? i want to create a form for invoices that shows the date the invoice was created and doesnt change if i re open for editing,
View 1 Replies View RelatedI have a report that I want to pint the beginning date and ending date range that the report was based off of.
I have a query that prompts for begining date and ending date
I want the print to look like this.
Current Report Date : 01/01/06 to 01/30/06
Any Ideas
Thanks
Dean C
Giles Chemical
Hello,
I was wondering how to check a date in a table vs current date and
then put a yes/no in a colum if the date in the table is past current date.
In the form I know it should be wrote in the Upon Open Event
But I am unsure of the code.
Thank you for your time,
Derek L
I am trying to create a report which is basically a School Certificate. The requirement is that I need to print the Issue Date, means the current system date be printed in ENGLISH WORDS rather Alpha-numeric format, i.e.: instead of 11 Mar 2012, I need some thing like this: Eleven March Two Thousand and Twelve.
View 4 Replies View RelatedI was having trouble just setting each report with a particular print method - for some reason they just kept forgetting their individual settings and resorting to default on the machine.
This meant reports were printing on the wrong paper, or the wrong size paper, the wrong orientation and some times refusing to print if it couldn't find the paper (which is useful in runtime as it doesn't display error messages)
So I used Reports(rpt).printer properties (I forgot where I found this) to hard code the printer properties into each print command... this meant I had to use another function to insert the variables.
So all I had to do was say:
Code:
PrintMe("Invoice","InvoiceID",iID)
and a report would print to exactly how I wanted... but it's just too slow!
See attached for full code, I have a niggling feeling it may be the function: PrinterOK, to make sure the printer exists or not.
Code:
Function PrinterOK(sPrinterName As String) As Boolean
Dim MyPrinter As Printer
PrinterOK = False
For Each MyPrinter In Printers
If MyPrinter.DeviceName = sPrinterName Then
PrinterOK = True
Exit Function
End If
Next
End Function
I know it's the printing code, because if I stop the printing and just preview then it shows up almost instantly.
I want the query to return the results of all records that are for the next day.
Sort of like =Date() +1
Please help
There is a Date Submitted in my form that I would like it automatically poplulated with the current date. How do I do that?
View 1 Replies View RelatedHow do you automatically put in the current date in a table?
View 3 Replies View Relateddear all
what is the difference between current date and system date?
for current date : =now()
for system date : =date()
am i right as above?
many many thx
Hello,
I have about 1500 records in a table. We use a form to search through the records to find info on certain accounts. We now want to only search through accounts that are current, so I made a query to see only current accounts. I switched the search form from going off data right from the table to the new current date query. Now when you load the form it says "running query" and the application stops responding. The query seems to load up quick in raw format.. how come the application freezes when searching using the query instead??
thanks,
Matt
Hi there, I am trying to put a query on my form which selects the most recent date of a members attendance from an attendance table and displays it in a text box, the code I am using is:
Private Sub Text41_BeforeUpdate(Cancel As Integer)
SELECT MAX(Attendance.AttendDate) as "LastAttended"
FROM Attendance
WHERE Attendance.membershipNo = Forms!Customer.sbfAttendance.Form.membershipNo
End Sub
Customer is my main form and Attendance is my subform. I think the mistake is that I dont have a field called last attended (you are not supposed to store data like this are you) and I need it to display in my text box (text41) on the main form
Thanks in advance,
Jon
Hey guys,
I'm trying to pull data that has a due date within 30 days from the current date. I'm trying to use
WHERE x <= Now() + 30
but I'm getting incorrect records. Can someone please help me out? Thanks.
Maybe a simple question, but i do not know how to put the current date in the WHERE clause of a SQL query.
The query i have so far:
select [table1].*, [table2].* from [table1], [table2] where [table1].[field] = [table2].[field] and [table1].[enddate] is null
After this there has to be something like
and [table1].[begindate] < [Date] (where [date] is the expression)
I know that with Date() or Now() the expression can be made, but i do not know how, please advise..
Thanks in advance