Excel VBA Userform to Search and Update Data - Excel VBA Userform Example

[@aprhaaroeira3787]

I really like this example!... Congratulations. i'm 68years men and i start now to understand something .Thanks

[@ROVideos]

This is the best video I've found on the subject. Short, easy to follow. You are great.

[@javedahmed8343]

Beautifully explained. Left no place to say anything negative.

[@franciswood6104]

the best! easy to follow and understand because not only you make the code but also you explain what is the action following the code! more vids Dude!

[@joelabacherli1310]

Perfect video. These are the ones that make these concepts sink in and stick. Thank you very much for the informative walkthrough

[@javedahmed8343]

Very subtle explanation. Very useful. Screen shot itself is very informative

[@ExcelDestination]

thanks

[@tomkochka2058]

This was so easy to follow and just what I needed for a user form I was designing at work. Thank you!

[@ExcelDestination]

welcome

[@pureauraspace3313]

You have done so well with your explanation. It was quick and simple to go along

[@ExcelDestination]

Glad you liked it

[@greatlakeschorus6887]

This Form works works better than the previous form that you sent me. I will Email you with a question or two. Thanks very much for your help!

[@janiceshen3834]

Good to have your lecture, it's so clear ........

[@ExcelDestination]

Thanks

[@igoravsharma]

HELLO SIR I HAVE A QUERY ABOUT SERCH AND DISPLAY OPTION MY QUSESTION IS THIS I CAN SERCH ONLY BY PRODUCT ID ?? I CAN'T SERCH BY PRODUCT NAME ? QUANTITY ? CITY ?? PLZ REPLY

[@ExcelDestination]

Pls check another tutorial for user form to search and display. Link in given below : kzbin.info/www/bejne/eGWTXqmco7uUncU

[@competitiononly4431]

I pray for you successful in every wrok

[@ExcelDestination]

Thank You!

[@georgekhaba6436]

time table : @4:42 creating the form @10:41 the code to find data @16:34 to update data

[@competitiononly4431]

Teaching method is very good

[@ExcelDestination]

Thanks and welcome

[@ebusdk]

Thanks a million sir! Used this form as a stock-lookup/update for inventory

[@excitingoffers6730]

this is the thing i was looking for... thank you very much sir for this upload.

[@rezarohoman6201]

nice one week for me to get working thank u

[@yinyinmay871]

Thank you very much, it's very useful.

[@ExcelDestination]

Welcome

[@1cola828]

Hi, thank you so much. Is it possible to also do a search on another column such as City for exemple?

[@sunitapatil4677]

Such a helping videos thank you very much Sir

[@sandeepdhruv3826]

Great, I was exactly looking for it, thanks bro great work 🙏

[@ExcelDestination]

Welcome 👍

[@maheshkarwande6681]

Thank you very much @excel destination, I was also looking for same

[@mariamxxxx]

I just followed your instructions, but it doesn't really work, when I press on "debud", i see that it highlights the lastrow=Worksheets("Sheet1")...line and it says "Lastrow=Empty", what am I doing wrong?

[@bchotai4914]

I have same issue. Did you manage to resolve this?

[@johng5295]

Thanks in a million. Great content. Awesome imagination. Grade: A++💥

[@ExcelDestination]

welcome

[@royokinawa]

Great information. Followed the steps and everything is working perfectly. Thank you. Do you have a VBA tutorial that uses the same concept but allows the user form to update multiple rows? Example: The search parameter of Completed will display a select number (10-15) work orders. Once populated a date will be added to update those orders.

[@alexcalangi1362]

^ this information would exponentially help my workflow as well!

[@saadfarrukh3687]

Gvď

[@dieucao1742]

Thanks for this video! However, if I have a lot of columns and rows, are there any ways I can do that in a shorter way or I have to do it one line by one line?

[@أبوعمادالخفاجي-ه8ه]

ه ه ه ه ه ه ه ن ه ه ه ه ه ه ه ه ه ه ه هه ه ه هه هه ه ه هه ه ه ه ه ه ه ه ه ه ه ه ه ه ه هه ه هه ه ه ه هه ه ه ه ه ه ه ه ه ه ه ه ه هه ه ه ه ه ه ه هه ه ه ه ه ه ه ه ه هه ه ه ه ه ه هه ه ه ه ه هه ه ه هه ه ه ه ه هه هه ه ه ه ههه هه ه ه ه هه هه ه ه ه ه ه ه هه ه ه ه ه هه هههه ه ه ه ه هههه هه ه ه ه ه هه ه ههه ه هههههههه هه ه ههههههه ه ههههه ه ههههههه هههههههههههه هههههه هههههههههههههههههه هههههههههههههههههههه ننهنننننننننهننننننننننننننننننننننننننننننهننننننننننهننننننننهننننننننننننننننننننهنننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننهننننننننننننننننننننننننننننهننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننهنننننننننننننننننننننننننننننننهننننهننننننننننننننننننننننننننننننننننننننننننننننننننهننننهننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننهننننننننننننننننننننننننننننننننننننننننننننهنننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننننتبتلل

