I have a large number of SpinButton/TextBox combinations on a userform
(~50). I'm trying to figure out if there's a better way than writing
this type of code 50 times:

Private Sub SpinButton_MeltPower1_Change()
TextBox_MeltPower1.Value = SpinButton_MeltPower1.Value
End Sub
Private Sub TextBox_MeltPower1_Change()
SpinButton_MeltPower1.Value = TextBox_MeltPower1.Value
End Sub

I also need to figure out how to trap if they write text into the text
box (rather than a number), pop up an error, and then change the value
of the text box back to the original value. Right now, the above code
crashes out (not suprisingly), when it tries to set the value of the
the spinbutton to a text string.

Any help is appreciated,
John