VBA Code to make and name a new worksheet?

[akaj321akaj]

Hello,
im trying to make a vba code that will read what you have in a textbox named "categories" and when you click the "insert category" button Ive made,
It will automatically create a new worksheet with the name you entered in the textbox.
if this is possible please tell me, thank you very much in advance!

 

[akaj321akaj]

I have a code that works

Dim WS As Worksheet
Set WS = Sheets.Add

but im trying to make it get the text that i type in my textbox "txtcat" to come up with the name for the new worksheet

 

[Sektor]

Sub InsertSheet()
    
    Dim sh As Worksheet
    
    Set sh = Sheets.Add
    sh.Name = txtcat.Text
    
End Sub

Or this way:

Sub InsertSheet()
    Sheets.Add.Name = txtcat.Text
End Sub

 

[akaj321akaj]

Thank you so much! it worked perfectly!
is there any way i can keep my template in the newly created worksheets?

 

[Sektor]

You can create copy of your template sheet like this:

Sub SheetFromTemplate()
    Worksheets("Template").Copy After:=Sheets(Sheets.Count)
    ActiveSheet.Name = txtcat.Text
End Sub

 

[akaj321akaj]

Thanks for the reply sektor! sorry that i haven't posted in a while but what your saying
is exactly what i want but i cant find out how to incorporate that into a commandbutton

 

[akaj321akaj]

bump