Creare password

Hai un problema con Excel?

Nuova discussione

Creare password
di gargiu data: 08/07/2015 11:38:51
La seguente macro non mi funziona, anche se inserisco la password come indicata nella macro, mia appare sempre il messaggio di errore.

Doce sbaglio?

Sub insanno()
Dim pass As String
Dim anno As String
pass = peppo
Password = InputBox("Inserisci la password")
If pass = Password Then
anno = InputBox("Inserisci l'anno del calendario")
ActiveSheet.Name = anno
Else
MsgBox "Password Errata!" & Chr(10) _
& "La modifica dell'anno deve essere gestita dal coordinatore del picchetto!", _
vbCritical, Title:="PASSWORD ERRATA!"
Exit Sub
End If
End Sub

di scossa data: 08/07/2015 11:55:12
cit. gargiu: "Dove sbaglio?"

L'elenco è lungo

- sbagli a non usare Option Explicit, che ti avrebbe immediatamente segnalato l'errore;
- sbagli a non dichiarare tutte le variabili;
- sbagli (per me) a non indentare il codice;

La soulzione: inserisci Option Explicit in testa al codice, sistema le varie segnalazioni di variabile non dichiarata, e vedrai che poi capirai dov'è l'errore che fa funzionare il tuo codice in modo diverso da quello che ti aspetti.

scossa's web site

Se tu hai una mela, ed io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno.Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

di gargiu data: 08/07/2015 12:18:33
Effettivamente mancava la dichiarazione della variabile peppo.... ma comunque non funziona ancora.
Mi dai altre indicazioni?

Grazie

Option Explicit
Sub insanno()
Dim Pass As String
Dim anno As String
Dim Password As String
Dim peppo As String
Pass = peppo
Password = InputBox("Inserisci la password")
If Password = Pass Then
anno = InputBox("Inserisci l'anno del calendario")
ActiveSheet.Name = anno
Else
MsgBox "Password Errata!" & Chr(10) _
& "La modifica dell'anno deve essere gestita dal coordinatore del picchetto!", _
vbCritical, Title:="PASSWORD ERRATA!"
Exit Sub
End If
End Sub

di scossa data: 08/07/2015 13:08:19
cit.: " mancava la dichiarazione della variabile peppo"

Ma scusa, peppo non è la password?
Quindi una stringa ("peppo") e quindi non dovrebbe essere semplicemente
Pass = "peppo"
senza dichiarare peppo come variabile?

scossa's web site

Se tu hai una mela, ed io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno.
Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

di gargiu data: 08/07/2015 13:25:16
Ciao scossa, ora funziona. Grazie per l'aiuto.
Scrivere macro non é il mio esercizio quotidiano. Piccoli dettagli come questi mi fanno andare in tilt... pur sapendolo ma non esercitando questo "linquaggio" con regolarità, certi dettagli te li dimentichi e ti sfuggono. Grazie a Dio ci siete voi che ci date i giusti imput che ci mettono in riga.

Grazie ancora.

Vuoi Approfondire?