Saving newly created workbook as cell name to folder

[OneTrueTony]

I'll start with saying I've never messed with VBA and Macros.

My boss is looking to take a spreadsheet that breaks down the employees by manager, create new workbooks and save them by the managers name.

I've been able to take the managers by filtering and then create the new workbook but I'm getting stuck on auto naming and saving.


(Creates new workbook and opens it up)
Sub test()

Cells.Select
Range("B1").Activate
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
ActiveSheet.Name = ActiveSheet.Range("I1")
Range("b1").Select

End Sub

How would I go about editing the macro to then take the new workbook and save it (file name would be in L2)?

 

[fadee2]

Hy OneTrueTony,

Welcome to the board.

your query looks very much similar to this.
Sample:

filter_using_range_values.xlsm
	A	B	C	D	E	F	G	H	I	J	K	L	M	N	O	P	Q	R
1	asd	sad	asd	as	dsa	d	asd	asd	sad	asd	a	sd	asd	asdsf				Manager 1
2	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	MANAGER 1				Manager 2
3	13	13	13	13	13							13	13	MANAGER 2				Manager 3
4	5	5	5	5	5							5	5	MANAGER 1				Manager 4
5	312	312	312	312	312							312	312	MANAGER 3
6	354	354	354	354	354							354	354	MANAGER 2
7	354	354	354	354	354							354	354	MANAGER 1
8	321	321	321	321	321							321	321	MANAGER 1
9	84	84	84	84	84							84	84	MANAGER 3
10	3213	3213	3213	3213	3213							3213	3213	MANAGER 1
11	58	58	58	58	58							58	58	MANAGER 2
Sheet1

try it and see if it works for you.

 

[OneTrueTony]

Hy OneTrueTony,

Welcome to the board.

your query looks very much similar to this.
Sample:

filter_using_range_values.xlsm
	A	B	C	D	E	F	G	H	I	J	K	L	M	N	O	P	Q	R
1	asd	sad	asd	as	dsa	d	asd	asd	sad	asd	a	sd	asd	asdsf				Manager 1
2	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	123sad5f	MANAGER 1				Manager 2
3	13	13	13	13	13							13	13	MANAGER 2				Manager 3
4	5	5	5	5	5							5	5	MANAGER 1				Manager 4
5	312	312	312	312	312							312	312	MANAGER 3
6	354	354	354	354	354							354	354	MANAGER 2
7	354	354	354	354	354							354	354	MANAGER 1
8	321	321	321	321	321							321	321	MANAGER 1
9	84	84	84	84	84							84	84	MANAGER 3
10	3213	3213	3213	3213	3213							3213	3213	MANAGER 1
11	58	58	58	58	58							58	58	MANAGER 2
Sheet1

try it and see if it works for you.

Thank You! I will start working on this.