[Flashgordon61]

Τάσο , χίλια ευχαριστώ!!!!!!!!!!!
Βέβαια ο κώδικας διαγράφει ολόκληρες τις γραμμές και το ζητούμενο είναι η απαλοιφή των δεδομένων, και μόνο για τα κελιά στην τριάδα των στηλών (Όνομα , Χρόνος , Συχνότητα ανά μήνα) για τον κάθε υπάλληλο αναλόγως , αλά αλλάζοντας στον κώδικα το

rng(i).EntireRow.Delete

με το

rng(i).ClearContents
rng(i, 2).ClearContents
rng(i, 3).ClearContents

επιτυγχάνεται το ποθούμενο.

Τώρα ως αναφορά το δεύτερο σκέλος του ζητούμενου (Εισαγωγή νέων δεδομένων) ,
με βάση τα αναφερόμενα στο προηγούμενο μήνυμά μου , περιμένω & πάλι την βοήθειά σου.

Συγνώμη για το φόρτωμα ………….

Καλή συνέχεια.

Γιώργος