Παρακολούθηση αλλαγών σε κελιά τύπου - Συμβουλές για το Excel

Παρακολούθηση αλλαγών στα κελιά τύπου Excel. Μπορείτε να δείξετε ποια στοιχεία μόλις άλλαξαν ως αποτέλεσμα της αλλαγής ορισμένων κελιών εισαγωγής;

Δες το βίντεο

Οι αλλαγές κομματιών στο Excel είναι λίγο περίεργες.
Στόχος είναι να παρακολουθείτε ποια κελιά τύπων αλλάζουν στο Excel.
Αποθήκευση ως για να αποθηκεύσετε το βιβλίο εργασίας ως XLSM.
Αλλαγή ασφάλειας μακροεντολών.
Καταγράψτε μια μακροεντολή για να μάθετε τον κωδικό για να ρυθμίσετε τη μορφοποίηση υπό όρους για αριθμούς που δεν είναι ίσοι με 2.
Επιλέξτε τη Μορφοποίηση που θέλετε.
Καταγράψτε μια άλλη μακροεντολή για να μάθετε πώς να αφαιρέσετε το CF από το φύλλο εργασίας.
Στη μακροεντολή, προσθέστε έναν βρόχο για κάθε φύλλο εργασίας.
Προσθέστε μια δήλωση IF για να την αποτρέψετε από την εκτέλεση στον Τίτλο.
Προσθέστε έναν βρόχο για να ελέγξετε κάθε κελί τύπου.
Προσθέστε τη μορφοποίηση υπό όρους για να δείτε εάν εκτελείται η τιμή κελιού τη στιγμή που εκτελείται η μακροεντολή.
Επιστρέψτε στο Excel.
Προσθέστε ένα σχήμα. Αντιστοιχίστε τη μακροεντολή στο σχήμα.
Κάντε κλικ στο Shape για εκτέλεση της μακροεντολής.
Συμβουλή μπόνους: Σύροντας μια ενότητα VBA σε ένα νέο βιβλίο εργασίας.

Μεταγραφή βίντεο

Μάθετε το Excel από το Podcast, επεισόδιο 2059: Αλλαγές παρακολούθησης του Excel (στα αποτελέσματα του τύπου)

Γεια σας, καλώς ήλθατε πίσω στο netcast, είμαι ο Bill Jelen. Η σημερινή ερώτηση στάλθηκε από το Μόντρεαλ σχετικά με τις αλλαγές των κομματιών. Παρακολούθηση αλλαγών, εντάξει. Εδώ λοιπόν έχουμε. Έχουμε 4 κελιά εισαγωγής και ένα σωρό κελιά τύπου που βασίζονται σε αυτά τα κελιά εισαγωγής. Και αν ενεργοποιήσω, θα επιστρέψω στην καρτέλα Έλεγχος, θα ενεργοποιήσω τις Επισήμανση αλλαγών, Παρακολουθήστε τις αλλαγές κατά την επεξεργασία, κάντε κλικ στο OK, εντάξει. Και με προειδοποίησαν ότι πρέπει να αποθηκεύσουν το βιβλίο εργασίας και ότι οι μακροεντολές δεν μπορούν να χρησιμοποιηθούν σε κοινόχρηστα βιβλία εργασίας. Ξέρεις ότι? Αυτό είναι το πρόβλημα όταν παρακολουθείτε αλλαγές, μοιράζονται το βιβλίο εργασίας και υπάρχουν πολλά πράγματα που δεν μπορούν να συμβούν σε κοινόχρηστα βιβλία εργασίας, όπως γνωρίζετε, όπως μακροεντολές και πολλά άλλα πράγματα. Αλλά ας ρίξουμε μια ματιά στον τρόπο λειτουργίας των αλλαγών κομματιών στο Excel σήμερα.

