I have few forms for which I have created a navigation form. Now in this navigation form, I have 4 tabs/ forms. I want to disable other 3 tabs/ forms when either of the one is active. I want to restrict user from switching the tab leaving the task incomplete in one tab.
It should show a popup msg, that "the task is active. Please submit before leaving the page."
In A2007 if you disable the Navigation Buttons on the form the Me.RecordCount will be set to 1 when the form opens ? I replace the Nav buttons with my own set but my "Go Next" button will not work untill I hit "Go to Last". This apparently restores the recordset count to the correct number of records.
View 14 Replies View RelatedHello!
I have little problem. I have form which have linked Child table. On that Child table in a form I have displayed Navigation Buttons. I don`t want to see them, but I can`t disable them. I tried everything.
Please, help..... :confused:
I am not able to disable NavigationButton when i login navigation form using login form. I am using MS access 2007 - 2010.i am using below code but getting error.
Forms![Navigation Form]!NavigationButton13.enable = False
Error
Run-time error '438'
Object doesn't support this property or method.
Any other method to disable NavigationButton.
Sorry if this is too trivial to be posted as a new thread, I have spent a considerable amount of time trying to do this but have failed miserably.
I want to remove the set of command buttons at the bottom of the forms, (the navigation buttons to move the next record etc.) as i want to create my own. And also when I have got two or more subforms this looks too cluttered.
Can anyone help me?
Thanks.
Hi!
I want to disable the usage of mouse scroll on my forms. Because, as things are now, you may accidently choose/ scroll to another Record/ Post, when editing data for one specific record.
How do I accomplish disabling usage of mouse scroll?
I need to execute some VBA to load a new form in my navigation view, not a popup form.
If use DoCmd.OpenForm "DB History" it opens the form as a new form.
DoCmd.BrowseTo acBrowseToForm, "DB History" set the focus on the DB History navigation button but doesn't open it.
So I think I need to add the path.
'DoCmd.BrowseTo ObjectType:=acBrowseToForm, ObjectName:="DB History", 'PathToSubformControl:="??"
This is where I am stuck.
My main form is Navigation Form1
The sub ins NavigationSubForm
and the form loaded is Form1 which I would like to replace with DB History
Basically I want to put a code in the "on load" event of a form that enables or disables navigation buttons based on a value in a table (the table has 1 record and 1 column).
So if the value is "A", I want to hide navigation buttons on load; if it is "B", I want to show navigation buttons on load.
I know I can set this property in each form, but I have a number of forms that I want to configure at the same time.
My problem is that I don't know how to reference the value in the table.
If I hide the AutoNumber ID field in a split form datasheet, nothing is displayed in the forms navigation buttons (Record x of x).
If I unhide the ID field, the record number and number of records correctly.
The control is Enabled and Visible.
Is this possible? I can't seem to find this q anywhere here so I thought I'd post.
I changed the colour of my form to white, but the Navigation Buttons at the bottom and the command buttons that I 've added stay at the default grey.
Is there anyway to change this? I right-clicked and tried changing it to white through the properties but there's nothing there that does this.
:confused:
Is this possible? I can't seem to find this q anywhere here so I thought I'd post.
I changed the colour of my form to white, but the Navigation Buttons at the bottom and the command buttons that I 've added stay at the default grey.
Is there anyway to change this? I right-clicked and tried changing it to white through the properties but there's nothing there that does this.
:confused:
I want to create a navigation form, or any form for that matter that has an embedded report. The report has data arranged by ClientID. I would like to create buttons down the left side of my form (why I thought a navigation form could work) where I can put the client name on the buttons and when I click them the report will filter to only show that clients data. I have client tables and the report data linked in queries, but just need to know how to get started with these buttons acting as ID sorters.
For example:
ClientID: 1 = Client: ABC Corp
In my report ClientID 1's data is grouped along with all other client ID's.
In my form I'd like buttons down the left side with ABC Corp written on it (followed by buttons for the other clients) and then when I click the ABC Corp button only ABC Corp's data shows on the page from the embedded report...
I need to disable or hide the restore, minimize and close window buttons found in the top right hand corner of a form.
I navigation buttons that controls open, close etc already set up.
So I have made all the necessary forms to start working with my Access, and now I need a main form, a home where I should put all the buttons to enter each form.I have used the Navigation Control on a New form URL...
A row with buttons appeared, and I complete the property: Navigation Target Name with the target form, but it is giving me some trouble with a searchForm and a Query. Every time I enter this form (using nav control), Query asks for an Input.
Hi there I found alot of nice tips here, thanks for that :) But I havent found exactly what I am looking for. I will keep searching but I thought I would post as well.
Here is my problem : I have to design a form that works like an old application form written in VFP7.
Basically a combo box chooses a customer, another combo box filtered by customer chooses a job. A third combo box filtered by Jobs chooses a stock.
There is a subform linked by Stock_ID that displays details of the stocks, amounts, locations, etc...
I want to limit record navigation to these combo boxes. Right now even with navigation buttons hidden and limiting tab cycle to current record; a user can use the mousewheel and page up / page down keys to change the current record in Stock table and thus changing the details in my sub form.
Does anyone know of a way to stop all record navigation unless I explicitly move the record pointer via code behind the combo boxes?
I will keep looking around here and will likely play with the Current event to reverse any changes made to the record pointer but it does not seem the best way to handle this.
Thanks much :)
ps Im using Access 2003
I have a field (DueDate) that will blink (flash) if it passes its value
problem is the text to the right of the navigation buttons is not showing the number of records unless I navigate till end of the records.
I tried Me.Requery and Me. Refresh but with no success
First time user - so please forgive if this is already out there.
I want to hide the navigation buttons on a form and create a custom set of controls. I can create the buttons themselves but am having trouble with the "N of X", where:
X is the total number of records in the query, and
N is the current record showing in the form.
I can get X but how would I capture and display "N".
Any help would be appreciated.
I searched the forum on custom navigation buttons and found great posts about it. I downloaded 3 samples and the one that fit what I needed was SJ McAbney's dbNavSubform.zip. sfrmNavigation (http://www.access-programmers.co.uk/forums/showthread.php?t=87791) I imported sfrmNavigation per SJ McAbney's on the post into my database.
I didn't want to start a new thread so I posted on the thread: http://www.access-programmers.co.uk/forums/showthread.php?t=88880
But I didn't get any responses.. I don't know if it's been overlooked.
I am encountering problems when I use dbNavSubForm in my database.
1. I made 2 copies of sfrmNavigation and I am using it on 2 of my forms.
On the main form that I am using it when I first open the database it shows record 1 of 1 when really there is more than 1 record. When I click on the next button it then goes to say 2 of 15.
How can I fix this so that when I open the database it will say 1 of 15 and not 1 of 1?
2. I have a Main form ex: frmMain and a subform on frmMain. I added the the subform (dbNavSubForm) onto my subform. Make sense? Here the navigation buttons do not work. When I try to add a new record it tells me "The object frmTOItems isn't open" When I try to click on the next or previous it tells me "Object variable or With block variable not set. How can I fix this?
I have captured a picture of my form so that you can see what I mean.
Thanks in advance
I have created my own set of navigation buttons for last previous next first and new records. How can I also create the box which tells you which record you are currently looking at, and the one which tells you how many records there are in total?
Also, an error message comes up when i click previous if on the first record and when I click next when on the last. How do I blank out the previous button when on first record, and how do I change the function of the next button to "new record" when on the last record?
I am trying to do this as I want to move the navigation buttons from the bottom of the screen so if anyone knows a way of doing this without creating all new buttons then that would be even better.
Thanks guys.
I have a form that uses command buttons to navigate from one record to the next. There is also a last record command button that when pressed will go to the last record, but the record indicator does not show the last record (i.e., Record 66 of 66), but show the same record that was active (i.e., Record 5 of 66) when the last record command button is clicked.
Is there any type of code that I can use that will update the record indicator to show the last record when the last record command button is clicked?
Thanks for any help
Does anybody know if it is possible to set extra code to any of the standard navigation buttons?
In other words, is there is Sub that corresponds to each navigation button that can be modified?
For example, for "Next>", is there a
Private Sub cmdNext_Click()
...
End Sub
???
Hello all,
I've looked at the examples of custom navigation buttons people have created. Some are better than others, but none of them are fully functional, in my opinion.
I like Stephen Leban's technique; manipulating a Parent's .Recordset from a SubForm. My goal is to create a set of instantly reusable custom navigation buttons.
However, even his code lacks Save and Delete buttons.
In studying this problem, I noticed something about the built-in navigation buttons that nobody seems to have addressed, even those who claim their button set mimics "exactly" the built-in buttons. None do.
And that is that when clicking the "New" button (built-in), the New and Next buttons are disabled. This is fine and expected.
Then, when any field on the form is changed (form made Dirty?), the built-in New and Next are instantly enabled.
Does anyone understand how this is being done?
all,
i seem to be having an issue with the navigations buttons on my form
when i open the form nothing happens when i click next but when i click on last record that works then i can go back on the previous and then the next button works.
the code shows as below ...
Private Sub NextRecord_Click()
On Error GoTo Err_NextRecord_Click
If Me.Dirty Then
MsgBox "Please Save This Record!" & vbCrLf & vbLf & "You can not advance from this record until you either 'Save' the changes made to this record or 'Undo' your changes.", vbExclamation, "Save Required"
ElseIf Me.CurrentRecord < Me.RecordsetClone.RecordCount Then
DoCmd.GoToRecord , , acNext
End If
Exit_NextRecord_Click:
Exit Sub
Err_NextRecord_Click:
MsgBox Err.Description
Resume Exit_NextRecord_Click
End Sub
any ideas???
thanks
Ok, I am trying to make some sort of thumbnail preview form. The image appears in the imgBox no problem, and it is grabbing it from the field. When I use a combo box to navigate the records it works flawlessly
HOWEVER, I would like my users to be able to press bckwds/fwds arrows so i made some arrows with the wizard and added some code. Heres how it looks
---------------------------------------
Private Sub cmdNext_Click()
On Error GoTo Err_cmdNext_Click
DoCmd.GoToRecord , , acNext
Me.Requery
If Me!SamPhoto = "" Or IsNull(Me!SamPhoto) = True Then
imgSamPhoto.Picture = ""
lblNoPhoto.Visible = True
Else
lblNoPhoto.Visible = False
imgSamPhoto.Picture = Me![SamPhoto]
End If
MsgBox Me!SamPhoto
Exit_cmdNext_Click:
Exit Sub
Err_cmdNext_Click:
MsgBox Err.Description
Resume Exit_cmdNext_Click
End Sub
Private Sub cmdPrevious_Click()
On Error GoTo Err_cmdPrevious_Click
DoCmd.GoToRecord , , acPrevious
Me.Requery
If Me!SamPhoto = "" Or IsNull(Me!SamPhoto) = True Then
imgSamPhoto.Picture = ""
lblNoPhoto.Visible = True
Else
lblNoPhoto.Visible = False
imgSamPhoto.Picture = Me![SamPhoto]
End If
Exit_cmdPrevious_Click:
Exit Sub
Err_cmdPrevious_Click:
MsgBox Err.Description
Resume Exit_cmdPrevious_Click
End Sub
Private Sub Form_Load()
DoCmd.GoToRecord , , acFirst
End Sub
------------------------------------------
My problem is that it never goes to the second record when i press next, and when i press back it says at end of recordset ( which makes sense ) but why would the back button work, and the fwd button do nothing ? I am hoping it is a small syntax error. Please help!
Good day!
Would it be possible to disable the Page Up and Page Down keyboard buttons? Also, the Up and Down arrows? If yes, how?
Thank you.
sheila
I would like to disable the Navigation Pane completely, based on the security level of the user that logs in, of course.
I have code that checks their level (I'm an "Admin" and everyone else is a "User"). If they are a user, then it hides the ribbon and minimizes the nav pane. If the login is mine, it enables everything.
That works, but the only problem is that the user can just maximize the Nav Pane on their own and access all the tables, and I don't want that. I can't find any code that completely disables the pane.
I have this code connected to my login button on my login form:
Code:
If Security = "User" Then
DoCmd.ShowToolbar "Ribbon", acToolbarNo
DoCmd.NavigateTo "acNavigationCategoryObjectType"
DoCmd.Minimize
Else
DoCmd.ShowToolbar "Ribbon", acToolbarYes
DoCmd.NavigateTo "acNavigationCategoryObjectType"
DoCmd.Maximize
End If
I can go to the options menu and disable the nav pane completely, so I know since only I have access to the ribbon, I could always go in each time and recheck the display nav pane option on that menu. But, that could be a little bit of a pain having to do that each time.
Also, I know I could finish the design and convert the DB to an MDE, but since my DB isn't broken up into a front/back end, I have to access that same DB everyone else uses, and if any changes need to be made, I don't want to have to use my backup, transfer over the changes any user made to the records, and then reconvert it back to an MDE each time.
If it's possible, I'd like to do all this using VBA. If they aren't an ADMIN user, then disable everything for them, but if I login, enable everything for me.