Why when I set up a macro with a PrintOut action does it always prompt me to "Save As" before it prints? I have a default printer set up in the system, but it still asks to "Save As." It does print after.
View RepliesOne of the users of my application, reports an error when saving a report to pdf by VBA code. She’s using Access 2013, on Windows 8.1.
The error is “error 2501 output to action was cancelled with access vb macro”
The VBA code is
StrReport = “RepInvoice”
StrDocumentName = “C:UsersMaryDocumentsAccessInvoice.pdf”
DoCmd.OpenReport StrReport, acViewPreview
DoCmd.OutputTo acOutputReport, StrReport, "PDFFormat(*.pdf)", StrDocumentName, False
DoCmd.Close acReport, StrReport, acSaveNo
This error occurs at the OutputTo line. This code is part of an user form with a button “save as PDF”.
When this code is run, the report is visible as an example (as meant to be) on the screen. The code stops at the OutputTo line.
When I use
DoCmd.OutputTo acOutputReport, StrReport, acFormatPDF, StrDocumentName,, False
the problem still exists.
I tried to save the report manually by Preview > Export > PDF. The preview is OK, saving as PDF results in the same error 2501. This may lead to the conclusion that this problem is not caused by the VBA code.
I verified whether user write rights are OK, and whether a default printer is available. Both are OK. The report consists of 1 page.
When this very same application is used with Access 2010, everything functions as expected.
Using Access 2000, I have a macro to generate a report by updating various make-table queiries. I would like for the macro to print the report to an Adobe PDF file and save the file as the database name.
When I manually print the report, it gives me the opition of selecting printers and Adobe PDF is listed as a printer. After selecting the "printer", a "Save As PDF" menu pops up and currently it lists the Access Report Name. I would like to use the database name as the name of the PDF file.
In short, when I execute the "Generate Report" macro, I want the end product to be a PDF file using the database name as the PDF file name.
I have noticed that when i am editing an object within my database, specifically a query and click to close it, it doesn't prompt me to save the changes and does it automatically. There have been cases where i do not want to save the changes and just wanted to know if there was a simple setting to turn off automatic saves?
View 3 Replies View RelatedI have inserted a function via a module at the beginning of a Macro using the RunCode action:
Function Msgbox_Yes_No()
Dim Response As Integer
Response = MsgBox(prompt:="Select 'Yes' or 'No'.", Buttons:=vbYesNo)
If Response <> vbYes Then
End If
End Function
However, it doesnt stop the macro from continuing on its way to delete a load of records if the user chooses no.
I want to run a macro which is having three action queries from the another database when i click the button from my current database. I am using Access2010.
View 3 Replies View RelatedI was editing one of my tables in datasheet view and when I closed the table, Access asked me if I wanted to save changes. But I didn't make any changes to the design of the table or the filters I had set up. I just edited the data within datasheet view. The reason this is bothering me is that I am afraid I accidentally changed something. The only explanation I have for why it asked me if I wanted to save changes, is that I used the "undo" command to cancel a typo that I made while editing in datasheet view. When I hit "undo", it fixed the typo, and scaled back up to the first record of the datasheet. At first I thought using the "undo" command might have been the culprit, but when I re-opened the table and used the "undo" command again, it undid the change, but it didn't scale back up to the first record of the datasheet, like it did the first time I used the command. Anyway, I am staying away from the undo command from now on. It's about worthless in Access anyway, because it only undoes your last action. Have any other Access users been asked to save changes when they know they haven't made any changes to the design of the table?
View 2 Replies View RelatedI need to display a message on a form after a record update has been done depending on whether a table field is ticked or not. If it is ticked I want one message if it is not ticked I want a different message, but here is the scenario.
I have a form and one of the options I have is to call up an address from a record in a table. I want it to display a message to advise whether there is a special requirement for delivery to the address, so in the table I have a checkbox field. If its checked, once the address has been pulled up I want it top advise 'special requirement' or 'no special requirement'.
I need to do this in a macro form, or expression form if possible as I already have an after update macro when that drop down is selected.
So on the dropdown list I have the following on the afterupdate function:
SearchForRecord
Object Type :
Object Name :
Record: First
Where Co0ndition - - "[ID] = "& Str(Nz([Screen].[ActiveControl],0))
That brings up the address from a record in my table onto this form, so what I want is if that record has got a tick the checkboxfield it prompts with a message and ok button.
I have a Macro setup and SendObject is one of the Actions. It is setup to send an existing report. Is there a way to insert a fieldname from that report into the Subject line of the e-mail that is sent? That would be great, instead of having the same subject line for every e-mail, using the date or something like that. Please let me know. Thanks.
View 3 Replies View RelatedI am building a purchase requisition (PR) database.
The tables are (simplified) as follows:
Table1 - tbl_PRList - contains only 3 fields with one of these fields being the "PR No".
Table2 - tbl_PRData - contains all the item data, also with a field "PR No".
The intent of the "item entry" form is to add items to the latest PR that has been generated.
So, whenever an item that is to be placed on the new PR, you type in the item description, qty, etc in the form and then you press a button that saves this item to the main 'data' table (Table1). What I would like to do is, "on click" of this button, I'd like this record, prior to it moving to the next record, to set the value of the PR No field in Table 1 to be the same as the DLast value of the Table2 table.
Hi all,
Recently I am getting this message in a database that would allow users to add new rows to tables, even when I look into the tables themselves I can't seem to enter data
Would anyone know what could be causing this error?
Error (no. 2501): The save action was canceled
Thanks
Polo
:)
I have a Contacts form which has a Calls sub-form which itself has a Subjects sub-form. From the Contacts form the user can click a button which writes a pro-forma letter from a selection. The application then updates the Call & allows the user to select the Subject(s) from the Subjects available (drop-down menu). If the user wants to write a second letter immediately, I get the above message. If they do anything else first, they are OK.
I have tried refreshing the Contacts form & each of the others at various points in the process, explictly saving the record (caused another error) etc. without success.
Can you help?
Is there a way to increase the maximum characters allowed in an expression of a macro setvalue action ?
I have an expression in a macro setvalue action that adds multiple form textbox values. I need to change the form name from "RATING ENGINE 2" to "E RATING ENGINE 2". When I do this, I exceed the maximum characters allowed in the expression. Is there a way I can rename "RATING ENGINE 2" without this problem. The expression is as follows:
[Forms]![RATING ENGINE 2]![Excess Liab Premium 6]+[Forms]![RATING ENGINE 2]![Excess Liab Premium 7]+[Forms]![RATING ENGINE 2]![Excess Liab Premium 8]+[Forms]![RATING ENGINE 2]![Excess Liab Premium 9]+[Forms]![RATING ENGINE 2]![Excess Liab Premium 10]
I made a print macro to print records from a subform.
The problem is, it prints all the records in the subform that are not visible aswell. I did a search for records with TSA in it and it shows 3 records. These are the only records I want to print.
The code I use at the moment looks like this:
Code:Private Sub Print_Click()On Error GoTo Err_Print_Click Dim stDocName As String Dim MyForm As Form stDocName = "frmSubform" Set MyForm = Screen.ActiveForm DoCmd.SelectObject acForm, stDocName, True DoCmd.PrintOut DoCmd.SelectObject acForm, MyForm.Name, FalseExit_Print_Click: Exit SubErr_Print_Click: MsgBox Err.Description Resume Exit_Print_Click End Sub
Is there a way to print a report from a form by using VBA or a macro? If so how can this be done?
View 1 Replies View RelatedI've created a macro for saving records, but it's just over write on the previous record, what's the best way to save new records using forms?
View 2 Replies View RelatedI want to be able to have a report automatically generate at the beginning of each month and save it as a PDF file and have that report saved to my access database.
View 3 Replies View Relatedhere's my macro
after each print out line i get this
can i disable this prompt from appearing?
I'm working in 2003 (still) and have a macro to print the selected form the user has on their screen. I need this same macro to also print a PDF in a particular network folder or just exit if the PDF doesn't exist. I've tried RunSQL with "PrintDoc [Link2PDF]" as the argument. I've tried RunApp with "Acro Rd32.exe /t [Link2PDF]" as the argument but neither one works. The RunApp line will open the Adobe reader but nothing more.
View 4 Replies View RelatedI have an Access database that includes a customer listing. My client would like me to include a button on a form that prints off all of their customers' names and addresses onto mailing labels. I know how to do it manually by clicking on the Customers table, clicking Labels under the Create ribbon, selecting the fields, selecting the label manufacturer, size, etc. etc., but the customer would prefer to have just one single button.
I've looked everywhere for VBA code to put into a macro that does this. Unfortunately, unlike Excel, Access doesn't have a "Record Macro" option so I can attach it to the button.
Table: Customers
Fields: FirstName LastName Address City State Zip (There are other fields, but they are not relevant to printing address labels)
In Access 2007 is it possible to alter a macro so I can print 2 copies of a report. I have created a simple macro which opens up a report based on a value in a data entry form. I want to automatically print 2 copies of the report. Is this possible....
View 1 Replies View RelatedActually I need to select printer before printing report. That's why I need to call printer dialog to select printer using "PrintObject" in macro. But it's print the form not report. I need to print a specific report.
View 1 Replies View RelatedIn Access I have created a button to print a preview prior to printing document it is entitle "NoVeteranMain" which works fine. Except I want it to save my document prior to printing preview how would I do it. If not after I edit it I have to re-save it prior to hitting button which generates print preview.
This is code that is generate upon click
Private Sub NoVet_Click()
DoCmd.OpenReport "NoVeteranMain", acViewPreview, , "ClientID = " & Me.ClientID
End Sub
I am trying to write a more complex macro that will start another macro at a preset time, however I am getting stopped at the first hurdle - getting a macro to run another macro.
Here is the code i am using at the moment, all I want to do currently is click the first button, then get the second macro to execute. But no luck, getting error 2157 "cannot find the procedure"
Code:
Private Sub Command3_Click()
MsgBox "1st macro running", vbExclamation, "Note"
Application.Run "teststart1"
' Application.OnTime TimeValue("19:55:00"), "teststart1"
[code]....
So I have this relatively simple problem: I need to create a button that once clicked will open the Save As dialog box and allow the user to save a copy of the current database where he wishes. The filename should contain todays date in DDMM format along with some pre-set text e.g. DDMM PresetText.
I am using Access 2010.
I have a few selected reports on an Access 2007 database that users can run. Is there a way for users to view the report, save as a PDF and automatically save a copy to a shared drive by modules/vba coding as an On Click event procedure?
View 4 Replies View Related