αντιγραφή πολλών workbooks σε ένα

[xaris2335]

Καλησπέρα βρήκα αυτό το σκριπτάκι σε vba και θέλω να το διαμορφώσω έτσι ώστε να αντιγράφει ένα συγκεκριμένο πεδίο όχι όλο το φύλλο εργασίας, απο πολλά workbooks σε ενα master που θα τα έχει όλα. Τι πρέπει να αλλάξω εκτός απο το path απο το σκριπτάκι;

Το σκριπτάκι.

Sub GetSheets()
Path = "c:\fakelos1\ypofakelos2\"
Filename = Dir(Path & "*.xlsx")
Do While Filename <> ""
Workbooks.Open Filename:=Path & Filename, ReadOnly:=True
For Each Sheet In ActiveWorkbook.Sheets
If Sheet.Name = "deltiopoliseon" then
   Sheet.Copy After:=ThisWorkbook.Sheets(1)
End If
Next Sheet
Workbooks(Filename).Close
Filename = Dir()
Loop
End Sub

Ευχαριστώ σε όσους απαντήσουν.

Υ.Γ. Μην μου πείτε για ablebits,kutools κτλ τα ξέρω απλά θέλω να το κάνω σε pc που δεν έχει αυτά τα εργαλεία.

[ZORO]

Καταρχήν τι θέλεις να κάνεις ακριβώς;
Αν π.χ. ο φάκελος σου έχει 20 αρχεία του Excel που το καθένα θα έχει και ένα φύλλο με όνομα deltiopoliseon τότε στο master excel τι θα έχεις 20 φύλλα που θα έχουν μόνο το συγκεκριμένο πεδίο που επιθυμείς ή θα αντιγραφούν όλα τα δεδομένα σε ένα μόνο φύλλο;

[xaris2335]

όχι το κάθε αρχείο έχει 2 sheets το ένα το ονόμασα data & το άλλο deltiopoliseon, εγώ θέλω να αντιγράφει μόνο το δελτίο πωλήσεων σε συγκεκριμένη περιοχή του δελτίου πωλήσεων πχ a2:e10.
Ξέχασα να πω και για τις ετικέτες το κάθε δελτίο πωλήσεων έχει ετικέτες όνομα,αρ εντολής,πωλήσεις,υπόλοιπο,κτλ.
Και απο κάτω είναι τα ονόματα με τις πωλήσεις,υπολοιπα,κτλ.
Εγώ θέλω όπως είπα να αντιγράφει μια φορά τις ετικέτες και μετά να αντιγράφει σε κάθε δελτίο πωλήσεων την περιοχή πχ a2:e10 με τα ονόματα και τις πωλήσεις,υπόλοιπα κτλ, απο το δελτίο πωλήσεων σε ένα καινούριο αρχείο που θα ονομάζεται μάστερ και θα έχει ένα sheet με τις ετικέτες και απο κάτω τα ονόματα με τις πωλήσεις,υπόλοιπα,κτλ.

Ελπίζω να κατάλαβες τι θέλω να κάνω.