Να μακροεντολές Παράκαμψη μπλοκαρισμένου Spreadsheet

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

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

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

Sub UnlockWorksheets ( ) Dim wsWorksheet Όπως WorksheetFor Κάθε wsWorksheet Σε ActiveWorkbook.WorksheetswsWorksheet.Unprotect Κωδικός : = " μυστικό " Sub ΕπόμενοΤέλος
εικόνων
Επιλογές
Η

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

ActiveSheet.Unprotect ( "password" ) ... οδηγίες για τη συμπλήρωση του taskActiveSheet.Protect ( " password" )
εικόνων Εκτιμήσεις
Η

Σκεφτείτε τόσο κλείδωμα υπολογιστικών φύλλων και χρησιμοποιώντας μια απλή μακροεντολή για να θάψει ένα φύλλο εργασίας από την άποψη σε σημείο που δεν θα εμφανιστούν εάν ένας χρήστης επιχειρεί να δείτε το " κρυφό" φύλλα εργασίας . Εάν επιλέξετε να αποκρύψετε ένα φύλλο εργασίας με αυτόν τον τρόπο , όμως , θα πρέπει , επίσης, να δημιουργήσετε και να εκτελέσετε μια άλλη μακροεντολή ώστε να είναι ορατό και πάλι : .

Sub Hide ( ) Sheets ( "αριθμός φύλλου " ) Visible = xlVeryHiddenEnd Sub

Sub Επανεμφάνιση ( ) για κάθε x στο activeworkbook.sheetsx.visible = truenext xend Sub
Η
εικόνων