create new sheet based on each file name and getting data

abdo meghari

Active Member
Joined
Aug 3, 2021
Messages
465
Office Version
  1. 2019
Hi Guys,
I heve report publish every month as in file. so become many files across year are existed in the same folder . for instance the file name is Bridgestone Sales Report 05May. 2022 (1) & Bridgestone Sales Report 06 JUNE. 2022 (1) and contains one sheet and contains data like this
Bridgestone Sales Report 05 May 2021.xlsx
ABCDEFG
1RETURNSSALESSIZEMARKTYPEORIGINALBRAND
201521200R20BRIDGESTONEG580JAPANBS 1200R20 G580 TCF JAP
30941200R24BRIDGESTONEG582JAPANBS 1200R24 G582 JAP
40211400R20BRIDGESTONEVSJJAPANBS 1400R20 VSJ TCF JAP
5018155R12CBRIDGESTONER623JAPANBS 155 R12C R623 JAP
644155R12CBRIDGESTONER624INDONESIABS 155 R12C R624 INDO
748165R13CBRIDGESTONER624INDONESIABS 165 R13C R624 INDO
804175/70R13BRIDGESTONEEP150THAILANDBS 175/70 R13 EP150 THI
908175/70R14BRIDGESTONEEP150THAILANDBS 175/70 R14 EP150 THI
1048185/65R14BRIDGESTONEEP150INDONESIABS 185/65 R14 EP150 INDO
1108185/65R14BRIDGESTONETECTHAILANDBS 185/65 R14 TEC THI
1244185/65R15BRIDGESTONET005INDONESIABS 185/65 R15 T005 INDO
1348185/70R13BRIDGESTONEEP150INDONESIABS 185/70 R13 EP150 INDO
1404185R14CBRIDGESTONER624INDONESIABS 185R14C R624 INDO
15412195R14CBRIDGESTONE613JAPANBS 195 R14C 613 JAP
1646195R15CBRIDGESTONER623THAILANDBS 195 R15C R623 THI
1744195/55R16BRIDGESTONEEP30THAILANDBS 195/55 R16 EP300 THI
18412195/60R15BRIDGESTONEEP150THAILANDBS 195/60 R15 EP150 THI
1908195/65R15BRIDGESTONEEP15JAPANBS 195/65 R15 EP15 JAP
2048195/70R15CBRIDGESTONER623JAPANBS 195/70 R15C R623 JAP
2144195/75R16CBRIDGESTONER613JAPANBS 195/75 R16C R613 JAP
2204205/60R16BRIDGESTONET001JAPANBS 205/60 R16 T001 JAP
2346205/65R15BRIDGESTONEEP150INDONESIABS 205/65 R15 EP150 INDO
2444215/45R17BRIDGESTONET001JAPANBS 215/45 R17 T001 JAP
2544215/55R16BRIDGESTONEEP30INDONESIABS 215/55 R16 EP300 INDO
2648215/55R17BRIDGESTONEMY-02THAILANDBS 215/55 R17 MY-02 THI
2704215/55R17BRIDGESTONET005JAPANBS 215/55 R17 T005 JAP
28416215/55R17BRIDGESTONETG90INDONESIABS 215/55 R17 TG90 INDO
2924215/60R16BRIDGESTONEEP30THAILANDBS 215/60 R16 EP30 THI
3048215/65R16CBRIDGESTONER611THAILANDBS 215/65 R16C R611 THI
31423215/70R15CBRIDGESTONER623THAILANDBS 215/70 R15C R623 THI
3204225/55R16BRIDGESTONET001JAPANBS 225/55 R16 T001 JAP
33412225/55R17BRIDGESTONEEP30THAILANDBS 225/55 R17 EP300 THI
34010225/60R16BRIDGESTONEEP30JAPANBS 225/60 R16 EP300 JAP
3504225/60R16BRIDGESTONET001JAPANBS 225/60 R16 T001 JAP
3644225/60R17BRIDGESTONED-SPORTJAPANBS 225/60 R17 D-SPORT JAP
3708225/70R15CBRIDGESTONER623JAPANBS 225/70 R15C R623 JAP
3848225/70R16BRIDGESTONED687JAPANBS 225/70 R16 D687 JAP
3904225/70R16BRIDGESTONEH005THAILANDBS 225/70 R16 H005 THI
4004225/70R17BRIDGESTONED697THAILANDBS 225/70 R17 D697 THI
4144235/55R17BRIDGESTONEER30JAPANBS 235/55 R17 ER30 JAP
4204235/55R17BRIDGESTONET005THAILANDBS 235/55 R17 T005 THI
4308235/55R18BRIDGESTONEE031JAPANBS 235/55 R18 E031 JAP
4404235/60R16BRIDGESTONET01JAPANBS 235/60 R16 T01 JAP
4548235/60R17BRIDGESTONED400JAPANBS 235/60 R17 D400 JAP
4604245/40ZR20BRIDGESTONES001JAPANBS 245/40 ZR20 S001 JAP
4704245/45R19BRIDGESTONET005JAPANBS 245/45 R19 T005 JAP
4844245/70R16BRIDGESTONED684THAILANDBS 245/70 R16 D684 THI
49038245/70R17BRIDGESTONED684JAPANBS 245/70 R17 D684 JAP
5004245/75R17BRIDGESTONE693AJAPANBS 245/75 R17 693A JAP
5144255/70R16BRIDGESTONEH005THAILANDBS 255/70 R16 H005 THI
5204265/50R20BRIDGESTONED-SPORTJAPANBS 265/50 R20 D-SPORT JAP
53012265/60R18BRIDGESTONED840JAPANBS 265/60R18 D840 JAP
5404265/70R18BRIDGESTONED684JAPANBS 265/70 R18 D684 JAP
5504275/40R18BRIDGESTONES007JAPANBS 275/40 R18 S007 JAP
5604275/40R20BRIDGESTONED-SPORTJAPANBS 275/40 R20 DSPORT JAP
5704275/45R19BRIDGESTONEALENZAJAPANBS 275/45 R19 ALENZA JAP
5804275/55R17BRIDGESTONED-SPORTJAPANBS 275/55 R17 DSPORT JAP
5904275/70R16BRIDGESTONED694JAPANBS 275/70 R16 D694 JAP
6044275/70R16BRIDGESTONEH005THAILANDBS 275/70 R16 H005 THI
6148285/60R18BRIDGESTONET01JAPANBS 285/60 R18 T01 JAP
6248285/65R17BRIDGESTONER683JAPANBS 285/65 R17 R683 JAP
6308315/80R22.5BRIDGESTONEG580JAPANBS 315/80 R22.5 G580 JAP
6404315/80R22.5BRIDGESTONER152JAPANBS 315/80 R22.5 R152 JAP
6510315/80R22.5BRIDGESTONER184JAPANBS 315/80 R22.5 R184 JAP
66121105385/65R22.5BRIDGESTONER164JAPANBS 385/65 R22.5 R164 JAP
6704445/65R22.5BRIDGESTONER164JAPANBS 445/65 R22.5 R164 JAP
68016650R16BRIDGESTONER230JAPANBS 650R16 R230 JAP
69074750R16BRIDGESTONER230JAPANBS 750R16 R230 TCF JAP
700112750R16BRIDGESTONEVSJJAPANBS 750R16 VSJ TCF JAP
71108.25R16BRIDGESTONER180JAPANBS 8.25R16 R180 JAP
72100315/80R22.5BRIDGESTONEDS50THAILANDDayton 315/80R22.5 DS50 THI
732021200R24BRIDGESTONEFSR4000JAPANFS 1200 R24 FSR4000 JAP
7444205/55R16BRIDGESTONETZ700JAPANFS 205/65 R15 TZ700 JAP
7548215/55R17BRIDGESTONETZ700JAPANFS 215/55 R17 TZ700 JAP
7644225/45R17BRIDGESTONETZ700JAPANFS 225/45 R17 TZ700 JAP
774431X10.50R15BRIDGESTONE109SINDONESIAFS 31X10.50 R15 DEST AT 109S INDO
7804LT285/75R16BRIDGESTONEAT001JAPANLT285/75 R16 AT001 JAP
Sheet1

