P
Patrick Simonds
With my UserForm still open I want to run the code below. My problem is that
when the Called procedure is run it stops on the first line "TextBox88.Text
= Worksheets("Income").Range("J3").Text" and I get an Object Required error.
I know I could include this with the UserForm code, but this is just one
small snippet. I would need to replicate it about 60 times.
Private Sub TextBox80_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox80.Value > "" Then
Worksheets("Income").Range("B3").Formula = "=" & TextBox80.Value
Else
Worksheets("Income").Range("B3").Formula = TextBox80.Value
End If
TextBox80.Text = Worksheets("Income").Range("B3").Text
Call Initialization.UserForm_Update
End Sub
Sub UserForm_Update()
'This macro intializes the Data Input UserForm
'Populates January
TextBox88.Text = Worksheets("Income").Range("J3").Text
TextBox90.Text = Worksheets("Income").Range("L3").Text
End Sub
when the Called procedure is run it stops on the first line "TextBox88.Text
= Worksheets("Income").Range("J3").Text" and I get an Object Required error.
I know I could include this with the UserForm code, but this is just one
small snippet. I would need to replicate it about 60 times.
Private Sub TextBox80_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox80.Value > "" Then
Worksheets("Income").Range("B3").Formula = "=" & TextBox80.Value
Else
Worksheets("Income").Range("B3").Formula = TextBox80.Value
End If
TextBox80.Text = Worksheets("Income").Range("B3").Text
Call Initialization.UserForm_Update
End Sub
Sub UserForm_Update()
'This macro intializes the Data Input UserForm
'Populates January
TextBox88.Text = Worksheets("Income").Range("J3").Text
TextBox90.Text = Worksheets("Income").Range("L3").Text
End Sub