How to get data from many excels in one folder

Hello everyone,

I'd like to ask you that: I want to write a macro within new excel sheet which looks a folder and get the specific range (H17:I17) from every excel sheets and orders me starting from B3 to the end.

After the last row , I like to see the sum of them.

For instance in my folder C:\Formular\Database\2016 there are 5 excel sheets whoose names are 3000 x,3500 y, 1250 z,1200 ab, 1250 ac . And my created excel name is overall. I want to get data from every excelsheets if its name starts with number.
If folder name starts with number copy data from = Workbooks("3000 x").Sheets(“kapak”).Range(“H17:I17”)to Sheets("time").Cells(3, 2).Value

How can I do that

You still haven't explained - "data from every excelsheets if its name... "

What does the 'its' refer to? The worksheet? The workbook? the directory? All 3?

Sometimes, English can be a very vague language.

Yes that's true and it's hard to explain the situation.

In the folder there are lot's of workbooks but I'd like to just get data from excel if name of the workbook starts with any number, not the worksheet name. It needs to check on just the workbook name.

To make it better, can we get workbook names also to the targed excel file for same situation if workbook name starts with number ?

So with these order:
-Checks workbooks (xls files) and if name of the workbook starts with number, macro gets the name of workbook to the target excel let's say to A3. Next to it paste the range that I have specified.
Then the second excel whose workbook name starts with number ...etc