Updating cells from user form

[Royker]

I have an excel spreadsheet that contains inventory information. The spreadsheet is referenced by a user form where the user enters a part number in a text box and a command button executes a WorksheetFunction to find all the corresponding cells and displays each bit of info in a different text box. In the user form there is the means to edit certain info and my question is how do I get the edited info to update the excel spreadheet? Thanks.

 

[saltkev]

Hi

Try This on a copy of your sheet. Place it on a command button or in an event for your text box. I have commented to try to make thinks understandable, you will have to alter the code to reflect your criteria.

Application.ScreenUpdating = False
Dim FXrange, WSR
Set WSR = Sheets("Mysheet").Range("A1:A30") 

                           ' *** Change to Reflect The Nmae of Your Sheet & The Range Where The Part Numbers Are Kept ****

For Each FXrange In WSR '### FXrange Moves Through Each Cell in The WSR Range and Interigates it ###

    If FXrange.Value = MyUserForm.Mymastertextbox.Value Then
           '*** Mymastertextbox is Where The Original Part Number Resides, Change to Reflect The True Name ***
      
    
 FXrange.Offset(0, 3).Value = MyUserForm.myTextBox.Value  

                                 '*** Change The Name of The Form & Text Box to Replact Yours ***
            
   ' *** Change The Offset to reflect Where You Want to Place The Info From the Text Box  Relative to The Part Number ***
  ' *** This Line of Code Can be Repeated & Altered for each Piece of Info in each Text Box on the Form ***

    End If

Next FXrange

regards

Kev

 

[Royker]

Thanks for replying. Not sure if your code will work or not. I probably should post a sample of my code so you can see how I'm accessing the spreadsheet.

txtStartQty.Text = WorksheetFunction.VLookup(Cifa, Sheets("Sheet1").Range("A4:F426"), 6, False)

 

[Royker]

After a closer look at your code, I realized that your code was doing the same thing mine was doing. Copied your code and changed the appropriate names but not having any success in getting it to work.

 

[saltkev]

Hi

are the numbers pure numbers or text & numbers, this doesn't work in it's present state on pure numbers, if you continue to have problems, send me a copy of your sheet containing dummy data, and I can have a closer look.


kevin.eames@airbus.com


regards


Kev