I commented out a test that seemed backwards
Just remove the .zip, it's NOT really zipped, merely renamed
'6/27/2015 - Hossler
Private Sub Workbook_AddinInstall()
Call Workbook_Open
End Sub
Private Sub Workbook_Open()
Dim menuBar As CommandBar, i As Integer
'6/27/2015 - Hossler
' If CDbl(Application.Version) >= 12 And Left$(Application.OperatingSystem, 3) <> "Mac" Then Exit Sub
If CDbl(Application.Version) < 12 Then Exit Sub
'1 and 2 are the Worksheet Menu Bar and the Chart Menu Bar
MenuName = ThisWorkbook.Worksheets("Commands").Range("MenuName")
For i = 1 To 2
Set menuBar = Application.CommandBars(i)
If IsAControl(MenuName, menuBar.Controls) Then menuBar.Controls(MenuName).Delete
BuildMenu menuBar
'InstallShortcuts
Next i
BigWorksheet = True
End Sub