Ligesom du kan passwordbeskytte projektmapper og regneark, kan du kodeord beskytter en makro i Excel fra at blive set (og henrettet).
Placer en kommandoknap på dit regneark, og tilføj følgende kodelinjer:
1. Opret først en simpel makro, som du vil beskytte.
Område ("A1"). Value = "Dette er hemmelig kode"
2. Klik derefter på Værktøjer, VBAProjektegenskaber.
3. På fanen Beskyttelse skal du markere "Lås projekt til visning" og indtaste en adgangskode to gange.
4. Klik på OK.
5. Gem, luk og genåbn Excel -filen. Prøv at se koden.
Følgende dialogboks vises:
Du kan stadig eksekvere koden ved at klikke på kommandoknappen, men du kan ikke se eller redigere koden længere (medmindre du kender adgangskoden). Adgangskoden til den Excel -fil, der kan downloades, er "let".
6. Hvis du vil kodeordbeskytte makroen mod at blive udført, skal du tilføje følgende kodelinjer:
Dim adgangskode som variant
password = Application.InputBox ("Indtast adgangskode", "Adgangskodebeskyttet")
Vælg kodeord til sag
Sag er = falsk
'gøre ingenting
Sag er = "let"
Område ("A1"). Value = "Dette er hemmelig kode"
Sag ellers
MsgBox "Forkert adgangskode"
Afslut Vælg
Resultat, når du klikker på kommandoknappen på arket:
Forklaring: Makroen anvender InputBox -metoden for applikationsobjektet. Hvis brugerne klikker på Annuller, returnerer denne metode Falsk, og der sker ikke noget (InputBox forsvinder). Først når brugeren kender adgangskoden ("let" igen), vil den hemmelige kode blive eksekveret. Hvis den indtastede adgangskode er forkert, vises en MsgBox. Bemærk, at brugeren ikke kan se på adgangskoden i Visual Basic Editor, fordi projektet er beskyttet mod at blive set.