so I search for macro create new sheets name based on file name like this Bridgestone Sales Report 05May. 2022 (1) and should copy columns A,B,G should rearrang in location again and ignores the others columns , then the data should be like this


REPORT.xlsm
ABCD
1ITEMBRANDSALESRETURNS
21BS 1200R20 G580 TCF JAP1520
32BS 1200R24 G582 JAP940
43BS 1400R20 VSJ TCF JAP210
54BS 155 R12C R623 JAP180
65BS 155 R12C R624 INDO44
76BS 165 R13C R624 INDO84
87BS 175/70 R13 EP150 THI40
98BS 175/70 R14 EP150 THI80
109BS 185/65 R14 EP150 INDO84
1110BS 185/65 R14 TEC THI80
1211BS 185/65 R15 T005 INDO44
1312BS 185/70 R13 EP150 INDO84
1413BS 185R14C R624 INDO 40
1514BS 195 R14C 613 JAP124
1615BS 195 R15C R623 THI64
1716BS 195/55 R16 EP300 THI44
1817BS 195/60 R15 EP150 THI124
1918BS 195/65 R15 EP15 JAP80
2019BS 195/70 R15C R623 JAP84
2120BS 195/75 R16C R613 JAP44
2221BS 205/60 R16 T001 JAP40
2322BS 205/65 R15 EP150 INDO64
2423BS 215/45 R17 T001 JAP44
2524BS 215/55 R16 EP300 INDO44
2625BS 215/55 R17 MY-02 THI84
2726BS 215/55 R17 T005 JAP40
2827BS 215/55 R17 TG90 INDO164
2928BS 215/60 R16 EP30 THI42
3029BS 215/65 R16C R611 THI84
3130BS 215/70 R15C R623 THI234
3231BS 225/55 R16 T001 JAP40
3332BS 225/55 R17 EP300 THI124
3433BS 225/60 R16 EP300 JAP100
3534BS 225/60 R16 T001 JAP40
3635BS 225/60 R17 D-SPORT JAP44
3736BS 225/70 R15C R623 JAP80
3837BS 225/70 R16 D687 JAP84
3938BS 225/70 R16 H005 THI40
4039BS 225/70 R17 D697 THI40
4140BS 235/55 R17 ER30 JAP44
4241BS 235/55 R17 T005 THI40
4342BS 235/55 R18 E031 JAP80
4443BS 235/60 R16 T01 JAP40
4544BS 235/60 R17 D400 JAP84
4645BS 245/40 ZR20 S001 JAP40
4746BS 245/45 R19 T005 JAP40
4847BS 245/70 R16 D684 THI44
4948BS 245/70 R17 D684 JAP380
5049BS 245/75 R17 693A JAP40
5150BS 255/70 R16 H005 THI44
5251BS 265/50 R20 D-SPORT JAP40
5352BS 265/60R18 D840 JAP120
5453BS 265/70 R18 D684 JAP40
5554BS 275/40 R18 S007 JAP40
5655BS 275/40 R20 DSPORT JAP40
5756BS 275/45 R19 ALENZA JAP40
5857BS 275/55 R17 DSPORT JAP40
5958BS 275/70 R16 D694 JAP40
6059BS 275/70 R16 H005 THI44
6160BS 285/60 R18 T01 JAP84
6261BS 285/65 R17 R683 JAP84
6362BS 315/80 R22.5 G580 JAP80
6463BS 315/80 R22.5 R152 JAP40
6564BS 315/80 R22.5 R184 JAP01
6665BS 385/65 R22.5 R164 JAP105121
6766BS 445/65 R22.5 R164 JAP40
6867BS 650R16 R230 JAP160
6968BS 750R16 R230 TCF JAP740
7069BS 750R16 VSJ TCF JAP1120
7170BS 8.25R16 R180 JAP01
7271Dayton 315/80R22.5 DS50 THI010
7372FS 1200 R24 FSR4000 JAP220
7473FS 205/65 R15 TZ700 JAP44
7574FS 215/55 R17 TZ700 JAP84
7675FS 225/45 R17 TZ700 JAP44
7776FS 31X10.50 R15 DEST AT 109S INDO44
7877LT285/75 R16 AT001 JAP 40
Bridgestone Sales Report 05May.


and when run the macro every time just replace data have already existed for the new sheets have already existed based on match files names are existed in the same folder . every file should create new sheet alone and getting data.
the idea should pull the data from multiple files and put in one file for each sheet instead of using manually. will take more time to do that.
thanks
 

Excel Facts

Copy formula down without changing references
If you have =SUM(F2:F49) in F50; type Alt+' in F51 to copy =SUM(F2:F49) to F51, leaving the formula in edit mode. Change SUM to COUNT.

Forum statistics

Threads
1,214,826
Messages
6,121,793
Members
449,048
Latest member
greyangel23

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top