Ας πάρουμε αυτό το 2 και να το αλλάξουμε από 2 σε 22, και να το πάρουμε 4 και να το αλλάξουμε από 4 σε 44. Εντάξει, και βλέπετε, αυτό που έχουν σημειώσει στις αλλαγές του κομματιού είναι ότι αυτά τα δύο κελιά άλλαξαν, εντάξει, αυτά τα μοβ οι πραγματικές αλλαγές του κομματιού. Όλα αυτά τα κόκκινα πράγματα, αυτό δεν συμβαίνει, αλλά απλώς επεσήμανα ότι όλα αυτά τα ερυθρά κελιά αλλάζουν και το κομμάτι των αλλαγών δεν λέει τίποτα για αυτές τις αλλαγές, εντάξει; Έτσι, λέει, αυτά τα δύο κελιά άλλαξαν, αλλά άλλαξαν όλα αυτά τα κελιά. Και λοιπόν, το ερώτημα από το Μόντρεαλ είναι, υπάρχει τρόπος να αλλάξουν οι τροχιές μας τα πάντα που αλλάζουν, όχι μόνο αυτά τα κελιά εισόδου έχουν αλλάξει;

Εντάξει, λοιπόν, το πρώτο πράγμα που πρέπει να κάνουμε είναι να απενεργοποιήσουμε το ενσωματωμένο Excel Change Track. Και τότε, υπάρχει ένας τρόπος που μπορούμε να πάρουμε - μπορούμε να φτιάξουμε το δικό μας σύστημα αλλαγών κομματιών που θα μας επιτρέψει να δούμε όλα τα κελιά τύπου που άλλαξαν; Εντάξει, οπότε το Βήμα 1 και αυτό το βήμα είναι το πιο σημαντικό βήμα, μην το παραλείψετε. Κοιτάξτε το αρχείο σας, το αρχείο σας ονομάζεται κάτι XLSX, πρέπει να το αποθηκεύσετε: Αρχείο, Αποθήκευση ως, ως βιβλίο εργασίας με δυνατότητα μακροεντολής ή κανένα από αυτά δεν θα λειτουργήσει. Πρέπει να κάνετε δεξί κλικ, να προσαρμόσετε την κορδέλα, να ενεργοποιήσετε τον προγραμματιστή, μόλις φτάσετε στον προγραμματιστή, μεταβείτε στην ασφάλεια μακροεντολών, αλλάξτε από αυτήν τη ρύθμιση - αυτή που λέει ότι δεν πρόκειται να αφήσουμε τις μακροεντολές να εκτελέσουν ή ούτε καν να πουν εσείς ότι είστε εκεί σε αυτήν τη ρύθμιση. Πρέπει να κάνετε αυτά τα δύο βήματα. Έχω ήδη κάνει αυτά τα δύο βήματα. Ζω κάθε μέρα με αυτά τα δύο βήματα.Έχετε ήδη επιδιορθώσει, αλλά εάν είστε νέοι στις μακροεντολές, αυτό είναι νέο για εσάς. Και τότε, πρέπει να καταλάβουμε τι είδους μορφοποίηση θέλετε. Εντάξει, οπότε απλά θα επιλέξω μερικά κελιά εδώ, πρόκειται να ηχογραφήσω μια μακροεντολή που ονομάζεται HowToCFRed, δεν πρόκειται να εκχωρήσω σε ένα κλειδί συντόμευσης, επειδή αυτό δεν πρόκειται να εκτελεστεί ξανά. Απλώς καταγράφω κώδικα για να καταλάβω πώς λειτουργεί η μορφοποίηση υπό όρους. Και θα φτάσουμε στην αρχική σελίδα, τη μορφοποίηση υπό όρους, τα κελιά επισήμανσης που δεν είναι ίσα με - Λοιπόν, περισσότεροι κανόνες, μορφοποίηση κελιών που δεν είναι ίσοι με - Βλέπετε; Δεν είναι στο αρχικό αναπτυσσόμενο μενού, αλλά αν έρθετε εδώ, δεν ισούται με 2 και, στη συνέχεια, επιλέξτε τη μορφή. Αυτό είναι το σημαντικό μέρος. Έτσι θα επιλέξω ένα κόκκινο φόντο. Μπορείτε να επιλέξετε ό, τι χρώμα θέλετε εδώ, εντάξει; Ακόμα και πηγαίνετε στο More Colors, επιλέξτε κάποιο άλλο κόκκινο,πηγαίνετε στο Custom, επιλέξτε κάποιο άλλο κόκκινο, εντάξει; Αυτή είναι η ομορφιά του Macro Recorder, θα μας δώσουν ένα τέλειο κόκκινο για εσάς ή μπλε ή ό, τι είναι αυτό που θέλετε. Εντάξει, κάντε κλικ στο OK. Και μετά, θα σταματήσουμε την εγγραφή, εντάξει. Και πάλι, το όλο θέμα είναι απλώς να δούμε ποιος είναι ο κώδικας για μορφές υπό όρους.

