XL 2019 Modifier une macro aller a la feuille pour éviter erreur 9 si la feuille demandé n' existe pas

Bonjour je voudrais de l' aide pour modifier une macro dans module 1
Afin d'éviter erreur 9 si la feuille n'existe pas ( dans cette exemple la 96 )
Pouvoir indiquer ce genre de message MsgBox "La Feuille '96' n'existe pas!"

ci-joint un exemple du fichier
Merci a vous

Sub Cadre1_Cliquer()
Call MasquerFeuilles
Dim ws As Worksheet
a = Range("G5")
For Each ws In ThisWorkbook.Worksheets
If ws.Name = "Inscriptions" Or ws.Name = "Mode d'emploi" Or ws.Name = "Noms" Or ws.Name = "" & a & "" Then
ws.Visible = xlSheetVisible
End If
Next ws
Sheets("" & a & "").Activate
End Sub

Sub MasquerFeuilles()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
If ws.Name <> ThisWorkbook.ActiveSheet.Name Then
ws.Visible = xlSheetHidden
End If
Next ws
End Sub

Sub FeuilVisibles()
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Sheets
Sheets(sh.Name).Visible = True
Next sh
End Sub