Populate UserForm Textbox and refresh if cell value changes

[03856me]

I have a userform with a textbox whose value comes from a named cell "nextUnitnumber" on worksheet "data". As I add data to the worksheet using the userform the "nextUnitnumber" changes. However, the textbox value on the userform does not refresh.

In my UserForm_Initialize event I am populating the textbox with this code, which works fine:

Me.txt_unitnumber.Value = Sheets("data").Range("nextUtilnumber").Value

When I execute the code to clear the userform to make ready for the next record I am using the same code with an additional "frm_dataInput.Repaint" command, which does not correctly update from the worksheet value every time, just occasionally.

How do I get the txt_unithumber.Value to refresh EACH time the named cell "nextUnitnumber" value changes without closing the userform and restarting the process?

 

[CalcSux78]

Why not add the code to load the textbox value after the repaint command?

 

[03856me]

I moved the frm_dataInput.Repaint command before the
Me.txt_unitnumber.Value = Sheets("data").Range("nextUtilnumber").Value
row but it does nothing - the textbox value remains the same as it was when initialized. It's like it doesn't recognize the cell value has changed even though it has. I could also unload and reload the form to refresh but there are several boxes that the user wants to repeat with each session so that won't work.

 

[03856me]

Figured it out - I had the following code in the wrong place

Application.ScreenUpdating = True
Application.EnableEvents = True
Application.Calculation = xlCalculationAutomatic

Once I moved the txt_unitnumber.value = code below it, the number refreshed correctly.

 

[CalcSux78]

Glad you got it! Hopefully it helps someone else in the future.