Εμφάνιση ενός μόνο μηνύματος
  #1  
Παλιά 13-10-16, 15:00
n.spiros Ο χρήστης n.spiros δεν είναι συνδεδεμένος
Όνομα: Σπύρος
Έκδοση λογισμικού Office: Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 20-01-2016
Μηνύματα: 3
Προεπιλογή Αντιγραφή φύλλου

Καλησπέρα
Είμαι περίπου ένα χρόνο στο forum και έχω μάθει αρκετά νέα πράγματα. Ήρθε η ώρα να ζητήσω και εγώ τη βοήθειά σας σχετικά με κάτι που δεν μπορώ να φτιάξω. Κάνοντας καταγραφή μακροεντολής και μερικές τροποποιήσεις έφτιαξα την παρακάτω μακροεντολή η οποία αντιγράφει ένα φύλλο και το μετονομάζει .
Sub ΑΝΤΙΓΡΑΦΗ()
Range("B5").Select
Sheets("ΦΕ").Select
Sheets("ΦΕ").Copy AFTER:=Sheets(7)
Sheets("ΦΕ (2)").Select
Sheets("ΦΕ (2)").Name = ActiveCell
Range("A1").Select
End Sub
Το νέο όνομα είναι αυτό που περιέχει το κελί «B5». Στο αρχείο όμως μπορεί να υπάρχει φύλλο με το νέο όνομα. Αυτό που θέλω είναι πριν την αντιγραφή να ελέγχει εάν υπάρχει και να μου εμφανίζει ένα msgBox με μήνυμα ότι πρέπει πρώτα να διαγραφεί το υπάρχον φύλλο με το όνομα αυτό. Τέλος εάν είναι δυνατό το νέο φύλλο να είναι πάντα τελευταίο και όχι μετά το φύλλο 7. Χρησιμοποιώ το office 2016
Ευχαριστώ
Απάντηση με παράθεση