0

簡単なパスワード ジェネレーター スプレッドシートを作成しました。このスプレッドシートを開くと、ユーザーはテキスト入力ボックスに 5 桁の数字を入力するよう求められます。この数字は、一連の数式/コマンドでパスワードを作成するために使用されます。このパスワードは、出力メッセージ ボックスに表示されます。スプレッドシートはロックされた状態で始まり、ロックが解除され、番号の入力を求められ、パスワードが表示され、シートが再びロックされます。これが完了すると、パスワード ジェネレータ マクロは再び使用できなくなります。私の現在のマクロは以下のとおりです。

プライベート サブ Auto_Open()

Dim InputNo As String

ActiveSheet.Unprotect ("password")

Range("R1").Value = InputBox("Please input your Number")

If Range("R1") > 0 Then
    MsgBox "Your password is: " & Range("R2").Value

End If
ActiveSheet.Protect ("password")

サブ終了

私が必要としているのは、パスワードが表示されたら番号を入力するテキスト入力ボックスを再表示して、このファイルをシャットダウンして再度開くことなく何度も使用できるようにすることです。誰か助けてくれませんか？

4

1 に答える 1