Πηγαίνω σε μακροεντολές, Πώς να διαμορφώσω κόκκινη μορφή υπό όρους και να επεξεργαστώ. Εντάξει, οπότε εδώ είναι τα σημαντικά μέρη αυτού του κώδικα. Μπορώ να δω ότι προσθέτουν μια μορφή υπό όρους χρησιμοποιώντας το xlNotEqual και δυσκολεύουμε να το αναφέρουμε ώστε να μην είναι ίσο με το 2. Και μετά αλλάζουμε το εσωτερικό του κελιού σε αυτό το χρώμα.

Εντάξει, πρέπει επίσης να καταλάβω πώς να διαγράψω όλες τις μορφές υπό όρους στο φύλλο. Έτσι, επιστρέψτε στο Excel, Εγγραφή άλλης μακροεντολής, Πώς να διαγράψετε όλες τις υπό όρους, ΟΚ. Ελάτε εδώ στην καρτέλα Αρχική σελίδα, μεταβείτε στη Μορφοποίηση υπό όρους, Εκκαθάριση κανόνα από ολόκληρο το φύλλο, Διακοπή εγγραφής και θα δούμε αυτόν τον κώδικα. Τέλεια, είναι μια μακροεντολή μιας γραμμής. Και μου αρέσει ακόμη και εδώ ότι ο τρόπος που το κάνουν για ολόκληρο το φύλλο είναι απλώς να αναφέρεται σε κελιά. Με άλλα λόγια, όλα τα κελιά στο ενεργό φύλλο.

Τώρα, πρέπει να κάνω αυτήν τη μακροεντολή, την καταγεγραμμένη μακροεντολή, λίγο πιο γενική. Και έχω γράψει πολλά βιβλία για το πώς να κάνω VBA στο Excel και έχω κάνει βίντεο για το πώς να κάνω VBA στο Excel, και εδώ είναι το απλό πράγμα: πρέπει να είστε σε θέση να εγγράψετε μια μακροεντολή όπως αυτή, αλλά στη συνέχεια, προσθέστε περίπου πέντε ή έξι γραμμές για να μπορέσουμε να κάνουμε τη μακροεντολή αρκετά γενική.

