I've created a form. Within that form I have an image control. I am using this code to pull the corresponding plant image from a folder filled with JPGs.
It works just fine except one thing. When I change from record to record my cursor jumps to the center of the pulled JPG. I don't want my cursor to move at all when loading these images. Is this possible? Thanks.
Private Sub Form_Current()
Dim FileExistsbol As Boolean
Dim stFileName As String
Issue with Cursor moving on multi Subforms in a form.
I have 2 sub-forms in a main form as per screenshot. So Cursor moving from main form to 1st subform working well. After can't move the cursor from 1st subform to 2nd subform with tabbing or entering. Still there in 1st Subform in the last entered filed after tabbing or entering. I've checked on tab orders also they shown correct but it is can't move to 2nd subform.
First I am no good with code so I need your help! I have code that tells the cursor to move to a certain field.
Private Sub Form_Current() ClaimNumber.SetFocus End Sub
It works for the most part - our problem with this is if we have the form open and we are searching on a different field say "Last name" when we click find next it finds the first one but if we click find next again it tells us that there is no records. This is because the cursor has moved to the ClaimNumber field.
Is there a way I can modify this code to say move the cursor only on a new record.
Is there an automatic way of moving the cursor when an outlook email is opened using a VBA event??
Right had a look and haven't managed to google this yet but the background is as follows
I have some code that puts a recordset of people's email into outlook and leaves users with the outlook message open ready for them to append anything they want to the message body.
At the moment the cursor flashes at the very start of the message and users need to scroll down with keys or the mouse to the end before they can add additional text.
I want to automatically move the cursor to the end of the outlook email message opened using a VBA event?
Wonder if you guys can help, I have searched the forums, but can't find an exact match to my query...
... i want my users to see a coloured image on their form to alert them to the status of a record in the database.
I have 3 very small bitmap images (named red, amber and green and stored directly next to my database ). I want to allow users to change which image should display on any given record by choosing either from a combo-box or radio buttons located next to the 'image space' on the same form. This image change will then save when the database is closed and remain until it is changed to another staus by a subsequent user at a later date.
Any ideas greatly appreciated (I'm currently at [I]'dimwit' level with coding)
My Db has 1 table with 4 columns named ID, First_name, Last_name and Photo.
ID is a counter and primary key. First+last names are text fields. Photo is an Ole object.
I display everything in a form that is controlled by a combo box. The combo box displays the first name and when I chage the first name with this box the last name changes too. I use this code together with the event "after update"
Code:Private Sub Combo_First_name_AfterUpdate()Me.txt_last_name.Value = Me.Combo_first_name.Column(2)
Everything works perfectly fine (txt_last_name changes according to the first name in the combo box), except that the photo of the person doesn't change. Nothing happens to the photo when changing value in the combo box or it just displays a message box with an error messages when I have tried to get it to work.
I want the ole object picture to change too, when changing the first name in the combo box.
I have been looking some information on changing image based on form combo box selection on form.
I manage to do case by case but i need it in a simple code because their will be many employees just to avoid adding case by case code for each one.
Private Sub Emp_IDCombo_AfterUpdate() Select Case Emp_IDCombo.Value Case "AM-001" Imageholder.Picture = "C:UsersAMGDesktopam-001.jpg" Case "AM-002" Imageholder.Picture = "C:UsersAMGOne DocumentsHR & Admin DatabaseEmployee Picturesam-002.jpg" End Select
I have employees table where all images location is saved in text field and i have a combo box on form which is employee id.
Tables relationship Employees_table [PK] to Contracts_table [FK] via field name {emp_ID}
Fields Name Combo Box name on form Emp_IDCombo and row source is SELECT Employees_table.Emp_ID, Employees_table.EmployeeName, Employees_table.Emp_Pics FROM Employees_table;
Text field is located in employees_table called [Emp_Pic] for images location.
I made an On Change Procedure on a textbox, so everytime I input a character, it will trigger the Me.Requery.
However, after that the event, the mouse cursor moved to the beginning of other field. I want it to stay at the end of the textbox so I can enter a full word, how do I do that?
Code:
Private Sub Text73_Change() ProjectSearch = Me.Text73 Me.Filter = "[Project Name] Like " & Chr(34) & ProjectSearch & "*" & Chr(34) Me.FilterOn=True Me.Requery End Sub
Hello, I HAVE searched the forums for many days but I could not find a solution. Maybe I'm not sure what to look for...
The MAINFORM_1(single form view) is based on a Query and has a cbo named 'cbo_client'. This cbo is for a field named [client_id]. The AfterUpdate [event] of 'cbo_client' does a requery on a field in the the following SubForm:
In the SUBFORM_1(datasheet) (based on another Query) is another cbo named 'cbo_subclient', with a select statement of 'Select (all the needed fields) FROM tbl_subclient WHERE ((([tbl_subclient].[subclient_id])=[Forms]![mainform_1]![cbo_client])).
Everything (incl. the REQUERY) works fine, and all the tables gets updated with the records the way it should. No problems.
But this is where i get stuck...: Once the user has entered data in the SUBFORM_1 datasheet, and then >changes the 'cbo_client'< on the MAINFORM_1, it requery the subform like it should, BUT the previously entered data in the subform is already written to the table!
So, I need a way to prevent the data in the subform from beiing stored if the user changes the cbo on the mainform (for a second time). OR prevent the cbo on the mainform from beiing changed after the subform is completed.
I hope you understand what I'm trying to do...
Please, just a point in the right direction and i'll battle it out from there.
I am new to Microsoft access. I have a database moved from another computer. it is split into the backend and the front end..
However, when i click on the forms in the front end, I get an error message. It is trying to use a path from the old computer, to the database, but its on a different computer.
So, this brings me to my question, how do i change the path, to the new location
1. The target of this code is to set the [Section] value in the table 2. The [Section] value is at the 3rd column inside the csv file 3. By using the UPDATE query, it map the [Section] value to the corresponding [Program] and [Course] in the table
This code did the job. But the problem is the string of the [Section] value is like "2-22-01". But after update to the table, the value become "2/22/2001".
The value is a string text, not date. How can I prevent this happen ?
I just attached 2 files, 1 mdb and 1 txt (change the extension to csv before test).
Private Sub cboOrderLocation_AfterUpdate() If Me!cboOrderLocation = "Paradigm" Then Me!txtOrderLocation = "PA" Me!txtExpressAddress = "Paradigm Address" Me!imgSelect = "LogoSmall.jpg" ElseIf Me!cboOrderLocation = "Unassigned" Then Me!txtOrderLocation = "NA" Me!txtExpressAddress = "Not Assigned" ElseIf Me!cboOrderLocation = "Express" Then Me!txtOrderLocation = "EX" Me!txtExpressAddress = "Slover Address" Me!imgSelect = "LogoSmallParadigm.jpg" End If End Sub
The Me!txtOrderLocation and Me!txtExpressAddress both work great! I want to have it change the logo / image the same way. Is this possible? If so can someone tell me or show me how? I created an image on the form with the name imgSelect but when I compile it of course is giving me an error.
I'm in desperate need of help and want to know if it is possible to load an image on a form once a hyper link is created.
For example, I have a form with a hyper link to an image created, currently, when you click on the hyperlink, it opens the picture in the browser, can you change it so that it loads teh image embedded into the form instead of loading it into a browser?
...but I'v got a picture and I want to put a red box behind it so the picture looks like it has red borders, the problem is that the box always appears above the picture, I'm sure there must be a way to prioritize them or something but I can't find it!
Hello. I've searched and read a few threads concerning image controls on forms and haven't been able to find a solution to my problem (yet). Anyway, I have a form with two image controls (imgOK1 & imgOK2). The previous and current setting of the "Picture" property for both images is set to "C:MOMGraphicsfilename.bmp". The location of my images has changed and will change for each user which is "C:Documents and Settingsuser.nameMOMGraphicsfilename.bmp". I'm using the following code to set the .Picture property on form load:
Dim ImgPath ImgPath = "C:Documents and Settings" & Environ("username") & "My DocumentsMOMGraphics" Me.imgOK1.Picture = ImgPath & "imgButton-OK1_25%.bmp" Me.imgOK2.Picture = ImgPath & "imgButton-OK2_25%.bmp"
When the form is opened, an error stating that the image located at "C:MOMGraphicsfilename.bmp" cannot be found; once for each image control. Then the form loads and .Picture properties appear to be set correctly as they are displayed fine. I've tried to clear the .Picture properties for both image controls using the properties editor but the original path returns as soon as the property loses focus. Is there a way to programatically set this property and make it stick so the errors are not displayed?
I have images in my form, say, Image1 and Image2 . The default background color for all of them are white. If the user click image1, the background color has to be red. If the user click image2, the background has to change to red and the image1 retains its default color ( White ).
I have six images to loop through these. Image1 to image6.
I'm trying to ensure that each time a new record is opened in a form, that the cursor is positioned in the first control/field... I have this throughout most of my application but not in a few individual forms.
I know I've done something in the past to ensure that this happens, but I can't remember what it was...
I have a client using an access DB that I have built. It was built using Access 2000 and he is running it on Access 2003. The problem is that when he opens one of the forms which is tabbed and he moves to the second page when he moves the mouse pointer over some hyperlink buttons the background colour ,which is normally blue flashes to yellow. Every other user working with 2000 does not have this problem. I cannot find the reason. Can anyone help please?
I have checked the tab order and have cycle for my form set to = all records (but have also tried current record). After I update one of any of my textboxes in the details section and then click or tab into the next box, the cursor jumps back to the first record, first field.
On main form cursor working is goods as per default. But after come to in Subform its shown the cursor position in the last filed. So every new record is shown as the same last field. How to do this cursor position will be change in subform as per default?? and every new record its need to show as per default TabIndex "0".
I have checked my Tab Index & Order Settings also it is good. But its shown as last filed in subform
I have a form that I would like to update a picture on using VBA. The source of the picture path is in part a query that is not bound to the form. So far I have the following code that is pretty much working, but with a couple flaws.
Code: Private Sub Form_Current() LoadDefaultPicture End Sub Sub LoadDefaultPicture() Dim db As DAO.Database
[Code] ....
This is working. However, when I change the record the picture flashes the current picture once and then loads the new picture. It is like it reloads the current picture then loads the new one. I'm hoping there is a way to get rid of the flash.
Also, the code fails here: strDefaultPictureName = rs.Fields("AttachmentName")
When the query does not return a record. I can definitely fix this by adding an if statement to check for a record, but I'm kind of perplexed at why it is failing at that line. I would expect it to assign an empty string to that variable name and then fail on the next command where I try and set the ".Picture" property of the image.
I have a split form that's like a list of pending tasks. The data source is a linked SharePoint 2013 list where users submit requests. The user takes the information from each record and performs an action. When it is done, the user presses a button and the task status changes from "Pending" to "Processed". The form record source is based on a query that finds only records with a status of "Pending" so when the user changes the status of the task, it is removed from the list. It works fine except when there is only one task left in the work list. If the user processes the last task, the form refreshes and it goes to a new empty record and I get an error message that says I must enter a value into one of the required fields. I tried making the field non-required but it just creates an empty record in the table.
Hi all , Can anyone tell me about how to embedd image in image control using imagelist. I added the 5 images in imagelist at design time and added the following code. image.picture=imagelist.listimages(1).picture but iam getting error.error no :2110,cannot open the file . thank u, Siva
I need to prevent a form from opening if no data (no picture) is found in an image control on the form that needs to be opened. The form is opened in this manner:
DoCmd OpenForm StDocName,,,stLinkCriteria
Certain records will not have a picture so the form doesn't need to be opended.
