Proprio come puoi proteggere con password cartelle di lavoro e fogli di lavoro, puoi proteggere con password una macro in Eccellere dall'essere visualizzato (ed eseguito).
Posiziona un pulsante di comando sul foglio di lavoro e aggiungi le seguenti righe di codice:
1. Innanzitutto, crea una semplice macro che desideri proteggere.
Range("A1").Value = "Questo è un codice segreto"
2. Quindi, fare clic su Strumenti, Proprietà progetto VBA.
3. Nella scheda Protezione, seleziona "Blocca progetto per la visualizzazione" e inserisci una password due volte.
4. Fare clic su OK.
5. Salva, chiudi e riapri il file Excel. Prova a visualizzare il codice.
Apparirà la seguente finestra di dialogo:
È ancora possibile eseguire il codice facendo clic sul pulsante di comando ma non è più possibile visualizzare o modificare il codice (a meno che non si conosca la password). La password per il file Excel scaricabile è "facile".
6. Se si desidera proteggere con password l'esecuzione della macro, aggiungere le seguenti righe di codice:
Dim password come variante
password = Application.InputBox ("Inserisci password", "Protetto da password")
Seleziona la password del caso
Il caso è = falso
'fare niente
Il caso è = "facile"
Range("A1").Value = "Questo è un codice segreto"
Caso Altro
MsgBox "Password errata"
Fine selezione
Risultato quando si fa clic sul pulsante di comando sul foglio:
Spiegazione: La macro utilizza il metodo InputBox dell'oggetto Application. Se l'utente fa clic su Annulla, questo metodo restituisce False e non accade nulla (InputBox scompare). Solo quando l'utente conosce la password (di nuovo "facile"), il codice segreto verrà eseguito. Se la password inserita non è corretta, viene visualizzato un MsgBox. Si noti che l'utente non può esaminare la password nell'editor di Visual Basic perché il progetto è protetto dalla visualizzazione.