Και θα μιλήσω για αυτές τις γραμμές, εντάξει. Έτσι, το πρώτο πράγμα που θέλω να κάνω είναι ότι θέλω να πω, θέλω να διαβάσω το ενεργό βιβλίο εργασίας, να εξετάσω όλα τα φύλλα εργασίας. Έτσι, για κάθε φύλλο εργασίας, το WS είναι η μεταβλητή αντικειμένου, θα εξετάσω όλα τα φύλλα εργασίας. Και το άτομο από το Μόντρεαλ είπε, «Έι, υπάρχει ένα φύλλο στο οποίο δεν θέλω να συμβεί αυτό». Έτσι, εάν το όνομα WS., με το όνομα κουκκίδας φύλλου εργασίας, δεν είναι ίσο με τον τίτλο, τότε θα κάνουμε τον κώδικα στη μακροεντολή. Εδώ είναι το όνομα του φύλλου: .Cells.FormatConditions.Delete. Λοιπόν, θα περάσουμε από κάθε άτομο του φύλλου εκτός από τον τίτλο και θα διαγράψουμε όλες τις συνθήκες μορφής και μετά θα περάσουμε από κάθε κελί στο φύλλο αλλά όχι όλα τα κελιά, μόνο τα κελιά που έχουν τύπους . Αν δεν έχει μια φόρμουλα τότε δενΔεν χρειάζεται να το μορφοποιήσω γιατί δεν πρόκειται να αλλάξει. Cell.FormatConditions.Προσθέστε, αυτό είναι απευθείας από τη μακροεντολή αν και η καταγεγραμμένη μακροεντολή είπε Επιλογή - Δεν θέλω να το επιλέξω, γι 'αυτό απλά θα πω το Cell, αυτό είναι κάθε μεμονωμένο κελί. Θα χρησιμοποιήσουμε το xlNotEqual και αντί για τον τύπο: = "=" 2 που έκανε ο καταγεγραμμένος κώδικας εκεί, έχω συνενώσει ό, τι υπάρχει σε αυτό το κελί. Επομένως, ελέγξτε αν δεν είναι ίση με την τρέχουσα τιμή. Έτσι, εάν το κελί έχει αυτήν τη στιγμή 2, λέμε ότι δεν είναι ίσο με 2. Εάν το κελί έχει αυτήν τη στιγμή 16,5, λέμε ότι δεν είναι ίσο με 16,5. Και στη συνέχεια το υπόλοιπο είναι απλώς καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή. Όλα αυτά προέρχονται από μια καταγεγραμμένη μακροεντολή. Ολοκληρώστε το If με ένα End If. Τελειώστε αυτό με ένα επόμενο WS. δεν πρόκειται να αλλάξει. Cell.FormatConditions.Προσθήκη, αυτό είναι απευθείας από τη μακροεντολή αν και η καταγεγραμμένη μακροεντολή είπε Επιλογή - Δεν θέλω να την επιλέξω, γι 'αυτό απλά θα πω το Cell, αυτό είναι κάθε μεμονωμένο κελί. Θα χρησιμοποιήσουμε το xlNotEqual και αντί για τον τύπο: = "=" 2 που έκανε ο καταγεγραμμένος κώδικας εκεί, έχω συνενώσει ό, τι υπάρχει σε αυτό το κελί. Επομένως, ελέγξτε αν δεν είναι ίση με την τρέχουσα τιμή. Έτσι, εάν το κελί έχει αυτήν τη στιγμή 2, λέμε ότι δεν είναι ίσο με 2. Εάν το κελί έχει αυτήν τη στιγμή 16,5, λέμε ότι δεν είναι ίσο με 16,5. Και στη συνέχεια το υπόλοιπο είναι απλώς καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή. Όλα αυτά προέρχονται από μια καταγεγραμμένη μακροεντολή. Ολοκληρώστε το If με ένα End If. Τελειώστε αυτό με ένα επόμενο WS.δεν πρόκειται να αλλάξει. Cell.FormatConditions.Προσθήκη, αυτό είναι απευθείας από τη μακροεντολή αν και η καταγεγραμμένη μακροεντολή είπε Επιλογή - Δεν θέλω να την επιλέξω, γι 'αυτό απλά θα πω το Cell, αυτό είναι κάθε μεμονωμένο κελί. Θα χρησιμοποιήσουμε το xlNotEqual και αντί για τον τύπο: = "=" 2 που έκανε ο καταγεγραμμένος κώδικας εκεί, έχω συνενώσει ό, τι υπάρχει σε αυτό το κελί. Επομένως, ελέγξτε αν δεν είναι ίση με την τρέχουσα τιμή. Έτσι, εάν το κελί έχει αυτήν τη στιγμή 2, λέμε ότι δεν είναι ίσο με 2. Εάν το κελί έχει αυτήν τη στιγμή 16,5, λέμε ότι δεν είναι ίσο με 16,5. Και στη συνέχεια το υπόλοιπο είναι απλώς καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή. Όλα αυτά προέρχονται από μια καταγεγραμμένη μακροεντολή. Ολοκληρώστε το If με ένα End If. Τελειώστε αυτό με ένα επόμενο WS.Αυτό είναι απευθείας από τη μακροεντολή αν και η καταγεγραμμένη μακροεντολή είπε Επιλογή - Δεν θέλω να την επιλέξω, οπότε απλώς πρόκειται να πω Κελί, αυτό είναι κάθε μεμονωμένο κελί. Θα χρησιμοποιήσουμε το xlNotEqual και αντί για τον τύπο: = "=" 2 που έκανε ο καταγεγραμμένος κώδικας εκεί, έχω συνενώσει ό, τι υπάρχει σε αυτό το κελί. Επομένως, ελέγξτε αν δεν είναι ίση με την τρέχουσα τιμή. Έτσι, εάν το κελί έχει αυτήν τη στιγμή 2, λέμε ότι δεν είναι ίσο με 2. Εάν το κελί έχει αυτήν τη στιγμή 16,5, λέμε ότι δεν είναι ίσο με 16,5. Και στη συνέχεια το υπόλοιπο είναι απλώς καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή. Όλα αυτά προέρχονται από μια καταγεγραμμένη μακροεντολή. Ολοκληρώστε το If με ένα End If. Τελειώστε αυτό με ένα επόμενο WS.Αυτό είναι απευθείας από τη μακροεντολή αν και η καταγεγραμμένη μακροεντολή είπε Επιλογή - Δεν θέλω να την επιλέξω, γι 'αυτό απλά θα πω το κελί, αυτό είναι κάθε μεμονωμένο κελί. Θα χρησιμοποιήσουμε το xlNotEqual και αντί για τον τύπο: = "=" 2 που έκανε ο καταγεγραμμένος κώδικας εκεί, έχω συνενώσει ό, τι υπάρχει σε αυτό το κελί. Επομένως, ελέγξτε αν δεν είναι ίση με την τρέχουσα τιμή. Έτσι, εάν το κελί έχει αυτήν τη στιγμή 2, λέμε ότι δεν είναι ίσο με 2. Εάν το κελί έχει αυτήν τη στιγμή 16,5, λέμε ότι δεν είναι ίσο με 16,5. Και στη συνέχεια το υπόλοιπο είναι απλώς καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή. Όλα αυτά προέρχονται από μια καταγεγραμμένη μακροεντολή. Ολοκληρώστε το If με ένα End If. Τελειώστε αυτό με ένα επόμενο WS.Θέλω να το επιλέξω, οπότε απλά θα πω το Cell, αυτό είναι κάθε μεμονωμένο κελί. Θα χρησιμοποιήσουμε το xlNotEqual και αντί για τον τύπο: = "=" 2 που έκανε ο καταγεγραμμένος κώδικας εκεί, έχω συνενώσει ό, τι υπάρχει σε αυτό το κελί. Επομένως, ελέγξτε αν δεν είναι ίση με την τρέχουσα τιμή. Έτσι, εάν το κελί έχει αυτήν τη στιγμή 2, λέμε ότι δεν είναι ίσο με 2. Εάν το κελί έχει αυτήν τη στιγμή 16,5, λέμε ότι δεν είναι ίσο με 16,5. Και στη συνέχεια το υπόλοιπο είναι απλώς καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή. Όλα αυτά προέρχονται από μια καταγεγραμμένη μακροεντολή. Ολοκληρώστε το If με ένα End If. Τελειώστε αυτό με ένα επόμενο WS.Θέλω να το επιλέξω, οπότε απλά θα πω το Cell, αυτό είναι κάθε μεμονωμένο κελί. Θα χρησιμοποιήσουμε το xlNotEqual και αντί για τον τύπο: = "=" 2 που έκανε ο καταγεγραμμένος κώδικας εκεί, έχω συνενώσει ό, τι υπάρχει σε αυτό το κελί. Επομένως, ελέγξτε αν δεν είναι ίση με την τρέχουσα τιμή. Έτσι, εάν το κελί έχει αυτήν τη στιγμή 2, λέμε ότι δεν είναι ίσο με 2. Εάν το κελί έχει αυτήν τη στιγμή 16,5, λέμε ότι δεν είναι ίσο με 16,5. Και στη συνέχεια το υπόλοιπο είναι απλώς καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή. Όλα αυτά προέρχονται από μια καταγεγραμμένη μακροεντολή. Ολοκληρώστε το If με ένα End If. Τελειώστε αυτό με ένα επόμενο WS.= "=" 2 που έκανε ο καταγεγραμμένος κώδικας εκεί, έχω συνενώσει ό, τι υπάρχει σε αυτό το κελί. Επομένως, ελέγξτε αν δεν είναι ίση με την τρέχουσα τιμή. Έτσι, εάν το κελί έχει αυτήν τη στιγμή 2, λέμε ότι δεν είναι ίσο με 2. Εάν το κελί έχει αυτήν τη στιγμή 16,5, λέμε ότι δεν είναι ίσο με 16,5. Και στη συνέχεια το υπόλοιπο είναι απλώς καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή. Όλα αυτά προέρχονται από μια καταγεγραμμένη μακροεντολή. Ολοκληρώστε το If με ένα End If. Τελειώστε αυτό με ένα επόμενο WS.= "=" 2 αυτό έκανε ο καταγεγραμμένος κώδικας εκεί, έχω συνενώσει ό, τι υπάρχει σε αυτό το κελί. Επομένως, ελέγξτε αν δεν είναι ίση με την τρέχουσα τιμή. Έτσι, εάν το κελί έχει αυτήν τη στιγμή 2, λέμε ότι δεν είναι ίσο με 2. Εάν το κελί έχει αυτήν τη στιγμή 16,5, λέμε ότι δεν είναι ίσο με 16,5. Και στη συνέχεια το υπόλοιπο είναι απλώς ευθεία καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή. Όλα αυτά προέρχονται από μια καταγεγραμμένη μακροεντολή. Ολοκληρώστε το If με ένα End If. Τελειώστε αυτό με ένα επόμενο WS.καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή. Όλα αυτά προέρχονται από μια καταγεγραμμένη μακροεντολή. Ολοκληρώστε το If με ένα End If. Τελειώστε αυτό με ένα επόμενο WS.καταγεγραμμένη μακροεντολή, καταγεγραμμένη μακροεντολή. Όλα αυτά προέρχονται από μια καταγεγραμμένη μακροεντολή. Ολοκληρώστε το If με ένα End If. Τελειώστε αυτό με ένα επόμενο WS.

