Macro code [Closed]

Report
Posts
1
Registration date
Wednesday July 6, 2016
Status
Member
Last seen
July 6, 2016
-
 Blocked Profile -
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 reply


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

Subscribe To Our Newsletter!

The Best of CCM in Your Inbox

Subscribe To Our Newsletter!