I click on the macro icon at the top with a red scroll. The create button is greyed out so I can not create another routeen. I right click on the icon and select new. Now I have another icon to the right of it. This should be availabel surly?
But, and I don't know how I managed it. I created another macro. Using my grey hairs on visual basic, I amended the routeen but I don't get exactly as I suspect. In my new code I get 11 tabs ranging from Test-3 through to Test-13, but I have said for I = 1 to 11, so it should be Test-1, Test-2.
Quote:
Dim i As Integer
Dim Name As String
Name = "Test-"
Application.CopyObjectsWithCells = False
For i = 1 To 11
Sheets("SH-1").Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = Name & Sheets.Count
Next i
Application.CopyObjectsWithCells = True 'reset
End Sub
|