[@JMallesham]

Sir this is very useful information. Tqs Sir.

[@ExcelDestination]

Welcome

[@Stockmarket_the_trader]

Thanks for uploading... Please upload the one video on understanding of vba code...

[@ExcelDestination]

Will upload soon

[@binibrahim590]

U r amazing my friend 😘😘😘

[@ExcelDestination]

Thanks 😊

[@icevillegas9522]

Hi, Can you give examples on searching two rows. I need to search product Id and product name

[@dangminhkhangdanorgan3000]

Thank you! code very helpful for me in office.

[@ExcelDestination]

Great to hear!

[@bchotai4914]

Thank you - not sure why I am getting Complie error: Variable not defined error on Lastrow = Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUp).Row Private Sub CommandButton1_Click() Dim product_id As String product_id = Trim(TextBox1.Text) Lastrow = Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUp).Row For i = 2 To Lastrow If Worksheets(Sheet1).Cells(i, 1) = product_id Then TextBox2.Text = Worksheets(Sheet1).Cells(i, 2).Value TextBox3.Text = Worksheets(Sheet1).Cells(i, 3).Value TextBox4.Text = Worksheets(Sheet1).Cells(i, 4).Value End If Next End Sub

[@giefanytubo3951]

Hi can you help me to create template for data search in multiple worksheets

[@ExcelDestination]

You can take help from following tutorial for searching value on multiple worksheets. kzbin.info/www/bejne/gKrPpGWQia6ki9E

[@prbhat6469]

Sir Thank You So much. But I have One Problem. For Text Box 1 Code I think this is Search Button. I want For this button msg box if data ot found. can you help me please

[@erwinvanlooy]

How do you make this work with tables?

[@johnpaulbadajos633]

Amazing, Thanks very informative. How about incorporating message for records not found within the sheets? thanks

[@MrBijaypatni]

Great Great information. Thanks very useful

[@ExcelDestination]

Glad it was helpful!

[@Jerroldac1]

I have a Userform with 11 textboxes that I want to use to update the worksheet...I used your code however I can only get the second textbox to work...when I put data in the other textboxes when I click the update command button the data in the textboxes disappear...what do you think I'm doing wrong?

[@ExcelDestination]

without looking at code, I can not say anything. However, I am hoping that there would be some correction required in naming of text boxes..

[@kushalmukhoti]

Great Video. Very simple and easy to understand. Is there any way that I can edit the search criteria itself? Suppose, I want to rectify a wrong customer ID. Is there any way to do this without deleting the whole entry and reentering the same after correction?

[@davecks3042]

Thank you . I find the forms are filled for text boxes and command boxes . But how about when we have option buttons? I couldn’t get the button tick . Your brilliance is again I seek

[@ExcelDestination]

you can check the tutorial, given at below link to learn, list box, option box and other active x controls : kzbin.info/www/bejne/fJ-tZqZ7ZdKSnsk

[@padmanathaprabuchandran254]

its really wonderful...thank you so much....

[@ExcelDestination]

welcome

[@alexsanchez9737]

Is there a way to have a message box show up if you try to enter a product ID that is not already in your table? For example If I look for Product ID 2004 but does not exist in your table. I would like a message box to pop up.

[@querrythis]

Nice and simple.

[@ExcelDestination]

Thanks

[@neeldeshmukh5042]

Then can we add New data inside the Excel sheet or we need to manually ad the data

[@ExcelDestination]

You can check following userform tutorial for ADD, Delete, Display..... Link is : kzbin.info/www/bejne/eGWTXqmco7uUncU

[@fwmfwm]

This example is good to me. However, could you tell me how to add "Delete" record code on that example ? If possible, it would be great if you could send me the excel file . Thanks !

[@ExcelDestination]

you can watch my another tutorial of userform to learn Search, Add, Delete record. Link is given below : kzbin.info/www/bejne/eGWTXqmco7uUncU

[@kendallperkins9843]

I get an error on the update command. It says “compile error variable not defined”. The debug highlight the “lastrow =“

[@EurysSantos]

it happens the same to me. I defined the variable as integer but it didn't work... it would be nice, if you could give us a hand with this bug

[@dilpreetsinghsethi8928]

Hi How we have to change the code if we have different sheets and we want to update a field on same userform. For eg, if we have same product id for two different cities, which we can put as sheet name. Then we can change product name for specific city into their sheet by this userform.

