Running multiple macros with one command button on userform

[ExcelNovice]

Hi, I'm trying to run the following macros from a userform but continues to get an error each time I try:

Private Sub CommandButton1_click()
Call Worksheets("Sheet1").CommandButton11_click
Call Worksheets("Sheet1").CommandButton12_click
Call Worksheets("Sheet1").CommandButton13_click
Call Worksheets("Sheet1").CommandButton14_click

End Sub

The error received is:

Run-time error '438'
Object doesn't support this property or method

Thanks for your help.

 

[My Aswer Is This]

Assuming all your scripts work OK when the buttons are pressed separately then I'm not sure what the problem might be.

You are using select a lot.

Try using a script like this:
You will see I did not use select and activate.

Private Sub CommandButton11_Click()
'Modified  9/22/2019  12:47:36 AM  EDT
    If Range("os56") = 0 Then
        Range("AA81:AA83").RowHeight = 0.000001
        Range("os56") = 4
    Else
        Range("AA81:AA82").RowHeight = 12.75
        Range("AA83:AA83").RowHeight = 13.5
        Range("os56") = 0
End If
End Sub

 

[Fluff]

You haven't removed the word Private from the procedure name. This

Private Sub CommandButton11_Click()

should be

Sub CommandButton11_Click()