Εντάξει, οπότε έχω μια μακροεντολή που ονομάζεται ApplyCF. Επιστρέψτε στο Excel, προσθέστε ένα σχήμα. Εύκολο να έχω σχήμα εδώ: Εισαγωγή, επιλέγω πάντα ένα στρογγυλεμένο ορθογώνιο, πληκτρολογήστε Επαναφορά στις τρέχουσες τιμές. Θα εφαρμόσουμε το σπίτι, το κέντρο και το κέντρο θα το κάνουμε λίγο μεγαλύτερο. Λατρεύω τη λάμψη. Υποθέτω ότι νομίζεις ότι είναι ανόητο βλέποντας ότι δεν είναι εκεί, η λάμψη, η ρύθμιση που μου αρέσει δεν υπάρχει, γι 'αυτό πάντοτε πηγαίνω στο Page Layout and Effects και επιλέγω αυτό το δεύτερο. Και όταν επιστρέψω στη μορφή, μπορώ να επιλέξω ένα που έχει λίγο λάμψη. Για μένα, νομίζω ότι φαίνεται δροσερό, νομίζω ότι αξίζει τον κόπο. Κάντε δεξί κλικ, Εκχώρηση μακροεντολής και πείτε ApplyCF, κάντε κλικ στο OK. Εντάξει και, στη συνέχεια, αυτό που θα κάνει είναι όταν το κάνω κλικ, θα περάσει από όλα αυτά τα φύλλα, θα βρει όλα τα κελιά τύπου και θα δημιουργήσει μια μορφοποίηση υπό όρους που θα λέει: Εάν αυτά τα κελιά δεν είναι ίσα με 7,να αλλάξετε το χρώμα, εντάξει; Αυτό είναι. Είναι τόσο γρήγορο, συνέβη τόσο γρήγορα. Μπαμ! Εγινε. Και τώρα, προσέξτε αν αλλάξω αυτό σε 11, όλα αυτά τα κελιά μόλις άλλαξαν. Τώρα αν επιστρέψει στο 1, αχ, τα χρώματα άλλαξαν. Έτσι, όποια και αν ήταν η τιμή, όταν αλλάζουμε - αν αλλάξω αυτό το κελί, όλα αυτά τα κελιά αλλάζουν. Εάν αλλάξω αυτό το κελί, όλα αυτά τα κελιά αλλάζουν. Αν αλλάξω αυτό το κελί, αλλάζουν όλα αυτά τα κελιά.αλλάζουν όλα αυτά τα κελιά.αλλάζουν όλα αυτά τα κελιά.

