Pre-release master branch Github repo.

The Excel file is provided with the .bas files already imported and ready-to-use. They are listed here only for convenience to anyone who wishes to view the code. As-is, the Excel is incomplete, entirely missing the Flares section and also missing any means of automating ammo-kill assignments: to track ammo, users must manually calculate relevant formulas/values. Also, many ranges that ought to be are not set to protected, meaning the user could very easily "break" something with innocuous clicks or typing.

Changelog

@@ -0,0 +1,90 @@
+Version 1.4.9
+- Fixed wording in Information sheet
+- Better password for Information sheet
+- Made some Any% Ammo formulas account for secrets rewards from a level before
+- Minor changes to names of levels and enemies where appropriate in Ammo sheets
+- Fixed Meds sheet values for Xian UK Box-exclusive med
+ -- Added Med "Yes/No" dropdown to 100% Ammo sheet
+-------------------------------------------------------------------------------
+Version 1.4.8
+- Implemented click-button activated VBA to edit shark kill in 100% Tables
+- Removed password from Protection in Counts sheets; Information unaffected
+-------------------------------------------------------------------------------
+Version 1.4.7
+- Revised remaining formulas for Any% Ammo sheets for consistency and failsafes
+- Began implementing VBA comments for readability
+- Began implementing VBA for WotMD shark in 100% tables, unsure if necessary
+- Fixed table names in Meds and Ammo sheets for consistency
+ -- Added tables to 100% Counts tables and named appropriately
+-------------------------------------------------------------------------------
+Version 1.4.6
+- Revised formulas for Any% Ammo sheets for consistency and failsafes
+ -- Still need to do the same for Secrets% and 100% Ammo sheets
+- Hotfix for Meds sheet dropdown and data validation issues
+- Resolved Version 1.4.1 Meds sheet issue using Set Print Area
+-------------------------------------------------------------------------------
+Version 1.4.5
+- Hotfix for terrible formulas issue in Ammo sheets (Woops pointed it out)
+x Didn't resolve Version 1.4.1 Meds sheet minor issue
+-------------------------------------------------------------------------------
+Version 1.4.4
+- Fixed coloring and comment inconsistencies in Ammo sheets
+- Added functions to hide certain weapons in specific levels unless all secrets
+  are collected (applies to Any% Ammo sheets)
+- VBA code cleaning
+x Didn't resolve Version 1.4.1 Meds sheet minor issue
+-------------------------------------------------------------------------------
+Version 1.4.3
+- Changed Ammo subroutine names to include "Ammo" before sheet names
+ -- Updated Workbook Case selection calls
+ -- Updated Ammo subroutines featuring "ShowNone" to "ShowAmmoNone"
+x Didn't resolve Version 1.4.1 Meds sheet minor issue
+-------------------------------------------------------------------------------
+Version 1.4.2
+- Updated Information sheet to reflect changes from Version 1.4.1
+- Added sheets for Secrets% and Glitchless Secrets%
+ -- Made appropriate changes to All Secrets cells in said sheets
+- Corrected coloring issues for all Ammo sheets
+- Updated Menu and Module macros to account for new ammo sheets
+ -- Updated some subroutine names of 100% Counts Table macros
+ -- Changed Module's Ammo and Table macros to run ShowNone or ShowTableNone
+ first where appropriate instead of manually inputting every sheet and
+ entering their visible property individually
+x Didn't resolve Version 1.4.1 Meds sheet minor issue
+-------------------------------------------------------------------------------
+Version 1.4.1
+- Corrected and updated Information sheet to reflect changes from Version 1.2
+- Corrected Menu sheet by removing extra space
+- Corrected protection of Meds sheet; now unprotected
+- Corrected Meds sheet for printer friendliness
+ -- Changed coloring
+ -- Changed sizing/spacing to allow 8.5" x 11" paper size printing
+- Corrected issue of leaving 100% Counts tables unprotected
+x Added minor issue to Meds sheet: looks bad in working view
+-------------------------------------------------------------------------------
+Version 1.4.0
+- Added sheets for 100% Counts Glitched/Glitchless instead of just 100%
+ -- Updated macros to allow display of both, neither, or one of these sheets
+ -- Corrected counts for glitched and glitchless tables where appropriate
+ -- Reordered columns in a logical way
+- Major coloring changes, more focus on printer friendliness
+- Changed versioning scheme to Release.Major.Minor
+- Began keeping a changelog; retroactively wrote changelog for past versions
+-------------------------------------------------------------------------------
+Version 1.3.2
+- Corrected dropdown macros for sheet selection
+ -- Now triggered by option selection correctly
+- Minor coloring changes
+-------------------------------------------------------------------------------
+Version 1.3.1
+- Update for newly found glitch to obtain Xian large med
+- Minor coloring changes
+-------------------------------------------------------------------------------
+Version 1.3
+- Created semi-working dropdown macros for sheet selection
+ -- Requires clicking out and back into cell after option selection to run
+- Minor coloring changes
+-------------------------------------------------------------------------------
+Version 1.2
+- Direct port from Google Sheets to Excel
+- Some minor format changes to account for Sheets/Excel differences

