Μακροεντολή για προσθήκη καθημερινής αναφοράς - Συμβουλές για το Excel

Ο Τζούντιθ δημοσίευσε την ερώτηση του Excel αυτήν την εβδομάδα.

Πρέπει να εισαγάγω ένα αρχείο καθημερινά. Θα ήθελα να προσθέσω το αρχείο κάθε μέρα σε ένα υπάρχον βιβλίο εργασίας του Excel και να ορίσω το φύλλο εργασίας για το d / m / y.

Μια σύντομη οπτική βασική μακροεντολή θα το κάνει αυτό ένα απλό έργο. Ένα πρόβλημα - το όνομα της καρτέλας ενός φύλλου δεν μπορεί να περιλαμβάνει κάθετο. Έτσι, η λύση θα μετονομάσει το φύλλο κάθε ημέρας για να έχει ένα όνομα όπως "Οκτ 03 1999".

Η λύση περιλαμβάνει την προσθήκη ενός κορυφαίου φύλλου εργασίας στο υπάρχον βιβλίο σας. Αυτό το φύλλο, που ονομάζεται "Μενού" παρέχει ένα απλό περιβάλλον εργασίας χρήστη, ώστε να μπορείτε να παραδώσετε αυτήν την εργασία σε άλλο μέλος του προσωπικού, εάν είναι απαραίτητο. Το επάνω φύλλο περιέχει κελιά όπου ο χρήστης μπορεί να καθορίσει το όνομα διαδρομής και το όνομα αρχείου του αρχείου που πρόκειται να εισαχθεί. Εάν εισάγετε ένα αρχείο που δημιουργήθηκε από άλλο σύστημα, τότε αυτά τα πεδία δεν θα αλλάξουν από μέρα σε μέρα. Το φύλλο μενού περιέχει επίσης ένα κελί με την τρέχουσα ημερομηνία μορφοποιημένη χωρίς κάθετες. Θα συμπεριλάβω μια αυτόματη ανοιχτή μακροεντολή που θα συμπληρώσει αυτόματα αυτό το κελί για τον χρήστη, αλλά είναι πάντα ελεύθεροι να την αλλάξουν πριν κάνετε κλικ στο κουμπί για εισαγωγή του αρχείου. Τέλος, το φύλλο μενού έχει ένα μεγάλο κουμπί στο οποίο θα κάνει κλικ ο χρήστης.Αυτό το κουμπί θα καλέσει τη μακροεντολή να εισαγάγει το αρχείο που ονομάζεται στο Μενού στο τρέχον βιβλίο με το όνομα της καρτέλας καθορισμένο.

Φύλλο εργασίας μενού

Ανοίξτε ένα νέο βιβλίο εργασίας με ένα μόνο φύλλο. Κάντε διπλό κλικ στην καρτέλα φύλλων και πληκτρολογήστε ένα όνομα για το φύλλο που ονομάζεται "Μενού". Προσθέστε έναν ωραίο τίτλο στο κελί A1. Στα κελιά C3: C5, προσθέστε το κείμενο όπως φαίνεται στα αριστερά. Στο κελί D3, εισαγάγετε το όνομα διαδρομής για τον κατάλογο στον οποίο βρίσκεται το αρχείο κάθε μέρα. Στο κελί D4, προσθέστε το όνομα του αρχείου. Αφήστε το D5 κενό. Είναι πιο εύκολο να ρυθμίσετε το κουμπί μόλις δημιουργηθεί η μακροεντολή, οπότε θα το αφήσουμε για αργότερα.

  • Ξεκινήστε το Macro Editor με alt = "" + F11
  • Επιλέξτε Εισαγωγή - Ενότητα
  • Αντιγράψτε το ακόλουθο κείμενο στο πρόγραμμα επεξεργασίας μακροεντολών
Sub Auto_Open() ' This macro will put today's date as the default new tab name Sheets("Menu").Select Range("D5").Select Selection.Formula = "=text(now(),""mmm dd yyyy"")" Selection.Copy Selection.PasteSpecial Paste:=xlValues Application.CutCopyMode = False Selection.Columns.AutoFit Range("D8").Value = "" End Sub Sub GetFile() ' This macro will import a file into this workbook ' Copyright 1999 www.MrExcel.com Sheets("Menu").Select PathName = Range("D3").Value Filename = Range("D4").Value TabName = Range("D5").Value ControlFile = ActiveWorkbook.Name Workbooks.Open Filename:=PathName & Filename ActiveSheet.Name = TabName Sheets(TabName).Copy After:=Workbooks(ControlFile).Sheets(1) Windows(Filename).Activate ActiveWorkbook.Close SaveChanges:=False Windows(ControlFile).Activate Sheets("Menu").Select Range("D8").Select ActiveCell.Value = "Completed" Range("D9").Select End Sub

Τώρα, επιστρέψτε στο Excel και προσθέστε ένα κουμπί στο φύλλο μενού.

Πώς να προσθέσετε ένα κουμπί σε ένα φύλλο εργασίας

Προσθήκη κουμπιού
  • Εμφάνιση της γραμμής εργαλείων φορμών επιλέγοντας Προβολή - Γραμμές εργαλείων - Φόρμες
  • Επιλέξτε το εργαλείο Button από τη γραμμή εργαλείων
  • Κρατήστε πατημένο το πλήκτρο alt = "", σύρετε από την επάνω γωνία του B8 στο κελί C9
  • Από το διάλογο Assign Macro, επιλέξτε τη μακροεντολή μας που ονομάζεται GetFile και κάντε κλικ στο OK
  • Ενώ το κουμπί είναι ακόμα επιλεγμένο, μπορείτε να κάνετε κλικ και να σύρετε για να επιλέξετε το κείμενο στο κουμπί. Αντικαταστήστε αυτό το κείμενο με το "Process!" ή οποιοδήποτε κείμενο της επιλογής σας

Έχετε πλέον την πλήρη εφαρμογή. Αποθηκεύστε το αρχείο σε βολικό μέρος. Μόλις ρυθμίσετε το αρχείο σας με τις σωστές πληροφορίες στα κελιά D3: D4, η καθημερινή διαδικασία θα έχει ως εξής:

  • Ανοίξτε το αρχείο που μόλις δημιουργήσαμε
  • Βεβαιωθείτε ότι η ημερομηνία που εμφανίζεται στο κελί D5 είναι κατάλληλη.
  • Κάντε κλικ στο μεγάλο κουμπί.
  • Αποθηκεύστε το αρχείο

Ακολουθούν ορισμένοι τρόποι με τους οποίους μπορείτε να αλλάξετε τη μακροεντολή:

  • Εάν θέλετε να ονομάζεται η καρτέλα με την ημερομηνία της προηγούμενης ημέρας, προσθέστε ένα "-1" μετά το "NOW ()" στη μακροεντολή.
  • Εάν το προς εισαγωγή αρχείο έχει πολλά φύλλα και το φύλλο προορισμού ενδέχεται να μην βρίσκεται στην κορυφή, προσθέστε φύλλα ("όνομα φύλλου"). Επιλέξτε μετά το αρχείο.

ενδιαφέροντα άρθρα...