Excel - Search Userform That Can't Be Edited?
Apr 5, 2013
I am looking to create a userform that submits data to my spreadsheet.The fields should be Reference Number, Title, forename, surname and DOB.The filling in of the reference number is compulsory, and should display a message box if a reference number has not been input.A button should be present on the spreadsheet that brings the userform up.
The search Userform should look the same as the input userform, except the fields are blanked out and uneditable.
The ability to search by any field is neccesary.
A list should be brought up containing the search results.
The user can then select the entry that they are looking for and then the uneditable userform comes up with the information that has be extracted from the existing entries.y impossible.
View 3 Replies
ADVERTISEMENT
Sep 13, 2013
I have been working on a userform for entering in and editing data in a spreadsheet, but I'm stuck with the code for updating the edited data.
I have two pages on the Userform, one for adding a new entry, and one for editing an existing entry.
On the page for editing an existing entry, I have a combobox that displays information in the text boxes based the selection. What I need to be able to do is click save once I have made changes to the information in the text boxes and then have that information saved in the spreadsheet.
I have figured out all of the other buttons in the userform, but I am struggling with this last one. Here is my spreadsheet with some sample information entered in : ExcelFile.xls
View 9 Replies
View Related
May 5, 2006
I have a cell that I am needing to allow users to edit the data but not the format.
The users edit the data by copying & pasting from their own personal spreadsheet. The source spreadsheet formatting can be varied. Is there a way to allow them to be able to edit the data inserted but not the format?
View 3 Replies
View Related
Sep 9, 2013
When the data was found it says
msgbox "Data was found"
else
msgbox "Dota was not found"
VB:
Private Sub CommandButton1_Click()
Do
DoEvents
row_number = row_number + 1
item_in_review = Sheets("Reservation").Range("A" & row_number)
If item_in_review = TextBox1.Text Then
[Code] .....
Here is my program : [URL] .....
View 4 Replies
View Related
Mar 2, 2013
I work in a small team of 5 people, but each of us is very busy and get emails from our manager asking us to complete different tasks. I have made a userform in excel for our manager to create the tasks in and put all the details in sheet1. This creates each separate task on a separate row. Now I want each of my colleagues to log into the sheet and be able to retrieve a task with the same userform. I am giving each task it's own ID, so I want to be able to search by this and the userform will be populated with the task details. I also have combobox's with the status of each task (Completed, In progress etc.) I want to be able to change these in the userform too.
VB:
Private Sub UserForm_Click()
Private Sub CommandButton1_Click()
Dim LastRow As Object
Set LastRow = Sheet1.Range("b65536").End(xlUp)
[Code].....
View 1 Replies
View Related
Feb 9, 2013
In long worksheets where I have to edit each cell, I would like it if the cell that is being edited is always on top of the screen. That way I wouldn't have to scroll as much.
View 1 Replies
View Related
Apr 8, 2013
I've got a data sheet (called "data") which contain a bunch of data, if someone edits the data manually then a msg boxpopups. which i've done using the code below in the code on that tab. However, I also have vba that places data on the tab that also triggers the popup message.
So how do i make it such that if the vba is run then the popup doesnt appear but if they edit the data manually then it does?
VB:
Sub Worksheet_Change(ByVal Target As Range)
Dim WatchRange As Range
Dim IntersectRange As Range
[Code].....
View 3 Replies
View Related
Oct 25, 2013
Is it possible to find the unsaved data in a spreadhseet/workbook? Or the last cell was edited?
After working on multiple workbooks when I try closing them excel confirms if the changes should be saved or not. I was wondering if there was a way to check what those changes were. If there was a way to find address of the cell that was edited last.
View 3 Replies
View Related
Jun 27, 2006
I have written a code that acts as a directory search engine for peoples names. There is a form called search that is loaded and asks the user which name he or she would like to search for. When the user enters the data, whether the name is spelled right or not, the search finds the first closest match to whatever was entered into the form. I would like to change this in one way. Many times there are people with the same first name but different last name or two very similar first names that might be highlightes instead of the exact name the user is looking for. I would like to ask if anyone knows how to write a code that would insert each of the names that have all or part of the entered name into a forms box to where a final selection could be made to select the exact row of cells that the user wants to see. This is much like the find feature on your PC. You enter what you want to find and it brings up all of the things that include your keywords and you make the final selection. Is this possible or just very complicated? This is the current search code that I have written. It will find the closest match but will not insert it into a form
Sub FindIt()
Dim FDescriptions As Range
Dim Reply As Long
MysName = Search.Textbox1
Set FDescriptions = Columns(4).Find(What:=MysName, Lookat:=xlPart, LookIn:=xlValues)
If FDescriptions Is Nothing Then
Reply = MsgBox("Food Not In Database. Try Again?", vbYesNo)
If Reply = vbYes Then Search.Show
Else
FDescriptions.EntireRow.Activate
End If
End Sub
View 5 Replies
View Related
May 27, 2014
I have a log book that gets modified through out the day, and an auto run macro that runs at specific times to save the data to a database type sheet, and clear the form for the next shift. some of the operators are double clicking in the cell so they can type their comments. If they do not hit tab or enter when they are done, and the save time comes, the macro is not running, and I'm not collecting the data that I need. Is there a way to force the macro to run, or to force a tab/enter after 3 minutes of inactivity?
View 4 Replies
View Related
Sep 26, 2008
My business has a significant number of Excel sheets interlinked. One of them has about 10.000 links to about 60 files. Those 60 files are within a sub-folder and once a quarter the business needs to replace all 60 files with a new set. To establish this, they replace the sub-folder name in the link with the new name. To do this on 10.000 links takes about 72 minutes because Excel seems to open up a file for every updated cell. We tried to stop this by changing Excel to calculate manual, disabled "Update remote reference", but this didn't improve anything.
We have similiar issue when opening/updating the master file - it takes around 3 mins.
Besides that a proper database is certainly better for this requirement, is there anything we can do to improve the performance of the replace method. I was thnking about stopping Excel from validating/updating each single cell and after everything has been replaced to do it in one go without Excel opening and closing 10.000 times a file.
View 4 Replies
View Related
May 9, 2013
I have a userform for data entry. I am able to make codes for Add ( Add entry to database), clear ( Clear userform ) , Cancel (Exit userform). I have some more buttons and functions to be assigned to them but not able to write code .
Need codes for :
1) Have search box which searches Mat id in the complete database and returns value in the search result listbox. When we click on the result in listbox , the userform values are filled with the values that the mat id has . Then if user wishes he can update teh details for that mat id , and click on update button . the data is updated in the database. Or he can delete the entry from database by clicking on delete button.
2) Have arrows which will navigate through database ( need macros for that ) .
USERFORM.xlsm
View 5 Replies
View Related
Mar 27, 2014
I have a standard multi-page excel workbook in Excel 2013. I have built a user form that will allow for user input into my main excel page. This inpu includes many different variables, including one called "Paint". The value of paint can currently be selected from a drop down box that pulls its values from a spreadsheet in the workbook (Paint!A$1,A$50) but here's the issue. I have over 50 possible values for paint and it makes the drop box time searching for the right one kinda hard.
Here's what I want to do: Have a button beside the paint drop-down that says "Search", When the users clicks it it opens a search dialogue of some kind that will return the closest values to their search. When they click the value they want it gets entered as the selected value for the "Paint" drop-down box.
Here's my questions:
-Is this even possible ?I know enough about VBA to know that this is probably difficult in which case id still like to try.
-If it is possible. Are there perhaps any places you could point me to that would have some sort of starting point for me to work from. Remember I got the other part already I just need the search functionality.
View 3 Replies
View Related
Feb 17, 2010
Not sure if I am linking this correctly but here it goes...http://www.excelforum.com/excel-prog...ification.html
This is a previous post link that is now solved but I have a new question based on the code in the post. I would like to know how to add a search and update ability to the user form I have created. I am newb with user forms so I apologize in advance for my lack of knowledge.
And yes I know the way it is set up now it is depositing data in two different locations; this is for a specific purpose.
View 14 Replies
View Related
Jun 24, 2014
I have a simple Excel file composed of three tabs:
-EDIT
-QUEUE
-RESOLVED
On each tab, line 1 has the same headers: Status, Name, Surname, Issue, Details, Last Update
In the EDIT tab, line 2 is dedicated to editing the relevant information under the headers, and once done is validated with a "Done Editing" button: This button would cut line 2, and place it in line 2 of the QUEUE tab, moving down all the others in the list
The QUEUE tab lists all the issues keyed into line 2 of the EDIT tab. An "Edit Selected" button would cut the selected line (or the line in which a cell is selected), and copy it to line 2 of the EDIT tab for further editing, after which it would be placed on top of the queue once again as above.
The RESOLVED tab lists all of the issues marked "Resolved" on the Status column.
What I can't figure out are the macros for the two buttons:
- "Done editing" in EDIT tab adds today's date in the "Last Update" column, then cuts line 2, and pastes it in line 2 of the QUEUE tab pushing down all the lines in the list, and keeping any existing conditional formatting if possible (colours in the "Last Update" column, for ex.). If the status is set to "Resolved" before clicking the button, it does the same, but pastes it to line 2 of the RESOLVED tab instead of QUEUE.
- "Edit selected" in the QUEUE tab just cuts the selected line from the QUEUE tab and pastes it in line 2 of the EDIT tab.
View 2 Replies
View Related
Oct 16, 2009
I am making a workbook where the G column is drop-down menus that are populate a drop down on the H column. Whenever someone changes the selection of the G column I was to erase what is in the corresponding H column. I have this code that works, but I need to do this for 100 lines. Is there any way to put this into a loop instead of writing 100 if statements?
View 6 Replies
View Related
May 6, 2014
I have developed a functional User Form that works like a charm. The form will Add New Records to my database and Get Next and Get Previous records. This all works like a charm. I am stuck on how to search by Last Name or Employee Number and then to Update the Existing Record. If I change anything in an existing record as the VBA is written today, my only choice is to add a new record to the end of the database. I have added Command Buttons, but I'm lost as to how to write the code. Here's what I have so far:
VB:
Dim currentrow As Long
Private Sub cmdGetNext_Click()
Range("A2").Select
ActiveCell.End(xlDown).Select
lastrow = ActiveCell.Row
[Code]...
View 6 Replies
View Related
Mar 11, 2012
I am trying to get my userform to search a worksheet for data.
In "A" I have a vehicle name (Audi, BMW etc) these names occur more than once
In "B" I have the vehicle model.
i.e:
A B
Audi A3
Audi A4
Audi A6
BMW X5
BMW M3
I would like to be able to have a command button on my userform (preferable one for each vehicle type) that the user can click on to then add the list of relevant vehicle models into a combo box.
i.e Click on the Audi command button and the combo box displays all the models in "B" that have Audi in "A"
View 9 Replies
View Related
May 21, 2012
I have a userform where I key in something into a textbox, click search and then the results will be returned into the textbox or into a listview if there are more than one instances.
Now, when I type in "Box1-A( )", the only result that will be returned is "Box1-A( )" if it is present in my spreadsheet. Is there a way I can make the userform return results as long as the keywords are there? In this case, the keywords would be "Box1-A" (without the ( ) at the back).
Here is the code I'm using
Code:
Private Sub cmbFind_Click()
Dim LR As Long
Dim strFind As String 'what to find
[Code]...
Was working on this code on another excel forum but I forgot my password and I can't retrieve it at the moment.
View 8 Replies
View Related
Oct 17, 2012
I've put together a workbook that has 2 sheets that contain stock details and location info (i.e. part number, description, Location & stock level). I need to have a search function outside of the 'built-in' Ctrl+F (or Edit > Find) search function, i'd assume this would mean using VBA?I invisiage making a userform embedded within the very first sheet of the workbook and having this form be opened when accessing the worbook - maybe hide the other two sheets containing the data? Within the search userform, i would have a 'part number' & 'description' search input boxes for data input, either one could be blank but atleast ONE must be inputfor the search to work. On pressing the 'Search now' command button in the userform, any reults found would be displayed in a listbox at the bottom of the said userform. If no results found, a dialog box would pop-up saying 'No Items Matched"
View 7 Replies
View Related
Mar 18, 2013
I created a userform for a giant spreadsheet with tons of data in it. There are three criteria. I created two command buttons - one that's "search" and one that's "close." The close works fine, but I don't know enough to program the "search" command. I'd like it to pull all data that matches the three criteria - rows H, D and M. So, if you answer all three, the macro will pull the rows of data that matches and paste it into another workbook (that opens in another window).
I'm not sure userforms are typically used for this sort of thing...
View 9 Replies
View Related
Jun 12, 2013
I'm coming along nicely with my user form. My last issue was trying to get it to search/recall data from the "Data" tab. This works perfectly when only 1 record is found, and if multiple line items are found, a message box pops up and tells me how many records are found that meet the criteria. However, I am now struggling to get the code to work properly to past the details of those records into the list box, so that the user can select which record they want to edit.
I get a Run-Time Error '1004' Application-Defined or Object-Defined error and it points to the section in red:
Code:
Sub FindAll()
Dim strFind As String 'what to find
Dim rFilter As Range 'range to search
Set rFilter = Worksheets("Data").Range("E3", Range("h65536").End(xlUp))
Set Rng = Worksheets("Data").Range("E3", Range("e65536").End(xlUp))
strFind = Me.cbosearch.Value
[Code] ...........
View 2 Replies
View Related
Jul 3, 2006
I am very new to Excel/VBA. I have created a "Customer Complaint System" in excel and have designed a user form for users to enter new complaints.
My next step is to design a Search or Look up form for viewing the complaints where users can choose to look up complaints by either Complaint No or Customer or Month.
The worksheet that stored my data is called "ComplaintData" which is hidden. In the sheet "COmplaintData" I have following 10 Columns:
Column A - Complaint No
Column B - Date
Column C - Customer
Column D - Contact Person
Column E - Product
Column F - Batch
Column G - Category (This relates to Complaint Category)
Column H - Description
Column I - Account Manager
Column J - Month (This just takes value from B and converts to month, so hopefully I can sort by month if required..)
I did see a few examples of look up forms but am struggling to customise them to suit me.
Ideally I need a combobox & textbox in serach field. So user can choose the "Search by" category using combobox e.g. Complaint No, Customer or Month and then enter the relevent text in the textbox to carryout the search.
and then use labels & listbox to display the related fields on the form. The reason I prefer labels is that I do not want users to edit the info. and listbox to show multiple results out of which user can choose specific one....e.g. when user does a search by Customer, I want listbox to show the various products that customer has logged complaints for.
View 9 Replies
View Related
Mar 22, 2007
I currently have a search and insert data userform which finds specific data from the textbox and displays the results in a listbox. Then I can select a specific result in the listbox and insert this data into a selected worksheet row. The problem is that the userforms code is out-of- date, i have changed to workbook to a point that the userform doesn't work properly. What i need is a new userform that can do the same thing but with the code simpler to change in case of new updates. Here is some information what is needed:
The data that userform gets information from is on a different Workbook called Database.xls, Worksheet called Data and the Range is A:E. The Data is Product Information which is in the Columns A to E:
A = Product Number (The format is 000-000-00)
B = Product Name (No format is Text)
C = BA (The Format is 00)
D = Price (The Format is £0.00)
E = PQTY (The Format is General)
The Textbox needs to be able to search two different Columns A and B and also their representing formats. For example able to search for the product name or number which formats are 000-000-00 or 00000000. The Listbox needs to show the Datas formats like 000-000-00 and £ 0.00. The Insert button needs to insert a selected row from the lisbox results and insert the Product Number from that row into a selected worksheet row cell which is in Column J. This is the existing code and example.xls if you want some more information on what i need:
Private Sub cmdInsert_Click()
Dim X As Long, ws As Worksheet, i As Long, ii As Integer
Set ws = ActiveSheet
ws.Unprotect ("seasons")
With ActiveSheet
X = ActiveCell.Row
End With
With Me.ListBox1
For i = 0 To .ListCount
If .Selected(i) Then
ws.Cells(X, 10) = .List(i, 0).............
View 2 Replies
View Related
Sep 20, 2007
I am trying to populate a UserForm with data from a spreadsheet using a search function instead of just providing a Next and Previous search function (which works). The following code is able to search for and select the correct row on which the data resides.
Private Sub cmdBlankFind_Click()
Dim FindMe As Variant, FindCell As Range, FindCell2 As Variant, Data As Variant
With Range("BLANK")
FindMe = InputBox(Prompt:="Please enter search criteria:")
Set FindCell = .Cells.Find(What:=FindMe, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False)
FindCell.EntireRow.Select
Data = FindCell.Value
tbxBlankAccount.Value = Data(1, 1)
End With
End Sub
View 9 Replies
View Related
Oct 29, 2007
how do I restrict editing to certain columns/Rows and allow some to be edited by users?
View 2 Replies
View Related
Jun 4, 2014
Once an individual selects "NO" in column "O" I would like the rest of the columns to be grayed out so the no other information can be entered except for the last column for notation purposes.
View 3 Replies
View Related
Aug 7, 2008
I have columns in my spreadsheet that will be getting updated periodically with a number. 1 week it might be 24, the next it might be 26.... and they would go in January's price, February's price....
The problem is, if a price is entered into the column, we don't know when it was entered other than the fact that it was entered in that month.
Is there a way to show the date and time of when a number gets entered or edited in a cell? This date/time could perhaps show up in a column right next to it.
View 10 Replies
View Related
Jan 10, 2014
Basically I've got a back end worksheet with a huge table full of data (hundreds of rows, tens of columns) containing the data for a load of different contracts (each contract is on a different row).
I have all the information I want displayed on a front sheet by means of very simple lookups which looks for one contract at a time to display that information. What I would like to do is to be able to alter that information on the front sheet which will then go back and lookup that entry in the big table and overwrite the old data with the new. Effectively I want the excel sheet to act as a user form, but without actually using a form (a requirement from the people I'm doing this for). I'm struggling to find out how to do this as I don't know which VB functions I would need to use.
Each contract has its own unique reference number, so really what I need is some sort of code that will look for that reference number in the back end table, then look for any differences between what's on the front sheet and on the back end, and then replace anything that's changed.
View 4 Replies
View Related
Feb 24, 2014
My difficulty: I have an Excel 2007 DB xlsx Workbook file (mydb.xlsx) made up of several (8) Worksheets. I can't modify the content of this DB. For this reason I 've created another Workbook (MyGUI.xlsm) implementing a user interface for db querying.
The userform let the user making searches using the find method (criteria: "Text contains...") In the DB file there is one particular Sheet with thousands of entries. This makes the searchs too long (30 seconds). During this period the entire form is blocked.
My question: when the user realizes the search is too long I'd like to stop the current search
introducing for example a new button "stop current Search" to click it in these situations.
View 4 Replies
View Related