mMenu.bas

@@ -0,0 +1,80 @@
+Attribute VB_Name = "mMenu"
+Sub ShowMeds()
+    ThisWorkbook.Sheets("Meds").Visible = True
+End Sub
+Sub HideMeds()
+    ThisWorkbook.Sheets("Meds").Visible = xlVeryHidden
+End Sub
+Sub ShowAmmoNone()
+    ThisWorkbook.Sheets("Any%").Visible = xlVeryHidden
+    ThisWorkbook.Sheets("Glitchless Any%").Visible = xlVeryHidden
+    ThisWorkbook.Sheets("Secrets%").Visible = xlVeryHidden
+    ThisWorkbook.Sheets("Glitchless Secrets%").Visible = xlVeryHidden
+    ThisWorkbook.Sheets("100%").Visible = xlVeryHidden
+    ThisWorkbook.Sheets("Glitchless 100%").Visible = xlVeryHidden
+End Sub
+Sub ShowAmmoAny()
+    ShowAmmoNone
+    ThisWorkbook.Sheets("Any%").Visible = True
+End Sub
+Sub ShowAmmoGlitchlessAny()
+    ShowAmmoNone
+    ThisWorkbook.Sheets("Glitchless Any%").Visible = True
+End Sub
+Sub ShowAmmoBothAny()
+    ShowAmmoNone
+    ThisWorkbook.Sheets("Any%").Visible = True
+    ThisWorkbook.Sheets("Glitchless Any%").Visible = True
+End Sub
+'These respond to "Menu" sheet dropdowns when called from "ThisWorkbook" Module, change sheet visibilities as appropriate to user input
+
+Sub ShowAmmoSecrets()
+    ShowAmmoNone
+    ThisWorkbook.Sheets("Secrets%").Visible = True
+End Sub
+Sub ShowAmmoGlitchlessSecrets()
+    ShowAmmoNone
+    ThisWorkbook.Sheets("Glitchless Secrets%").Visible = True
+End Sub
+Sub ShowAmmoBothSecrets()
+    ShowAmmoNone
+    ThisWorkbook.Sheets("Secrets%").Visible = True
+    ThisWorkbook.Sheets("Glitchless Secrets%").Visible = True
+End Sub
+Sub ShowAmmo100()
+    ShowAmmoNone
+    ThisWorkbook.Sheets("100%").Visible = True
+End Sub
+Sub ShowAmmoGlitchless100()
+    ShowAmmoNone
+    ThisWorkbook.Sheets("Glitchless 100%").Visible = True
+End Sub
+Sub ShowAmmoBoth100()
+    ShowAmmoNone
+    ThisWorkbook.Sheets("100%").Visible = True
+    ThisWorkbook.Sheets("Glitchless 100%").Visible = True
+End Sub
+Sub ShowAmmoAll()
+    ThisWorkbook.Sheets("Any%").Visible = True
+    ThisWorkbook.Sheets("Glitchless Any%").Visible = True
+    ThisWorkbook.Sheets("Secrets%").Visible = True
+    ThisWorkbook.Sheets("Glitchless Secrets%").Visible = True
+    ThisWorkbook.Sheets("100%").Visible = True
+    ThisWorkbook.Sheets("Glitchless 100%").Visible = True
+End Sub
+Sub ShowTableNone()
+    ThisWorkbook.Sheets("100% Counts Glitched").Visible = xlVeryHidden
+    ThisWorkbook.Sheets("100% Counts Glitchless").Visible = xlVeryHidden
+End Sub
+Sub ShowTableGlitched()
+    ShowTableNone
+    ThisWorkbook.Sheets("100% Counts Glitched").Visible = True
+End Sub
+Sub ShowTableGlitchless()
+    ShowTableNone
+    ThisWorkbook.Sheets("100% Counts Glitchless").Visible = True
+End Sub
+Sub ShowTableBoth()
+    ThisWorkbook.Sheets("100% Counts Glitched").Visible = True
+    ThisWorkbook.Sheets("100% Counts Glitchless").Visible = True
+End Sub

