General :: Access Form - Scroll Box Does Not Bring The Selected Value Up
Sep 18, 2013
I have added a scroll list to my access form and although I can see the item I need to pick in the drop down list when I manually start typing it, the scroll box doesn't bring the value up and states that the value I have selected is not in the list (when it clearly is !!)
The user can select multiple items (non-sequential) on the listbox, say items 1 and 35313. I'd like the listbox to scroll (meaning display) to the currrently selected item, so that the user can see it while being processed.
I've seen stuff about property ListIndex, which does exactly that, but it's only useful when you have just ONE item selected (in a multiselect listbox apparently it deselects the rest of the items, so no point in using it, I guess, unless there's more to it!!).
So the key here is how to do the scrolling/display.
The code to loop through the listbox and process each selected item is attached:
Code: Dim vItem As Variant Dim Content as String For Each vItem In Me.lst.ItemsSelected 'scroll to selected item ??? 'processing of the selected item Content = Me.lst.Column(1, vItem) 'copy the content to do sth with it Me.lst.Selected(vItem) = False 'unselect the current item Next vItem 'go to next selected item
how to scroll to the currently selected item? Mind that I need to go through the list of selected items to process them for further use (i.e, I need them selected).
I'm using the following code to clear selected records from a listbox after a button is pressed:
Code:
For i = 0 To lstProducts.ListCount - 1 lstProducts.Selected(i) = False Next
The code works great except that it leaves the listbox scrolled all the way to the bottom. What is the best way to scroll back up to the top of the listbox without selecting another record?
I am working on a project where I need to upload selected data from multiple sheets of an excel file. Here is an example of what I want.
1. I want to create a table in Access with around 10 columns 2. Column 1 should be populated with the date field found in A2 cell of sheet 1 of the excel file 3. Column 2-5 should be populated with the columns B2-E200 in sheet 2 of the excel file. 4. Columns 6-7 would be populated based on values from columns 1-2 of the table. Basically Column 6 should be Column 1 date plus 60 days. 5. Column 8-10 would be user generated after the excel is imported and the user should have the ability to attach around 5 files to each row.
For some reason our database keeps "not responding" ...
The application stops responding when:A field is selected that has a input mask
A combo box is highlighted (forcing the drop-down menu to open)
Certain buttons are pressed (in fact all but two trigger not responding, why the two buttons are immune)
if I put a break point on a section of code that runs when I press a button (any button, it doesnt matter) and I then press the button which takes me to VBA, to the break point. Then I press F5 to continue to run the code until the function ends (essentially doing nothing, just running the code to the soonest break point I can in the function and then running the rest of the code as normal...) it all works fine again!!!!
I fixed the issue by creating the function:
Code: Sub aiuewjgaop() End Sub
saved the database, deleted the function and then saved the database again.
I have a database that has textfields / forms, what I would like to do is to add an option that when the textfield is clicked a calendar will appear and when the user selects the date in the calendar interface, it will insert the date for them.
I have a continuous form bound to a query. I want to filter this form with any date inputted into a text box through a pop-up calendar control. The default date in the text box should be Date().In the query, I set the criteria on Call_Date filled as follows but the form does not requery to return the expected data:
I have created a from which consists of search boxes in the above and the table in the below.
If we search for any in those search boxes then the results will be displayed at the bottom (The results will be displayed in the table which is located at the bottom of the page)
I had done with the above part.
My Requirement :
If I click on any of the row in the results table then is it possible to display only the selected row in a new form????
If I search for a keyword MS in a search box and if it returns 40 results and if I click on any one of the result then the selected result should be opened in a new form.
I have created a Db in MS Access 2010 and under Options > Current Database I have done the following:
- Used drop down to select a form I want to display on opening - Unchecked display navigation pane - Unchecked allow full menus
This works how I want it to, perfectly. I then send it to a client who also has MS Access 2010 and when they open the file the form I have told it to open doesn't open, the navigation bar is displayed (with the form I want to open highlighted) and the full menus show but are locked.
What's going on? Is it some security setting the client has that isn't letting the opening procedure execute properly?
Okay I have 3 forms. I have one form which is called frmEndOfTrial on this form there is a combo box which has two values--> Accepted and Return for credit.
I have two other forms called frmAccept and frmRFC. I have dragged those two forms onto the frmEndofTrial form and set there visibility to No.
What I want to happen is that when the user clicks on the 1st or 2nd option that corresponding form opens below the combo box?
I've tried a few things here but can't get it to work. I'm pretty limited in knowledge on access. Right now on hte combo box events I have this code for the After Update event me.sfrmRFC.Visible = True me.sfrmAccept.Visible = False
I know this is not what I want and not finished cause if I click on either accept or RFC it just brings up the sfrmRFC. How can I do this???
I'd like to know how to programatically bring a form on top of another one
I have two forms: Menu and Notice
in the onOpen event of the form Menu, I open the form Notice
problem is that even if Notice is the active form, it still hides under the Menu form...that's just weird...
Could it have something to do with the startup option in Access in which I tell to open Menu first, it looks like the startup event comes after the onOpen event.
I've written a function which opens the Outlook GAL dialog, allows users to select recipients and passes back a 2-D array (recipients and type i.e. To, CC or BCC).Here is the code :
Code: Public Function GetContactsFromOutlookGAL() As Variant Dim appOutlook As Object ' Outlook Application Dim objNameSpace As Object ' Outlook NameSpace Dim objSelectNamesDialog As Object ' Outlook Select Names Dialog
[code]...
The only problem I have is that when I 'display' the SelectNamesDialog, it doesn't make it the active window and bring it to the front - it just opens the dialog in Outlook and you have to navigate to the main Outlook window to find it.I'd like for the dialog to 'popup' - ideally, without the main Outlook window dragging along behind
I believe it's possible (judging from this article) to achieve this using API's - specifically, a combination of FindWindow (to retrieve the window handle) and ShowWindowLong (to set it to a topmost window in front of all other windows).
I have one "Project" form with subform that displays "Contractor" details. The Contractors are stored in a table and they are associated to a table of projects (many to many relationship) through a link table. When I am in the project form and have the contractor sub form tab "activated" I would like to go to the contractor form (press a button), select a contractor and link the contractor back to the project. Question: What is the best way to do this? I have tried creating a macro but get stuck as I need to "pause" it whilst I select the Contractor... As you can see I am no whizz! What is the simplest way to do this?
I have a form and in the form is a subform. When I add a record with the following code, the subform detail scrolls in such a way that you can't see the record you just added...only a single blank new record. Can you set the scroll position so that I can see all the previous records including the one I just added?
Private Sub Add_PROJ_RECORD() On Error GoTo Err_Add_Click Me.PROJECT_DATA.Locked = False Me!PROJECT_DATA.SetFocus DoCmd.GoToRecord , , acNewRec Me.PROJECT_DATA.Form.PROJ = PROJ_COMBO Me.PROJECT_DATA.Form.SPEC = SPEC_COMBO Exit Sub
happen- scroll wheel stops working in one table- the rest you can scroll in as usual? I know there can be issues with scrolling when you're missing some driver for your mouse, but this happened all of a sudden to just this one table, so I can't imagine that it's the mouse missing any drivers. I did compact/repair, restarted, and also tried repair of office installation. That table still won't allow scrolling unless you move the scroll bar manually first.
I have a form and table called pcinfo-vendor that the customer enters some date that they need. They also need to pull up some vendor information from a table called vendorinfo Vendor name, Address, City, State, Phone #, FAX # and Email. How can I bring up the data from the vendorinfo table on to my form called pcinfo-vendor? So that the customer does not have to type in - Vendor name, Address, City, State, Phone #, FAX # and Email each time for every vendor.
I have a form with various text, date and combo controls. There is a button at the button that runs a macro (Close NB) at the bottom. What I'm trying to do is bring up a msgbox if certain fields are blank and not run the macro. I only want the macro to run if all the fields specified have data in them.
The fields are : cmb_cliname cmb_disease cmb_projectType cmb_ProposalStatus
The on click code is: If (Me.cmb_cliname Is Null) Then MsgBox "Please fill in the relevant details", ElseIf (Me.cmb_Disease Is Null) Then MsgBox "Please fill in the relevant details"
I've designed access form with one listbox and added 'up' and 'down' buttons to move up and down the selected item in the listbox. i.e from its selected position to one item up when 'up' button clicked and same as one item down when down button is clicked. Any VBA code will do this functionality?
I have a form with 3 tab controls. Within each tab, there is a bound list box that lists records based on a combo box selection. All list boxes are bound to the same table and records in each tab will be in the same order.
I would like the same record be selected in each list box within the tabs, e.g. when record #2 is selected on tab1, the same record will be selected on tab2 and tab3, or if I click on tab 2 again and change the selection to record #3, record #3 will be selected on tab1 and tab2.
I am having a problem with displaying the scroll bars in Access. I have created a database which is viewed correctly in 1280x720 screen resolution, which is our standard setting. However, we have recently taken on some users with sight problems, and they are using a different screen resolution.
This means that the forms do not fully display on the page, and I would like to add scroll bars to the access window rather than the form so that the user can move up and down the displayed form. Is this possible?
I have a listbox which is populated by a query from a table.
I also have a sub which allows users to quickly select multiple items from the listbox (based on a pre-defined criteria) rather than scrolling through and selecting them manually / individually
The sub works fine but when it is finished, the listbox is automatically scrolled to the bottom (or, rather, to the last selected item)
I would like to have the listbox scroll back to the very top once all of the appropriate items have been selected.
(I could loop through the listbox items in reverse - or 'bottom-up' - in the code but that would only have the desired effect if the topmost item was selected. I want it scrolled to the top regardless of whether the topmost item is selected or not).