Call a Control_Click Event when UserForm is Initialized

R

RyanH

I have a UserForm with several CheckBoxes, TextBoxes, ComboBoxes, etc. I
also have a Command Button Click Event that calculates totals of everything.
I have the Controls in the UserForm autofilled by a worksheet and then call
the Userform. For example:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)

''''code to autofill userform

UserForm.Show
End Sub

I want to insert some code to automatically call the commandbutton_click
event so all my totals will automatically be there and the user does not have
to click the command button, how do I do this?

Thanks for your help in advance!!
 
S

sebastienm

Hi,
I suppose you fill controls in the form in the _Initialize event.
Move this code in a new sub of the Userfomr:
Public Sub FillForm( )
and in _Initialize, just call FillFOrm
Also, move the code that calculates the form out of the _Click event:
Public Sub Calculate()
and in _Click, just call Calculate

Now to show the form:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
USeform.FillForm
Userform.Calculate
UserForm.Show
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top