I want to password protect the second tab control page, so I'm using this code :
Private Sub TabCtl0_Change() Dim strInput As String
Dim ctl As Control ' Hide controls on tab until correct password is entered F
or Each ctl In Controls If ctl.Tag = "*" Then
ctl.Visible = False End If
[Code] .....
then to hide the controls in the first place, we do this using the Tag Property, and in the OnCurrent event of the form:
Private Sub Form_Current() 'Hide controls tagged with "*" until password entered.
Dim ctl As Control For Each ctl In Controls If ctl.Tag = "*" Then ctl.Visible = False End If Next ctl End Sub
The password request and events works fine but when prompting for the password it still shows the second page items and info. so basically it is not hiding the tab.. How do I fix this
hiding parts of a form if a option button is selected. There are two option buttons and two parts to the form. I would like each part of the form greyed out or made invisible depending on which radio option button is selected.
Having trouble getting the code right to hide and unhide forms.
I have a main menu from which users can open other forms. When another form is opened, I want the Main Menu to be hidden, so it doesn't appear in the task bar.
For example, from the Main Menu Me.Visible = False DoCmd.OpenForm "Review frm", acNormal
However, from Review frm, I can't get the Main Menu to be visible again. I've tried Forms!Main_Menu.Visible = True but it says it doesn't exist. (Note the name of the form, Main Menu, has spaces, which is why it has the underscore between the two words. Don't know if this is relevant or not.)
I cant get my subform to hide. Main form is called 'frm_main_add' and the subform is called 'tbl_transaction_subform'.I am rying to get it to hide the subform (tbl_transaction_subform) if a field in the main form(frm_main_add) is null but its doing nothing.....
I put this code in the 'on current' and 'on load' in the frm_main_add and nothing..If (Expense_Name = Null) Then tbl_transaction_subform.Visible = False Else tbl_transaction_subform.Visible = True
I have a command button that opens a report. The report has many subforms in it. I am sending open args which existingstewardship. I want one of the labels of the labels to be visible if the me.openargs = "existingstewardship". the code is not working. I have tried to debug when I do this I have found the open args are null and I am wondering if the open args are null is this because they were sent to the main report from the command button and the subforms in the main report do not get passed the open args.
Does anyone have any idea ? how I could make the box visible or not visible in subreport from the command button. The other option I have would be two different reports. Thanks PWF
I have created a form with some boxes on it which include in their body textboxes and labels and combos. I would like to know if it is possible (or if a control exist) to group this items which are inside the box and with a simple box.visible = false to make them all non visible without tagging them or adding code with their names statically to make them non visible. Any link that shows how to move controls in the form in runtime?
I would like to hide some controls and make smaller the form and if user selects a checkbox to show these controls that exist inside a box and grow the form.
I am building a form where I would like to group fields into 3 groups, A, B & C. I know I could put all groups on their own subforms but I'd like to see if there is a way to simplify it all on one form since there aren't much fields for each group.
I would also like to hide each group when the user clicks 'hide group A' and shift Group B & C up. Then move them back to their original position when 'Display Group A' is clicked.
Same for each group. If Group B - Hide is clicked, Group C is moved up.
I've got each group tagged appropriately and I can hide/display them all properly by a For Each Control loop. Now, how to I move them all up/down a specific amount in addition to that? I would think it would be just as easy but my objects are moving by using the Grid Y property
I have a form with command buttons on it (a menu) but I want the form to be full screen without hiding the taskbar. I can get the form to fill the screen with no problems, its just a matter of having the taskbar available to multi-task!!!
Also, is it possible to have a few forms open at once with each form appearing on the taskbar
I search around online and did come across much info on code to how to hide fields. But, the problem is I cant seem to find a way to hide a certain amount of fields based on a number amount.
example: Lets say I have a 12 text fields to show 12 months of monthly payments, and lets say a client only has a 3 payment term. How can I list 3 under installment field and have remaining 9 fields auto hide since they wont be necessary? this way I only see what applies and not additional text fields.
I have a form which has a combobox where the user selects a record from another table,I want to hide the forms fields [managercontact] and [managertelno] depending on the value of the combobox (manager) from the table details, but its not the value shown in the combobox its the value of another field [type] from the same table called details. Its one of two values being 'conc' or 'ob'.
I have frmIncident that has a 2-column combo box (cmbIncidentType). Column (0) is IncidentType, Column (1) is YES/NO. This combo box feeds from a Query and currently has about 15 "types" of which 4 have a "Yes" tied to them, then rest "No".There are situated on a TabControl (tabIncident) with 5 sheet tabs. If the Incident Type selected in the Combo Box has a corresponding "Yes" in Column (1) then all 5 sheet tabs need to be visible. If it is "No", then only three of the five are visible. Here it he current code I am using for the AfterUpdate event on the combo box:
Private Sub cmbIncidentType1_AfterUpdate() If Me.cmbIncidentType1.Column(1) = "Yes" Then pgEmerIncidentRpt.visible = True pgNarrClose.visible = True Else
[code]...
When I open the form is will set the proper sheet tabs that need to be visible, however once I cycle to the next record, or select a different Incident Type, even one with a "YES' in column (1), it will only show the (3) sheet tabs. I can never get it to show all 5.
In the code, the only (2) sheet tabs that need to visible = true or visible = false are shown, starting with "pg".
Anyway, some staff are not using the forms' menu buttons but are playing around with the Access toolbar (file, edit, et cetera). The administrator wants me to either disable that toolbar or hid eit from view. Any ideas?
I am compiling a database of my fire system 'engineers reports' by creating a form that is identical to the one that I print and give to the customer. I used combo boxes to look up system type details, from another table, after inputting the serial number. As these combo boxes can only produce one value I hid the arrows behind background coloured rectangles.
When I print the form the arrows disappear, the combo boxes expand by the width of the arrow and the last 2 digits of right-aligned numbers disappear behind my rectangles.
This form has over 200 controls (systems types, parts used numbers and quantities etc) and I need to print it on a single sheet of paper. I cannot afford to leave extra space between my controls. The only thing I can think of is setting the visible property of my rectangles to screen only, which is not ideal.
Any suggestions would be greatly appreciated. Thanks
I want to use VBA to hide columns in a subform based on what is checked in a multi value look up field.
I am creating this DB for use with sharepoint as a web database, which is why I am using the lookup field to begin with. There will be a client DB to use with some VBA code
So what I have is a lookup field with tests "Test 1, Test 2, etc" on form sample.
There is a subform called results, and I want to hide certain columns based on what tests are performed.
I tried using an If Then statement (code is being run on subform load)
If Me.Parent.fieldTest = "Test 1" Then Me.Test1Col.ColumnHidden = False Else Me.Test1Col.ColumnHidden = True
That is basically the code I was trying to use. I am getting an error 13, which I assume is because fieldTest can not = something since it is a multi value look up field.
On my form frmEmployeeDetails I have a text field that is named SSN for social security numbers. I have used the mask on it so it automatically inputs dashes. I am attempting to hide all but the last four digits of the ssn. This is on the on current event of my form.
Code:
'Hide SSN Dim strLSSN, strSSN As String strLSSN = Right(SSN, 4) strSSN = ("***-**-" & strLSSN) Me.SSN = strSSN
On a form, what is the best way to hide a label or text box? I'm guessing that I can do a checkbox which would work for me and just write a macro to hide on a false value?
Hello,I was wondering if anybody knew if it was posslble to show an aproximated value of a field with decimal records. I would like to see only integer values on my form.
Here's another one on this subject... But can't seem to find the answer in the "Search" Currently I am using the "Call fSetAccessWindow(0)" method.... Well, all works fine until I start getting into reports. I have read in some post of other methods to hide Access. But I have yet to find any examples of the "easier way"..... Can anyone direct me to a post or link?? Thanks Curtis
Hi, I'm haven't much experience working with Access and I'm hoping someone out there can help me :)
I have a list of products with technical data in tables, however sometimes not all the products have the complete set of data. Is it possible to hide the cells where there is no data present when linked to a page?