Creating and Naming a Worksheet Using a Macro

@Barry

Thanks for your response. I will fully write out my requirements and then consider whether I want to tackle this (it may be beyond my current skill level) or outsource it.

Again, thank you.

@Robert

The short answer is "yes" it can be done in VBA but it is non-trivial task.

You would use, I would suggest, a Userform to get the input data from the User, create the required worksheets, then create the links to the Summary sheet so once the data on the individual samples has been entered it will automatically appear on the Summary sheet.

As with any User input it is wise to 'validate' it before actioning it.

This will be several hours work once it is fully defined what the requirements are.

This is an excellent tip. Thank you. I have a similar, but more complicated request.

I work in quality control. For a particular product, I have a very specific method of determining purity; however, depending on how the batch was made, the batch may be split into multiple containers. Four samples will be taken from each container for analysis. Each sample will have its analytical data on its own worksheet. There is a sheet that summarizes the data and gives the mean, standard deviation, and residual standard deviation of all the purity data.

I have a master worksheet for each sample's analytical data, and I have the summary worksheet both in the same workbook. What I'd like to do is have a form pop up that asks (a) how many bottles are being analyzed and (b) how many samples from each bottle (min 4). From the data entered on the form, Excel would then create copies of the sample's analytical worksheet. The copies would be named "Bottle 1, Sample 1", "Bottle 1, Sample 2", and so forth. The master worksheet would then be modified in appropriate places so that the Mean, Std. Dev., and %RSD would be analyzed from all samples.

Is there a way to do all of those things in Excel 2010 VBA?

With the second macro, if you change your mind and press cancel, you still get a new window named "False".

Here is a version of the macro that deals with it. It will ask to enter a name for the new worksheet until you enter a valid one unless you press cancel, it then will delete the just created sheet and end.

Sub Macro3()
Dim sName As String
Sheets("Master").Copy After:=Sheets(Sheets.Count)
On Error Resume Next
Do
sName = InputBox("Enter new valid worksheet name")
If sName = "" Then
Application.DisplayAlerts = False
ActiveSheet.Delete
Exit Sub
End If
ActiveSheet.Name = sName
If ActiveSheet.Name = sName Then Exit Do
Beep
Loop
End Sub

If you replace
Worksheets("Master").Copy after:=Sheets(Worksheets.Count)
with
ActiveSheet.Copy after:=Sheets(Worksheets.Count)
You can make a copy of any sheet. Just make it active and run the macro.