Alright, now this is the new normal. Now from here, I want to track again. So I Reset To Current Values and then if I change this one to a 3, those sales change. Oh, by the way, these cells back here and these other sheets also changed in response to this. Track changes in Excel as it exists? Yeah, it's really lame. It doesn't show you the things that changed and having to show the workbook is a horrible, horrible thing. But with this simple, simple little macro, it works.

Alright now, the question said, alright, so if this is working how do I now get this to work in my other workbook? So I have some other workbook and I want to copy this over. Alright, so this is a great little bonus tip here. I'll create a brand new workbook and we'll put some stuff in here and I'll have a couple of formulas, and put a cell up there, alright. So we changed that cell, those 4 cells are all formula cells. Now if I want this workbook, Book2, to also have the code from podcast 2059, well I could retype it all again but that would be silly. So we come here to the Developer tab, and go to Visual Basic. And I want to make sure that I can see Book2 and then I can see Podcast 2059. I simply take that module and drag it and drop it on Book2, right there. And now, that code is also in Book2. Coming back to Book2, just add a shape, right click, Assign Macro, click OK. Alright, it works. And then 3, see, we've now applied that setting to this workbook.

Great question. Great question sent in from Montreal. And in this case, great question that my initial reaction is, well yeah, you're right. Track changes is horrible in Excel. And I wonder if I could create something that would actually track the changes. What are the downsides here and I'm sure I'm going to hear about this in the YouTube comments. If you had 10,000 formula cells, well now, all of these conditional formattings are going to be volatile, the things going to slow down, too many Excel format errors. Yeah, I can see all that but, you know, for a nice small workbook 5,6, 7 sheets, maybe 50 rows per sheet, I would think that this has some chance- some chance are working.

Okay, episode recap: Track changes in Excel, it's a little bizarre especially because they share the workbook. Our goal is to track what formula cells in Excel change. You have to save the workbook as XLSM, change your Macro Security. Record a macro to figure out the code to set up conditional formatting for numbers and not equal to 2, that’s just to figure out what red you want to use. Choose the formatting you want, Record another macro to learn how to remove conditional formatting from the worksheet. And then, to that macro that we recorded the first one, add a loop for each worksheet, an IF statement to prevent it from running on the title sheet, then a loop to check each formula cell. Add conditional formatting to each cell that says, if this CELL.VALUE is not equal to the value at the time that it ran, then we're going to highlight the things. Go back to Excel, assign a shape, add a shape, assign a macro to the shape, click the shape to run the macro. And I also showed you the bonus tip: dragging a VBA module to a new workbook.

Λοιπόν, θέλω να σας ευχαριστήσω που σταματήσατε. Θα σας δούμε την επόμενη φορά για ένα άλλο netcast από.

Λήψη αρχείου

Κατεβάστε το δείγμα αρχείου εδώ: Podcast2059.xlsm