VBA: Create sheets from list

Closed
jdamushte Posts 1 Registration date Friday 20 July 2018 Status Member Last seen 20 July 2018 - 20 Jul 2018 à 09:48
TrowaD Posts 2921 Registration date Sunday 12 September 2010 Status Contributor Last seen 27 December 2022 - 24 Jul 2018 à 11:44
Hello,
suppose i have value in column A from 1 to 10 then i want to create a sheet from 1 to 10 using macro



Related:

2 responses

Blocked Profile
20 Jul 2018 à 10:35
So record a macro of it and do it!

Highlight the row, cut it, select the tab, new tab, rename it "1", highlight the first row, paste the row!

It is that simple!

Have FUN!
TrowaD Posts 2921 Registration date Sunday 12 September 2010 Status Contributor Last seen 27 December 2022 555
24 Jul 2018 à 11:44
Since the macro recorder doesn't show you how to loop, give this code a try:
Sub RunMe()
For Each cell In Range("A1:A10")
    Sheets.Add
    ActiveSheet.Name = cell.Value
Next cell
End Sub


Or, when you want the order of sheets reversed:
Sub RunMe()
For Each cell In Range("A1:A10")
    Sheets.Add after:=Sheets(Sheets.Count)
    ActiveSheet.Name = cell.Value
Next cell
End Sub


Best regards,
Trowa