Excel VBA: How to trigger UserForm Activate code

Hello Team

I have the following code within a userform called frmSendEmail

Private Sub UserForm_Activate()
Form_Personalized = FindWindowA(vbNullString, Me.Caption)
STYLE = StartWindow(Form_Personalized, STYLE_CURRENT)
STYLE = STYLE Or WS_CX_MINIMIZAR
STYLE = STYLE Or WS_CX_MIXIMIZAR
MoveWindow Form_Personalized, STYLE_CURRENT, (STYLE)
End Sub

Select allOpen in new window

Within module "SendEmail" the following code is included:

Answer = MsgBox("Do you wish to check report details before producing email and attachment?", vbYesNo, "Mailbox Check")
 
  If Answer = vbYes Then
    frmSendEmail.Show
   Exit Sub
   
   Else
 
  End If

Select allOpen in new window

When the above code is executed, it does result with the display of the frmSendEmail but the form that is displayed does not include the display of the Maximize and Minimize functions on the userform which would be included if the Private Sub UserForm_Activate() was executed when the frmSendEmail.show is ran.

Can you please advise what I must adjust or include in order for the Private Sub UserForm_Activate() to be triggered when the frmSendEmail.show is executed?

Thank you in advance.

Dale