Calling Userform text_exit sub from Userform cmd_click sub

[dloskot]

I have a Userform to get data from an access data base. I have all the code written to enter a record id and then get the data from the access data base. I want to have a command button to get next record, but I can't figure out a wall to call the sub that is already written. The sub is of the from

Sub Text_Record_Num_Exit(ByVal Cancel As MSForms.ReturnBoolean)

When I try to do a call to that subroutine I get Runtime error '424' Object Required

Can someone tell me if there is a way the call the text_Exit sub from another sub or a simple way to get the next access record?

Thanks in advance for all the help this forum provides.

 

[chrism216]

Check if the sub is declared as Private. You will have to explicitly name the module if it is.

Call Mymodule.Mysub(MyParameters)

 

[CalcSux78]

I would recommend taking all of the code ran when the "Sub Text_Record_Num_Exit" event is triggered and placing it into a new sub.

Example

Sub Text_Record_Num_Exit(ByVal Cancel as MSForms.ReturnBoolean)
Call PullData
End Sub

Sub PullData
'...
'...
'Your code pasted here
'...
End Sub

 

[dloskot]

chrism216 No it is not Private so that is not the problem.

 

[dloskot]

CalcSux78 Yes I though of that but I was trying to reuse the existing code. The problem with your suggestion is if I make a change in the future I would need to make the change in two place. A better suggestion would be to put the main code in a Module sub and call it from the Userform. Again I was trying to get away from extra work when the working code is already written.