I'm trying to figure out how to create a Macro that will create a new worksheet at the very end of all the
current sheets. I want the macro to first come up with an InputBox, and whatever the user types into that Input box will be
the new name of the Worksheet. I also want this worksheet to be identical to the Template worksheet I already have in the
I thought this would be easy to code but I'm having some trouble of course
Here is what I
have so far:
Dim NewWorkSheetName As String
Dim Message1 As String
Dim Title1 As String
Dim DefaultTxt As String
Dim MyInput As String
Message1 = "Please enter the date to be used on the new Worksheet (Following the below format):"
Title1 = "Create New Worksheet"
DefaultTxt = "01.01.12"
MyInput = InputBox(Message1, Title1, DefaultTxt)
NewWorkSheetName = MyInput
Worksheets(Worksheets.Count).Name = NewWorkSheetName
If I delete the bottom 4 Lines, it will create a new blank worksheet named after what I input into the InputBox. I just
cannot seem to get it to copy the Template worksheet and Paste it into the newly created worksheet. Any help, as always,
would be greatly appreciated!
ALSO: If there is a way to have an error message, or just have the macro stop if
the user enters something that cannot be a worksheet name, that would be extra awesome