Solved: Unhide only certain sheets Macro

[Barryj]

I tried replacing [VBA]

Sub UnhideSheets()
frmUnhideSheets.Show
End Sub

[/VBA]

With
[VBA]

Private Sub UserForm_Initialize()
cmdOK.Enabled = True
lbSheets.List = Array("Sheet1", "Sheet2")
End Sub

[/VBA]

But it is telling me it cannot find macro!

little lost here.

But I do want to show only certain sheets say sheet 1 & 2 out of the 5

Thanks for the your help.