Passwort eingeben

Computer: Software & Programmierung Visual Basic
#1

Hallo,
Ich habe eine Anwendung mit einem Passwort belegt.
Wenn das Passwort eingegeben wird ist das Wort im Originaltext zu lesen. Wie kann man es machen, das bei der Eingabe Passwort z.B. nur „Sternchen“ erscheinen??(Excel 2000)
Mit Dank im voraus.
Gruß Skaletti!
Hier das Makro:

Private Sub Workbook\_Open()
 If InputBox("Passworteingabe:", "Passwortabfrage") = "irgentwas" Then
 ThisWorkbook.Windows(1).Visible = True
 End If
End Sub

Private Sub Workbook\_BeforeClose(Cancel As Boolean)
 Dim MyWindow As Window
 For Each MyWindow In ThisWorkbook.Windows
 MyWindow.Visible = False
 Next MyWindow
 ThisWorkbook.Save
End Sub
#2

Hallo,

wenn ich mich nicht sehr irre, geht das mit der Inputbox nicht.

Nimm eine Userform und darauf Textfelder und einen Button.

Das Textfeld hat eine Eigenschaft ‚Passwortchar‘.
Tippst Du da einen Stern hin, hast Du den Effekt, den Du möchtest.

Gruß Rainer

#3

Hi Rainer,
Funzt prima.
vielen Dank für die schnelle Antwort.
Sehr gute Forum.

Gruß Skaletti!

#4

VB VBA InputBox Passwort Sternchen

wenn ich mich nicht sehr irre, geht das mit der Inputbox
nicht.

Hallo Rainer,

ja, hast du Recht. Thomas hat sich da was mit API gebastelt wo es dann doch geht.

http://rtsoftwaredevelopment.de/html/examples/srvxmp…

Allerdings hat sich beim/nach dem Test Excel spurlos verabschiedet.

Und, k.A. warum, wenn ich den Code da rauskopiere und im Vb-Editor einfüge wird es in nur 3-4 Zeilen umgebrochen. In Notepad auch.

Beim manuellen Aufsplitten der Codezeilen hat man dann das Problem daß die Unterstriche und einige Leerzeichen (sind wohl Steuerzeichen wie 0D oder 0A) manuell gelöscht werden müssen.

Der Test klappte vorzüglich, allerdings flackerte die Titelzeile im VB-Editor danach wie wild. Tja, als ich dann versuchte was immer da auch passierte abzubrechen war auf einaml Excel wech.

Gruß
Reinhard

#5

Hallo Reinhard,

Allerdings hat sich beim/nach dem Test Excel spurlos
verabschiedet.

dann würde ich darauf lieber verzichten.

Du hast Skaletti gelesen, das geht mir einer Userform so bequem, daß ich nicht unbedingt die ungeeignete Inputbox mit großem Aufwand zwingen würde, das dann doch zu tun.

Gruß Rainer