I have a Print button on a form, which actually prints off a report for the user.
Some of them seem to be trying File-->Print, which actually just prints the form instead of the report and no matter how many times I've told them to use the Print button, they seem incapable of remembering.
Is there a way to turn off the File-->Print option ?
I have a form which my company wanted that each single record should be printed from form. I made a print record button and put code to print single page or record. However as a natural habit people go to file > print to print which leads printing all records so 1000's records start printing. Is there any way i can hide print button. File >Print button.
View 1 Replies View RelatedWith this
Me.Application.CommandBars("Menu Bar").Controls("&File").Enabled = False
I can disable the Command "&File" in the Menu bar, How can i disable its menu option Like "Print Preview"
Hi,
Newbie needing a shove in the right direction. My option group will be confusing for a user because it defaults to the Male selection
of the Male / Female option. In other words, as the user views the form to scroll through the records, the option button will always be at the Male selection, regardless of what was originally selected to update the table field. Is it possible to hide the option group once it has been used to input that record, or, have it display the correct selection for that particular record?
How can I print a report and at the same time programatically set the printer name and 'Print to File' option and set the path of this option?
View 1 Replies View RelatedI'm trying to disable users from right clicking, from within a combo box and selecting paste. The following code is suppose to work
Private Sub DESCREP_DESCRIPTION_GotFocus()
Application.CommandBars("Form View Control").Controls("Paste").Enabled = False
End Sub
but it doesn't work, any suggestions?
here's my macro
after each print out line i get this
can i disable this prompt from appearing?
I just published an access database to sharepoint. However, after I set some user as contributor, those users can see structure of my database, and export tables to excel directly. Is there anyway that we can remove the access to "Setting"?
View 2 Replies View RelatedCreating a database for processing survey data into a report format. We receive these reports as paper copies, which are then scanned in using Remark Office OMR. This results in a table of data, which is intended to be appended to the existing table in the database using Save As --> Access 2007, selecting the database and target table, clicking save as, and then selecting 'Append' from the subsequent popup.
What I want to know is: Is it possible to disable/otherwise prevent the 'Overwrite' option in this window from being selected? Can I make the table or database in such a way that data can only be added, not edited or deleted?
I have a database with several reports that get constantly printed, however I am having an issue with their display properties that sometimes cause errors.I need the report to come up on top of everything, maximized and with the menu bar available to allow for it to be printed or close it. The report window cannot have "minimize" or "restore" available to make sure nobody access any form behind it.
To achieve this in a form I generally use the modal property, however if I do this in a report I cannot get to the menu bar to print or close the print preview.Thinking that modal was out of the question, I went ahead and maximized the report on load and set its properties to the image attached. The db is then compiled (accde) and then distributed.
On my computer (it is being developed on my machine) the report loads fine (maximized) with no min, max or restore buttons and the print preview menu bar is shown with the print and close buttons available. See "My PC" image attached.On any other computer, the report opens up maximized but the report's restore and close buttons are enabled, however the print and close buttons on the print preview menu bar are greyed out. See "Other PC" image attached.Why the inconsistent behaviour when using the same front end?
I have a secure MS Access database, where users by default can only read data, but not write. How can I prevent them from importing or linking files, or inserting objects? I don't want to use any passwords in my database, since it's used inside the application. Thank you.
View 1 Replies View RelatedThere aren't too many threads on this subject folks. I am looking to understand this a bit more. From what I know, complete security of a database can only be accomplished by making an MDE file. But, the downside there is that MDE's cannot be edited by anyone, so any backups or changes that need to made must be done with an MDB.So, what I want to know is, if I want complete security of a database (as in, no changes allowed to be made, except by me), my only option is to make an MDE file and then transfer all the data back and forth between that and an MDB file whenever I need to make any design changes.Am I right?Thanks!
View 2 Replies View RelatedHow do I hide or disable the File tab in Access 2010 on my front ends?
The file tab being present allows end user to get into Privacy Options and Printing. Printing is okay if I could disable the Privacy Options for end users, then it wouldn't matter if they have access to the File Tab.
Possible very serious security issue!
Hello, I'm back again.
I have this form with an button on it, but I like to know how to use the button for printing an Excel file.
Tnx,
Dinus.
hi guys,
i'm trying to run a recordset and export the string of each record into a txt file. from all the examples ive seen the way i'm doing it is right but i'm not getting any data to go into the actual file. my loop works perfect (as i watched it in debug mode) and it makes the string, my file just isnt getting outputted.
heres the code:
Private Sub btneParcel_Click()
Dim rs As Recordset
Dim strContents As String
Dim lngFileNum As Long
Const strFileName = "g:worksdatImport01.txt"
Set rs = CurrentDb.OpenRecordset("SELECT * FROM QryeParcelExport")
If rs.RecordCount > 0 Then
'header lines
strContents = "ISA*" & Format(Now, "yyyymmdd") & "*" & Format(Now, "hhnnss")
strContents = strContents & vbCr & "GS*CN"
Do While Not rs.EOF
'detail
strContents = strContents & "ST*"
strContents = strContents & vbCr & "CN*" & rs("EntryDate") & "*" & rs("EntryTime") & "*E*" & rs("CustId") & "*" & rs("CustName") & "*" & rs("CustAddr1") & "*" & rs("CustAddr2") & "*" & rs("CustAddr3") & "*" & rs("CustCountry") & "*" & rs("CustPhone") & "*" & rs("ChargeAcctNo")
rs.MoveNext
Loop
'footer
strContents = strContents & "GE*8"
strContents = strContents & vbCr & "IEA*36"
lngFileNum = FreeFile
Open strFileName For Output As #lngFileNum
Print #lngFileNum, strContents
Close #lngFileNum
MsgBox "Client Data has been successfully exported to G:Import01.txt", vbExclamation
End If
End Sub
anyone able to help with this? actually just reading my code, do i need another new line at the end of my string? think parts are going to one massive line that should be seperate lines...but that should still output something.
I'm very new to Access and especially VBA. How to get started with the correct syntax for locating a file, and printing it. The file will be a PDF and if possible I would like to declare a variable for the file name (not the path) so if it is changed I can just change the variable instead of looking for it in the code. I plan to have 10 of these.
View 6 Replies View RelatedUsing 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 researched on here how to print the results of a query to a text file. I put the code in and I get an error on the openrecordset line. The error says "too few parameters, expected 4"
I tried the query in another report I export to excel and the query works.
I tried printing the whole table using "Select * from tbl_Customers" and it works????
Here is the code:
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("qryBell1", dbOpenSnapshot)
Dim fs, TextFile
Set fs = CreateObject("Scripting.FileSystemObject")
Set TextFile = fs.CreateTextFile(pathname, True)
[Code] ....
the query returns 6 fields for printing and can filter based on whether 3 fields are filled or not on the form - Date, Campaign, Status
I’m really stuck on how to create: Check Boxes/Option button/Option Group in VBA.
Could someone help on either all of them or some of them please?
Thanks
Richard
I'm trying to figure out at what point an error message occurs while a database is closing. This problem only occurs if someone clicks on the red close button on the top right of the screen when there are several forms open. If the user exists normally there is NO problem.
I am attempting to use the print statement to write to a text file to track what is happening as the database shuts down. Unfortunately, the open (print) statement, when issued, zaps any prior contents which precludes having a full printed record. I am hoping for a print syntax that would allow appending.
Code:
Open "ErrorReport.txt" for Output as #1
Appended text to the file to show what is happening in that event.
Close #1
The program, in closing, does stop with an error message that a certain file can't be found. But when I click on debug, the program simply closes. I have also commented out VBA references to the file that can't be found, but the error still persists .
I am using an Access database for a foreign language dictionary project.
One of the forms I use is populated by a query (qryLemmaTable) to retrieve information from tblLEMMA.
This form works precisely as I intend it to work, but there is a glitch on it that is driving me mad.
The form in question has an option group with 11 radio buttons that correspond to the parts of speech associated with each word in tblLEMMA.
When I click on the button optAdjective I apply a filter and the only records that are displayed are adjectives. (The same applies for Nouns, Verbs, Prepositions etc.)
Here is the glitch: even though the radio buttons apply the filter correctly, no “black spot” appears in the button. Other signals on the screen let me know what word type is selected, so I can accomplish what I want, but I want the “black spots” too!
Perhaps this will be a clue: For each radio button I use the following code in the GotFocus event.
Me.FilterOn = False
Me.Filter = "wordtype = 'A'" ‘(or N, etc)
Me.FilterOn = True
And this for the Lost Focus event
Me.FilterOn = False
Thanks for the help.
Hi
I've got an Option Group with 3 options; Yes, No and Future.
I also have a range of Check Boxes; 1 for every day of the week.
When one of the check boxes is selected I want the Option Group to change to Yes.
Currently, the Option Group defaults to Future and No will only be available by manually selecting it. This doesn't need to be changed.
Any help will be greatly appreciated!
Cheers
I stumbled upon the Option Group function just yesterday and, happy as a clam, I created a group with 2 options in radio button style. I assigned the values to a field called Registration_Type as the 2 options are "Confirmed Registrants" and "Prospective Attendees".
[Great. That part works well. When I look at the table, a 1 or a 2 is in that field so it's great to know how to control accidental ticking of radio buttons (previous 450 records or so didn't have this option group functionality so one might easily tick one of the buttons. So one part of controlling option group I know I can handle via the table itself for now.]
The challenge is how to ensure the user always ticks one or the other ... I went back to the main table and tested the 'required entry' option for the Registration_Type field but forcing an action like this is not ideal in my mind. The usual error message vagueness for the average user is no good and I don't want to limit the user so much.
Is there a way to simply have a popup come up warning that neither radio button was ticked? Perhaps something linked to the form - i.e., maybe "after update"?? I only learned about attaching code to before and after update on controls a couple of days ago, so not sure if this would be best approach.
Just something to let the user know that nothing has been ticked in the option group as that controls in which of 2 reports the data will show up in so any record not ticked might mean a registrant being left out, which would be rather disastrous <g>.
I have an unbound form with an associated report. When the user hits the 'print' button on the form/screen, the report is launched in the background. In the On Load event of the report I populate the report fields from the forms field as so:
Code:
Me.txtAddrMainLine2 = "NAME " & UCase([Forms]![frm_OrderRx].[txtPatientName])
This works like a charm as long as I call the report in Print Preview mode (i.e. with acViewPreview). But if I send the report directly to the printer, none of the fields print.
I've read about using other report events to populate the fields (e.g., On Format and On Print) and also something about using TempVars to pass the data. But I haven't read anything that's clear and definitive about the full answer.
I recently upgraded a DB from 2003 to 2013 and ran into the following problem.
I have a button that opens a file dialog box and allows the user to upload a file to a predetermined location (and store the address as a hyperlink). I borrowed this code from someone else on here and modified it slightly.
In any case, the button still works, but now when it opens it doesn't have an option for "All files" under file types. So I can upload MS Office files, text files, etc., but not PDF files which are by far the most common types my users upload.
Private Sub Command35_Click()
Dim dd As Integer
Dim fileDump As FileDialog
Set fileDump = Application.FileDialog(msoFileDialogOpen)
dd = fileDump.Show
Dim Yourroute As String
Dim yourrouteName
Yourroute = fileDump.SelectedItems(1)
yourrouteName = StrReverse(Yourroute)
yourrouteName = StrReverse(Mid(yourrouteName, 1, InStr(yourrouteName, "") - 1))
FileCopy Yourroute, "us170fp00dataWBO_Tool_RoomDrawings" & yourrouteName
Me.Drawing_Link = yourrouteName & " # us170fp00dataWBO_Tool_RoomDrawings" & yourrouteName
End Sub
I often create contract using mail merge. I have an access file that I want to use as data source for word file. But it does not automatically.
Please download the attached file !
If there are 1 customer and 1 property, I do not need to do anything. Conversely, if there are many customers and many properties, I take time to manipulate.
Firstly, I open the word file. I have to copy and paste paragraphs that I want. Highlight of the original paragraphs is blue.
Secondly, I click 'Insert Word Field' -> select 'Next Record'.
In short, I wish to use VBA in access file to automatically perform the steps that I have outlined.