Good idea, pdsasse. If I have a process that I use more than once in a program, or which takes quite a bit of coding, I almost always tend to put it into a separate sub-module or function with relevant parameters.
If you wanted to put even more code into the separate process you could create it as a Sub-Module that checks for the existence and adds if required. That means only 1 line of code in your original program, e.g.
Sub CreateSheet(ByVal strSheetName As String)
Dim wsTest As Worksheet
Set wsTest = Nothing
On Error Resume Next
Set wsTest = ActiveWorkbook.Worksheets(strSheetName)
On Error Goto 0
If wsTest Is Nothing Then
Worksheets.Add.Name = strSheetName
MsgBox "Sheet " & strSheetName & " created."
'Create worksheet "Bob" if it doesn't exist.
It all depends on circumstances and preferences.