[VBA] Αποθήκευση και αρίθμηση αρχείων

[Lokos]

Καλημέρα σε όλους!

Επανέρχομαι με ένα πρόβλημα που με απασχολεί εδώ και αρκετό καιρό.
θα ήθελα με το πάτημα ενός κουμπιού να αποθηκεύω ένα φύλλο από το τρέχον βιβλίο εργασίας
σαν νέο αρχείο xls. σε συγκεκριμένο φάκελο.

Το όνομα του νέου αυτού αρχείου θα πρέπει να έχει το πρόθεμα „001_“, & Όνομα αρχείου.
Παράδειγμα:

001_Όνομα αρχείου.xls, 002_Όνομα αρχείου.xls κοκ. δηλ. το πρόθεμα να αυξάνεται κατά μια μονάδα κάθε φορά που αποθηκεύω ένα νέο βιβλίο εργασίας.

Επίσης θα ήθελα από το φύλλο που θα αντιγραφεί σε νέο βιβλίο να αφαιρεθεί κώδικας που περιέχει.

Μέχρι τώρα τη διαδικασία αυτή την κάνω με το χέρι!!

Παρακαλώ τα φώτα σας!

Ευχαριστώ εκ των προτέρων

Γιώργος