Create and Activate New Worksheet

[Robby19]

Hello,

I have a userform that creates and names a new worksheet when I click the Save button. Once the save button is entered I need another userform to activate (UserForm2) AND make the newly created worksheet activate so that the info on UserForm2 is transcribed to the new worksheet.

Userform Save button

'Creates a new worksheet
    Sheets.Add After:=Sheets(Sheets.Count)
    'Renames the new worksheet
    Sheets(Sheets.Count).Name = Drop.Value & " " & StartDate.Value & " " & StartTime.Value

Unload UserForm1

Drop.Value is text, example "abc", "def", etc...
StartDate.Value & StartTime.Value is a user inputted date/time

 

[Robby19]

So actually, I think what would be better is if the Save button was able to copy another sheet in same workbook, rename it as per above, and then make that copied sheet activate. Is this possible?

 

[My Aswer Is This]

You would use something like this:
The new sheet would be the active sheet.

Modify names the way you want.

Sub Copy_Sheet()
'Modified  10/1/2018  3:26:55 AM  EDT
Sheets("David").Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = "Jones"
End Sub

 

[Robby19]

You sir are the best!

 

[My Aswer Is This]

You sir are the best!

Glad I was able to help you.