Macro code

Closed
Shekiah Posts 1 Registration date Wednesday July 6, 2016 Status Member Last seen July 6, 2016 - Jul 6, 2016 at 05:50 PM
 Blocked Profile - Jul 6, 2016 at 06:11 PM
Hi there. So I have a question. I want to create a macro that makes uses the list of name in cells B6:B60, E6:E60, B66:B119, and F6:F74 to make a tab for each name AND place the names in the B8 cell of each sheet. It sounds complicated. So can anyone help me?
I have the macro to make the sheets but I need that other info transferred to.

1 response

Blocked Profile
Jul 6, 2016 at 06:11 PM
So, have you manually recorded the macro? Try it, it is pretty neat!

Here loop through this:

Range(RANGEVAL[1]).Select
    Selection.Copy
    Sheets.Add After:=ActiveSheet
    Sheets(Sheet_name_[1]).Select
    Sheets(Sheet_name_[1]).Name = Sheet_Name_Val

Where a variable is assigned to:
RANGEVAL[1]
selection.copy
Sheet_name_[1]
Sheet_Name_Val



This is what it looks like from the editor, untouched!

Sub Macro2()
'
' Macro2 Macro
'

'
    Range("B6").Select
    Selection.Copy
    Sheets.Add After:=ActiveSheet
    Sheets("Sheet3").Select
    Sheets("Sheet3").Name = "Fred"
End Sub


Here is the end result of the above macro:


It's kind of fun to do the impossible! -Walter Elias Disney