![]() |
VBA: Update worksheet when txtBox data changes.
Im trying to change a worksheets cell value when an end-user changes the value of a txtBox on a customized form. Essentially Im pulling information from an excel file and some of that information may need to be changed by the end-user. how to I submit any changes back to the spreadsheet once a end-user changes a field? Here is the code for the lookup feature to give you an idea of what Im working with. ================================================== = Dim rng As Range With Worksheets(1) Set rng = .Columns(6).Find(txtCustSSN.Text) If Not rng Is Nothing Then 'Populate frmCustLookup with Customer Information txtLname.text = .Cells(rng.Row, 3).Value txtFname.text = .Cells(rng.Row, 4).Value txtMname.text = .Cells(rng.Row, 5).Value Else: MsgBox "Customer Data Not Found" End If End With End Sub ================================================== === So for example we look up Ms. Smiths record (by SSN), and need to change her last name since she has recently been married. when the user types: Andersen over top of Smith how do I send that update back to the worksheet? I'VE CREATED A COMMAND BUTTON \"CMDUPDATERECORD\" TO SUBMIT THE CHANGES, BUT IM NOT SURE WHAT CODE TO USE. Thank you for your advice, I know the solution should be easy, but my coding is a little rusty. :confused: -- Mcasteel ------------------------------------------------------------------------ Mcasteel's Profile: http://www.excelforum.com/member.php...o&userid=15698 View this thread: http://www.excelforum.com/showthread...hreadid=274237 |
Mike,
Why not set the textbox ControlSource property to the worksheet cell, it will automatically update then. -- HTH RP (remove nothere from the email address if mailing direct) "Mcasteel" wrote in message ... Im trying to change a worksheets cell value when an end-user changes the value of a txtBox on a customized form. Essentially Im pulling information from an excel file and some of that information may need to be changed by the end-user. how to I submit any changes back to the spreadsheet once a end-user changes a field? Here is the code for the lookup feature to give you an idea of what Im working with. ================================================== = Dim rng As Range With Worksheets(1) Set rng = .Columns(6).Find(txtCustSSN.Text) If Not rng Is Nothing Then 'Populate frmCustLookup with Customer Information txtLname.text = .Cells(rng.Row, 3).Value txtFname.text = .Cells(rng.Row, 4).Value txtMname.text = .Cells(rng.Row, 5).Value Else: MsgBox "Customer Data Not Found" End If End With End Sub ================================================== === So for example we look up Ms. Smiths record (by SSN), and need to change her last name since she has recently been married. when the user types: Andersen over top of Smith how do I send that update back to the worksheet? I'VE CREATED A COMMAND BUTTON \"CMDUPDATERECORD\" TO SUBMIT THE CHANGES, BUT IM NOT SURE WHAT CODE TO USE. Thank you for your advice, I know the solution should be easy, but my coding is a little rusty. :confused: -- Mcasteel ------------------------------------------------------------------------ Mcasteel's Profile: http://www.excelforum.com/member.php...o&userid=15698 View this thread: http://www.excelforum.com/showthread...hreadid=274237 |
All times are GMT +1. The time now is 12:37 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com