[VBA] Δημιουργία αρχείου για την αποθήκευση συγκεντρωτικών φακελων

[agrbita]

Γιώργο καλησπέρα,

Αντικατέστησα αυτό που μου είπες, όμως συμβαίνει κάτι περίεργο.

Αποθηκεύει στον C:\SXEDIA\ΥΕΒ\ΑΙΤΗΣΕΙΣ\, και όχι στο "\Τα έγγραφά μου\ΥΕΒ\ΑΙΤΗΣΕΙΣ\". Γιατί μπορεί να συμβάνει αυτό; Ο κώδικας δεν έχει τέτοια εντολή. Ο φάκελος C:\SXEDIA\ δημιουργήθηκε τώρα από το excel, δεν υπήρχε πριν στον υπολογιστή μου.

Χρειάζεται να κάνω κάτι στον κώδικα ή αλλού ;

Στο σημείο του κώδικα που ελέγχει "αν το κελί D1, είναι κενό (myCell = Φύλλο1.Range("d1").Value), θέλω να ελέγξω και το κελί a1 του φύλλου1, αν είναι κενό, πως μπορώ να το κάνω;

Ευχαριστώ