Visual Basic-Editor mit Microsoft Excel enthält mehr fortgeschrittene Anwender die notwendigen Werkzeuge, um nahezu unbegrenzt Makros erstellen, um die Art und Weise funktioniert Excel anpassen. Ein einfaches Makro kann mit einem Kennwort schützen ein Excel-Arbeitsblatt mit nur wenigen Zeilen Code. Arbeiten mit Makros in Visual Basic braucht etwas Übung , aber die Vorteile von dem Erlernen der Grundlagen ist die Mühe wert. Anleitung
1
Öffnen Sie die Microsoft Excel-Tabelle die Sie schützen möchten .
2
Presse " ALT + F11 " zu öffnen Visual Basic.
3
Klicken Sie auf das Menü "Einfügen" und wählen Sie " UserForm. "
4
Klicken Sie auf das " TextBox "-Werkzeug und ziehen Sie es auf die " UserForm " Arbeitsbereich. Passen Sie die Größe des Textfelds , wie gewünscht.
5
Presse "F4" mit dem " TextBox " noch ausgewählt, um den "Eigenschaften" Fenster eingeben und scrollen Sie nach unten zu " PasswordChar . " Legen Sie ein Sternchen ( *) in der Spalte Wert .
6
Klicken Sie auf " UserForm " , um die Toolbox zurück zu bringen und ziehen Sie ein " CommandButton " auf die " UserForm . " Aus ästhetischen Gründen , positionieren Sie den Knopf auf der rechten Seite des " TextBox . "
7
Presse "F4" mit dem " CommandButton " noch ausgewählt und ändern Sie die Beschriftung auf " OK".
8
Klicken Sie auf " UserForm " Presse " F4 " und ändern Sie die Beschriftung zu " Schützen /Freigeben Alle Blätter . "
9
Presse "F7" und fügen Sie den folgenden Code als es erscheint ein:
private Sub CommandButton1_Click () Dim
WSheet As Worksheet
For Each WSheet In Worksheets
Wenn WSheet.ProtectContents = True Then
WSheet.Unprotect Passwort: = TextBox1.Text
Else
WSheet.Protect Passwort: = TextBox1.Text
End If
Weiter WSheet
Unload Me End Sub
10
"Modul " aus dem Menü "Einfügen" und fügen Sie den folgenden :
Sub ShowPass ()
UserForm1.Show
End Sub
11
Presse " ALT + Q ", um Excel.
12
Drücken Sie die " ALT + F8 ", dann "Optionen" drücken , nachdem Sie " ShowPass " aus der Liste.
13
eine Tastenkombination zuweisen , um das Makro , und drücken Sie "OK".
< br > 14
Drücken Sie die Tastenkombination , um das Makro zu starten, geben Sie ein Kennwort ein, und drücken Sie die "OK" -Taste, um mit einem Kennwort schützen die Blätter in der Arbeitsmappe.