Hello

I assume your "MainSheet" should always be visible. Try this:

Private Sub CommandButton5_Click()
For Each sh In ThisWorkbook.Sheets
If sh.Name < "MainSheet" Then
sh.Visible = False
End If
Next
With Worksheets("Application")
.Visible = True
.Activate
End With
End Sub

Regards,
Per


On 22 Apr., 03:42, Marilyn wrote:
Hello * I have several command buttons in a worksheet. each command button
selects a different worksheet. *Each worksheet has a different form .
Example
Private Sub CommandButton5_Click()
Worksheets("Application").Activate
End Sub

What I want to do *is if the command button "application" is selected to
open the worksheet "application" and the other worksheets to be hidden. *
thanks in advance