I have an unbound listbox "Needs", and in the onclick event have the following code which works great if I have more than one item selected, but if I only have one item selected, it does not put it in the text box "ServiceText".
Code:
Private Sub Needs_BeforeUpdate(Cancel As Integer)
On Error GoTo errHandler
Dim ctl As Control
Dim strStart As String, strEnd As String
Dim aryList As String
Dim varSelected As Variant
Thank you for taking the time to look at this Question.
I am using a form in which i only need the last sections.
example:- G/001 - Ceiling - Tiles - Perforated. this is what i get at the second, but i would like to drop the "G/001 - " and just have "Ceiling - Tiles - Perforated.", has anybody got any ideas on how to do this please.
So, I have a main form with two continuous subforms like this:
frmContratos: main form frmContInsumos: contains new products frmInsumos: contains existing products
I want the user to highlight a word using a double click in a textbox called DescInsumo from frmContInsumos. And I want that highlighted portion to be used as filter for frmInsumos, which also has a textbox called DescInsumo. I used this and it's giving me the word, but it doesn't work with the double click event:
Code: Private Sub DescInsumo_Click() Debug.Print Me.DescInsumo.SelText End Sub
I have a main form with several continuous subforms on it. These subforms are based on a selection of fields of a complete and editable form, so these subforms are overview forms so to speak. Whenever a field of a certain record is clicked, the other subforms show the linked data for that record, whenever a field of a certain record is double clicked, the corresponding form opens so data can be edited.
I would like to show which record is selected (record selectors are not enabled) in the way you select text in any application in windows. So when record A (holding fields A1, A2, A3 and A4) is selected in any way, the text should be lit up as if struck with a text-marker pen.
How do I go about that?
It would really be nice, since there is a cascading effect of records going on in the main form, which can get a bit confusing if you have to or want to glimpse at which record is selected. So for ease of use, this feature would really be nice.
I have a frmServiceOrder form that has a "datasheet type" sfrmSOItem subform with a combo box that allows a user to select service order items...
Problem: When I select a service order item in the dropdown, it doesnt place the item in the record...I have to select it a 2nd time in order to make it appear in the record. However, if I select the item by typing (i.e., via autofill) and hit the enter key, the item will populate in the record the 1st time.
I suspect it has something to do with my query joins. I hav played with various combinations and cant find a solution...
Does anyone know how to get the columns of a listbox selected item and store it to a string? There is no multi-selection so it should be easier. I tried s$ = Me.list1.selected but it keeps giving me an error
I am having trouble with a If statement. I am trying to save a record into a table when an item is Selected (highlighted blue) in a list box. Keep in mind that my listbox is set to multiple selections. I have the following code but sometimes it works and sometimes it doest.
The reason why I am trying to get this to work is because when a item is selected I will add it to the table and when an item is deselected I will delete it from a table. See my code and pictures I have attached :
Private Sub list_audits_Click() Dim strsql As String Dim list As String Dim id As String id = Me.User_ID.Value
I have a MS Access database, which contains three main tables. With these I have a completed table, which holds either Yes/No within it.
One of the tables, I have linked to the Completed table as a list box, which when a job has been completed, either yes or no can be selected.
But, what I want to happen, is, when the Yes is selected, I want Access to insert the date the 'Yes' was selected, so that the employee cannot lie about the date the job was completed.
Hope I have explained this in a good enough fashion.
I don't have a clue how to go about it, could anyone help.
My list box will be used to populate a form, is it possible that once the item is dble-clicked, it reverts to a different color to let the user know it has already been selected once or can the row be locked once it has been selected?
I am trying to do the following. I understand how to create relationships.However, when I create a field with a drop down selection (in this example Phone Number and Email) once that list item is selected I would like the column to the right to populate that information.So when Phone # is selected, the field to the right will populate a number for this individual.
Show me the selected item in a Listbox without looping in the whole list, because my Listbox is multiselect and I want only the item that selected recently.
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 simple listbox (single column, no multi-selection).I want to enable a command button when the user selects an item in the listbox / disable it if no items are selected.I'm using the AfterUpdate event of the listbox, as follows :
Code:
Private Sub lstOptions_AfterUpdate() Select Case Me.lstOptions.ItemsSelected.Count Case 0 Me.comConfirm.Enabled = False Case Else Me.comConfirm.Enabled = True End Select End Sub
But when I select an item from the listbox, and debug the code, the Count is always zero? Even though I can see the item selected??
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).
A form I created contains buttons for the user to restrict the display- showing records that are tasked to one specific employee. So their choices are Employee a, employee b or all employees. This is a process I use a lot :) This last form opens with NO records displayed. When a button is clicked the records show correctly. Any idea what to check? Thanks,
With the OutputFile set to "" so the user can select the directory on where they want to store the exported template. I'm trying to figure out if I could get the file path and the file name and store it on a string so I could use it for something else.
I have a form where I want a textbox [txtMaxOrdLimit] to be visible only if another text box on the same form [PaNumber] contains the letter D in the string. This is the code I have on the forms On Current property but I'm missing something because textbox [txtMaxOrdLimit] doesn't show on the form at all.
If Me.PaNumber = "*D" Then Me.txtMaxOrdLimit.Visible = True Else Me.txtMaxOrdLimit.Visible = False End If
I am new to access and I recently encountered a double click issue
My form loads perfectly on double click event but it shows the first record instead of selected record.
My search is based on a PersonID but each PersonID has different WorkID that I wish to display on double click but it always shows the first WorkID instead of my selected record
I have tried changing the filters in the form properties but it still doesn't work for me.
Here's my code:
Private Sub SearchResults_DblClick(Cancel As Integer) DoCmd.OpenForm "WorkForm", , , "[PersonID]=" & Me.[Searchresults], , acNormal End Sub
[Searchresults] draws information from my Query
Query information:
PersonID... WorkID... Type......Location 1234..........1............Paint .....Address A 1234..........2............Electric...Address B 1234..........3............Floor..... Address C
im not even sure if this is possible.. but if it is it will be just what i need.
basically the job1 form has a search feature added to it..
as users type the passenger name in the form.. a listbox below updates if a match is found..
if you can imagine the situation..
my user will be entering jobs into this form.. they will not know whether or not a passenger has used us before.. the only way they will know is if they see in the listbox the same name.. and pickup/destination/phone no. details as the job they are about to enter
i wondered if it was possible for the user to click on the customer in the listbox.. and drag and drop it into the passenger name textbox..
can this be done.. the attatchment is very simple.. one form.. job1.
if someone can explain to me how to do it.. or perhaps alter the db i have attached i will be most grateful
I would like to append a text item to each value in a calculated field. consider the field name is "Division" and I want to append the word "Division" to the values put out by the field "Division"
My attempt was: Division & " " & "Division". This produced an error in the report.
