Aivan kuten voit suojata työkirjat ja laskentataulukot salasanalla, voit salasana suojaa makroa sisään Excel katsomisesta (ja teloituksesta).
Aseta komentopainike laskentataulukkoosi ja lisää seuraavat koodirivit:
1. Luo ensin yksinkertainen makro, jonka haluat suojata.
Alue ("A1"). Arvo = "Tämä on salainen koodi"
2. Napsauta seuraavaksi Työkalut, VBAProject Properties.
3. Valitse Suojaus -välilehdeltä "Lukitse projekti katseltavaksi" ja anna salasana kahdesti.
4. Napsauta OK.
5. Tallenna, sulje ja avaa Excel -tiedosto uudelleen. Yritä katsoa koodi.
Näyttöön tulee seuraava valintaikkuna:
Voit silti suorittaa koodin napsauttamalla komentopainiketta, mutta et voi enää tarkastella tai muokata koodia (ellet tiedä salasanaa). Ladattavan Excel -tiedoston salasana on "helppo".
6. Jos haluat suojata makron suorittamiselta salasanalla, lisää seuraavat koodirivit:
Himmennä salasana vaihtoehtona
password = Application.InputBox ("Anna salasana", "Salasanasuojattu")
Valitse Kotelon salasana
Tapaus on = väärä
'Älä tee mitään
Asia on = "helppo"
Alue ("A1"). Arvo = "Tämä on salainen koodi"
Asia Muu
MsgBox "Väärä salasana"
Lopeta Valitse
Tulos, kun napsautat taulukon komentopainiketta:
Selitys: Makro käyttää sovellusobjektin InputBox -menetelmää. Jos käyttäjät napsauttavat Peruuta, tämä menetelmä palauttaa epätosi ja mitään ei tapahdu (InputBox katoaa). Vasta kun käyttäjä tietää salasanan ("helppo" uudelleen), salainen koodi suoritetaan. Jos syötetty salasana on väärä, näyttöön tulee MsgBox. Huomaa, että käyttäjä ei voi katsoa salasanaa Visual Basic Editorissa, koska projekti on suojattu katselulta.