[@hengyi6053]

hey bro can you explain why is there error for the last row for mine

[@ExcelDestination]

pls share your code at [e-mail]

[@madmidgy12]

works like a dream! thanking you excel destination.....can this be adjusted to run through several sheets in a workbook?

[@ExcelDestination]

Yes, absolutely (with some additional code)

[@madmidgy12]

@@ExcelDestination thanks for quick reply....do you have any tutorials on how to run it across several sheets/tabs in a workbook ? I am trying to add a button that will pull data together in one place? any help appreciated....:)

[@shellykomar]

HI, Great Tutorial, I have to search the values according the reference value. which is in 6th column. how to code that?

[@kerryclifford3080]

Nice and simple, thanks. How does the code work without declaring Lastrow and i as datatypes?

[@alvingapay2592]

Great video Excel Destination. can you please add a code or teach us how to put a message if the PRODUCT CODE is not listed when we click the search and also message for "record has been updated" when record has been updated. thanks and more video please.

[@NewYears1978]

This is almost perfect. It would be much better if you could search for containing strings so like Searching for product name and searching for a string would bring up results and then a next button would allow you to scroll through the results - instead of just giving one result.

[@limitone9564]

Can you add code if you type the product name and then search and all the other fields ...

[@sameerpendharkar8600]

How to search for the data in 19th column in excel. My sheet has a data stored from 19th column. I tried using your code but it is not searching . give me blank output.

[@kimnguyen-gr9ge]

Hi can you add a code if product I’d not found in the search

[@DeepuMathewgoldeneye]

If the product I'd meets more than one row in worksheet how will you update. If we only want to update few rows that meets the if statement how will we go to next row which is having the same product Id

[@fairosabdulmutalip641]

How to highlight the updated cells with different colors.

[@ExcelDestination]

use code for color

[@veefronda2747]

What if in my table the product ID is not unique, can I still search and select the correct product name that i want to be displayed in the form? The product ID in my data can have two or more different product name.

[@AayKay2023]

Hello Boss, yesterday I prepared a excel sheet according to the video, but today when I opened this macro-enabled excel list, It is not showing the VBA coding/design in this. Kindly reply how it will showing.....

[@ExcelDestination]

You need to save your excel file in "Macro Enabled" format. So that you can always view\use your developed Code.

[@lanki2610]

Hello, for me, i get a mistake, because "i" is not defined... did you do that somewhere else?

[@umsophorn5654]

I met the same problem as yours.

[@Damodar.Shetty]

Awesome Sir 👌

[@ExcelDestination]

Thanks ✌️

[@jjarias655]

i got stuck in the Userform , it looks like its not available in MAC. I need this thing that you're doing so i can put in our inventory and work it seamlessly.

[@rossaronson1163]

Would it make a difference if the item I’m searching for is a combobox instead of a text box?

[@kingkind2002]

how can solve it the duplicate item for example : i have 2 same items with different date & i want do update for 2nd date

[@kingkind2002]

Any update

[@jesusmyhope554]

Dear daood sir, I have make user form with add, search, next and previous button. I also create Update button but whenever i click update button it changes whole entries to same data whatever i updated it shows in all rows in all entries. I am stuck with this. kinldly help . Can you share your mail so i can share my excel to you

[@ExcelDestination]

[e-mail]

[@soethein9525]

Can I know different between the "product_id = Trim(TextBox1.Text)" instead of "product_id = TextBox1.Text " without Trim fnction?

[@grayjappe562]

Hi, when building a user form, how do I set via search and update data so it searches and changes records vertically instead of horizontal rows?

[@dbags317]

My search button works fine if i entered the data that is inthe first row, but none after that. If it makes a difference, the criteria im searching is in date format

[@ExcelDestination]

you can declare variable as variant for date.

[@dbags317]

Excel Destination awesome. It worked!

[@DetroiterDave]

I have been looking for a streamlined way to do this and your method works great! Thank you so much. One issue though: What if the user searches for a value that does not exist in the data? There needs to be a MsgBox indicating the value was not found. When I run the code with data not found, it just stalls and does nothing and the userform stays open.

[@احمدمطاوع-ب2ذ]

منننىت🛀🏾🛀🏾👨‍👩‍👦👨‍👨‍👦🏇🏇🏇🏇🏇

[@ISK.786]

Hey great Video bro it made my work so easy, but i need help, instead of extracting data after typing it in box and search, will u pls show how to exract data frm dropdown list in the same user form with add buttion option??

[@alby27able]

I had some matters with my USER FORM and thank to you I have solved it. THANK YOU! Please if you can post a video about how to insert FILTERS controlled by Combo box inside a USERFORM.

[@ExcelDestination]

