Visual Basic Editor medföljer Microsoft Excel ger mer avancerade användare de verktyg som behövs för att skapa nästan obegränsade makron för att anpassa hur Excel fungerar . En enkel makro kan lösenordsskydda ett Excel-kalkylblad med bara några få rader kod . Arbeta med makron i Visual Basic tar lite övning , men fördelarna med att lära sig grunderna är värt ansträngningen . Instruktioner
1
Öppna Microsoft Excel-kalkylblad som du vill skydda .
2
Tryck " ALT + F11 " för att öppna Visual Basic .
3
Klicka på " Infoga " -menyn och välj " UserForm . "
4
Klicka på " TextBox " verktyget och dra den till " UserForm " arbetsområde . Justera storleken på textrutan och returresa .
5
Tryck " F4 " med " TextBox " stilla utvalt för att gå in i " Egenskaper " fönstret och bläddra ner till " PasswordChar . " Sätt en asterisk ( * ) i kolumnen Värde .
6
Klicka på " UserForm " att föra verktygslådan tillbaka och dra en " CommandButton " på " UserForm . " För estetiska ändamål , läge på knappen till höger om " TextBox . "
7
Tryck " F4 " med " CommandButton " väljs stilla och ändra bildtexten till " OK . "
8
Klicka på " UserForm , " tryck " F4 " och ändra dess bildtext till " låsa /låsa alla blad . "
9
Tryck " F7 " och klistra in följande kod som den visas nedan :
Private Sub CommandButton1_Click ( ) katalog
Dim WSheet Som Arbetsblad
För varje WSheet I kalkylblad
p Om WSheet.ProtectContents = sant då
WSheet.Unprotect Lösenord : = TextBox1.Text
Else
WSheet.Protect Lösenord : = TextBox1.Text
End If
Nästa WSheet
Lasta mig
End Sub
10
Välj " modul " från " Infoga " -menyn och klistra in följande :
Sub ShowPass ( ) katalog
UserForm1.Show
End Sub
11
Tryck " ALT + Q " för att återgå till Excel .
12
tryck på " ALT + F8 , " tryck sedan på " Alternativ " efter att ha valt " ShowPass " från listan .
13
Tilldela ett kortkommando till makrot och tryck på " OK . "
14
Tryck på kortkommandot för att starta makrot , ange ett lösenord , tryck sedan på " OK " -knappen för att lösenordsskydda bladen i arbetsboken .
