VBA: Inserting And Renaming A Worksheet

I'm relatively new to VBA and require programming help with the following:

I have created a button to add a specific worksheet template ("TE - Template") after another worksheet ("CO - Cockpit") and then name it:

Sub Add_worksheet()
Sheets("TE - Template").Select
Sheets("TE - Template").Copy After:=Sheets("CO - Cockpit")
ActiveSheet.Name = "AL - Class 1"
End Sub

However, I would like to let Excel check (via VBA) if the "AL - Class 1" worksheet already exists. If it does, the same template sheet should be added but named differently: "AL - Class 2". This should be possible for X worksheets (i.e., "AL - Class (X + 1)" everytime I add a new template worksheet. Thus, I would like to keep the same name (i.e., "AL - Class"), but with an increasing number (i.e., 1, 2, 3, X).

how I should amend the above code or supply me with a better (and efficient) way of programming this query?