mTables.bas

@@ -0,0 +1,28 @@
+Attribute VB_Name = "mTables"
+'Subroutine to determine whether or not to add inaccessible WotMD shark
+
+Sub SharkKillToggle()
+
+'Declare variables
+Dim SharkKill As Boolean, SharkRng As Range
+
+'C11 is the WotMD Kills cell
+Set SharkRng = ThisWorkbook.ActiveSheet.Range("C11")
+
+SharkKill = Application.InputBox(Prompt:="Are you going to kill the optional shark? Leaderboard rules do not require it, so unless you want to do extra work, leave the default option. Switch to something Excel interprets as 'True' if you wish to kill the shark.", _
+            Title:="Shark Kill Prompt", Default:="False", Type:="4")
+
+'Change WotMD kills value based on user input
+If SharkKill = True Then
+    ThisWorkbook.ActiveSheet.Unprotect
+    SharkRng.Value = 36
+    ThisWorkbook.ActiveSheet.Protect
+Else
+    ThisWorkbook.ActiveSheet.Unprotect
+    SharkRng.Value = 35
+    ThisWorkbook.ActiveSheet.Protect
+End If
+
+End Sub
+
+

s02.cls

@@ -0,0 +1,46 @@
+VERSION 1.0 CLASS
+BEGIN
+  MultiUse = -1  'True
+END
+Attribute VB_Name = "s02"
+Attribute VB_GlobalNameSpace = False
+Attribute VB_Creatable = False
+Attribute VB_PredeclaredId = True
+Attribute VB_Exposed = True
+Private Sub Worksheet_Change(ByVal Target As Range)
+
+'For the top menu dropdown, cell D2/"Meds"
+Select Case Range("Meds")
+    Case "Yes": ShowMeds
+    Case "No": HideMeds
+End Select
+
+'For the next menu dropdown, cell D3/"Ammo"
+Select Case Range("Ammo")
+    Case "None": ShowAmmoNone
+    Case "Any%": ShowAmmoAny
+    Case "Glitchless Any%": ShowAmmoGlitchlessAny
+    Case "Both Any%": ShowAmmoBothAny
+    Case "Secrets%": ShowAmmoSecrets
+    Case "Glitchless Secrets%": ShowAmmoGlitchlessSecrets
+    Case "Both Secrets%": ShowAmmoBothSecrets
+    Case "1": ShowAmmo100
+    Case "Glitchless 100%": ShowAmmoGlitchless100
+    Case "Both 100%": ShowAmmoBoth100
+    Case "All": ShowAmmoAll
+End Select
+
+'For the next menu dropdown, cell D4/"Flares"
+'Select Case Range("Flares")
+    'Case "Yes": ShowFlares
+    'Case "No": HideFlares
+
+'For the last menu dropdown, cell D5/"Table"
+Select Case Range("Table")
+    Case "None": ShowTableNone
+    Case "Glitched": ShowTableGlitched
+    Case "Glitchless": ShowTableGlitchless
+    Case "Both": ShowTableBoth
+End Select
+
+End Sub