ok let me try to create tutorial as you mentioned

[@abduljamaal513]

What If I need to build sheet2 by a form using sheet1 datas....

[@eldaramaj2460]

that code helped me a lot

[@chamnanprum4068]

how to show 2 rows dear?

[@abdulkadri4070]

it is showing error in lastrow = Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUp).Row

[@ExcelDestination]

check sheet name

[@abdulkadri4070]

@@ExcelDestination Worked many thanks for Helping!!

[@fatefury]

i check my sheet name, correct one, but it still showing the error

[@fatefury]

Private Sub searchBTN_Click() Dim wks As Worksheet Set wks = Sheet1 Dim product_id As String product_id = Trim(TextBox1.Text) lastrow = wks.Cells(Rows.Count, 1).End(xlUp).Row For i = 2 To lastrow If wks.Cells(i, 1).Value = product_id Then TextBox2.Text = wks.Cells(i, 2).Value TextBox3.Text = wks.Cells(i, 3) TextBox4.Text = wks.Cells(i, 4) TextBox5.Text = wks.Cells(i, 5) TextBox6.Text = wks.Cells(i, 6) TextBox7.Text = wks.Cells(i, 7) End If Next End Sub

[@Philip-dy3ww]

What if product id is not unique?

[@ExcelDestination]

then you can use any other column, with unique values. or you can make customized column by adding id and one more column.

[@Philip-dy3ww]

Excel Destination thank you for your reply!

[@brendanheslop5070]

Lovely. Just the Job! Thanks

[@ExcelDestination]

Glad you like it!

[@farranaziah17]

it is really good to me but when i save it lost all of sudden why

[@safesanju]

I have 5 row first Colum have same 5 name “sanjay, second column have same 5, date 27-07-2020 and third column have 5 value ,100,200,300,400,500 …I want to merge duplicate name and sume of 5 value in and merge same date….i want whole data in one row….please help me …excel VBA code for it.

[@ExcelDestination]

for any excel vba support, write to [e-mail]

[@sureshpanur561]

Hi Bro.. Good but if product id not found , it has to show some message and also deleting options . should have been better. I know this is basic but these are all mandatory.

[@neilsonsalazar6882]

mine is not running can you help me

[@JATINKUMAR-qu4vi]

Thank u very much

[@global7280]

How to add a new record sir?

[@ExcelDestination]

you can watch another tutorial to learn add and delete data through UserForm. Link is : kzbin.info/www/bejne/eGWTXqmco7uUncU

[@iqbalchowdhury7130]

Thanks much. I tried many tutorials but yours is the easiest. Keep up the good work.

[@everythingandanything4102]

Does not like it if Option Explicit is on

[@basheerpt4089]

Usfull video... How can deduct QTY From stock.

[@ExcelDestination]

for any excel vba task, you can reach out to me at [e-mail]

[@pltsm3970]

Lastrow = Worksheets("Sheet1").Cells(Rwo.Count, 1).End(xlUp).Rwo Here gives me error the Lastrow value Lastrow = 0

[@ExcelDestination]

you have written incorrect spelling of row........ code should be : Lastrow=Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUP).row

[@umeshshikalgar6759]

Very Good

[@ExcelDestination]

Thanks

[@dannycreations9581]

can you put the vba code

[@SanjayMahato76435]

Display list of items like sales of same products in a day month

[@dinkarshinde3728]

Very Nice, Thanks for the Same. Please give me code for Multiple criteria Search through UserForm

[@MohAboAbdo]

Thank you so mutch.

[@ExcelDestination]

You're welcome!

[@misipatimulipola5700]

thank you, exactly what I was looking for. can you add a code on how to clear the form to search for a new record please?

[@v3x14g6]

This is what i have in my form you may have to change things around but should work Private Sub Reset_Click() Dim txt For Each txt In Frame2.Controls 'Change to the frame name you used If TypeOf txt Is MSForms.TextBox Then txt.Text = "" End If Next txt txtsearch.Text = "" ' clears text fields by names if not in frame add more if needed GradedYes = False ' all of these false statements are for Toggle /check boxes GradedNo = False ListedYes = False ListedNo = False ebaytoggle = False amazontoggle = False End Sub

[@juhisinha9085]

Superb..

[@ExcelDestination]

Thanks 🤗

[@santupramanik7078]

Link please

[@noah5656]

Thank you so much!

[@nsnahsbs6510]

i got run time error '438'

[@gustavobf5030]

THANKS!

[@competitiononly4431]

Thanks Sir

[@rahulg-l6h]

Dim lastrow As Long ' Declare the variable lastrow Dim i As Long ' Declare the variable i please add this

[@bikram903]

Thanks

[@ExcelDestination]

Welcome