Se servir de "Private Bouton_9" en Macro

Bonsoir,
Je m'explique :

J'ai le code suivant :
Je souhaite répéter ce code 5 fois dans 5 macros différentes ?

Private Sub Bouton_9_Click()....etc....
UserForm1.Show
UserForm1.Bouton_Validez.Visible = False
UserForm1.Bouton_Passe.Visible = False
UserForm1.Bouton_9.Visible = False
UserForm1.Bouton_8.Visible = False
UserForm1.Bouton_7.Visible = False
UserForm1.Bouton_6.Visible = False
UserForm1.Bouton_5.Visible = False
End Sub

J'ai trouvé une solution en faisant une macro "Sub Afficher ()" avec les lignes de code ci-dessus et mettre "Call Afficher" dans mes macros.

Par curiosité, peut-on éviter ça et partir directement du code ci-dessus ?
Cordialement
Guy