Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
756to760
756to760
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Passwortabfrage über Inputbox

Forumthread: Passwortabfrage über Inputbox

Passwortabfrage über Inputbox
21.04.2006 12:00:22
Torge
Hallöchen,
folgendes Problem:
mittels Klickbutton und Passwort erst eins, beim zweiten Klick ein zweites Blatt einblenden lassen, welche beim öffnen ausgeblendet sind. Habe folgenden Coce aus dem Forum:
In einer UserForm:

Private Sub CommandButton1_Click()
If TextBox1 = Passwort Then
PassOK = True
Unload Me
Else
MsgBox "falsches Passwort!"
PassOK = False
Unload Me
End If
End Sub

und in einem Modul:
Public PassOK As Boolean
Public Const Passwort = "123"
Kann mir jemand unter die Arme greifen und den Cod erweitern?
Vielen Dank Torge
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Passwortabfrage über Inputbox
21.04.2006 12:51:55
Bertram
Hi Torge,
wenn du das mittels InputBox machen willst, würde ich das evtl. so machen:

Private Sub CommandButton3_Click()
Dim Passwort As String
Passwort = InputBox("Passwort:", "Eingabe")
If Passwort = "123" Then
If Sheets(2).Visible = True Then
Sheets(3).Visible = True
Else
Sheets(2).Visible = True
End If
Else
MsgBox ("Falsches Kennwort")
End If
End Sub

CommandButton3 bedindet sich direkt auf Tabellenblatt 1.
Gruß
Bertram
Anzeige
;

Forumthreads zu verwandten Themen

Inputbox für VBA Befehl
Tom

Hallo,
ich habe folgenden Code und brauche eine Inputbox, die die Eingabe in den VBA Code integriert.
Vorerst mal der Code:
'Auszulesende Dateien Else ' B = 0 If sArea2(B) "" Then ThisWorkbook.Sheets(OName).Cells(LCol, 1) = OName 'schreibe Ordnername sFormel = Right$(sArea2(B), L...
05.01.2009 15:21:00
Thread-ID: 1036995
9 Beiträge
Inputbox VBA Fehler
Leitz

Hallo!
Habe ein kleines Problem!
Habe eine Inputbox in die eine Zahl geschrieben werden soll; definiert als String (strInput as String)
Für Berechnungen übergebe ich den Wert in einen Integer Speicher (intInput = strInput)
Wenn nun versehentlich ein Buchstabe in die Inputbox ges...
25.02.2009 20:14:03
Thread-ID: 1054157
18 Beiträge
VBA - Hilfetexte für Funktionen wie MsgBox, InputB
Stefan

Hallo zusammen,
gibt es eine einfache Möglichkeit, in VBA Hilfetexte (welche ruhig einfachen Textfiles o.ä. entsprechen können) für Funktionen wie MsgBox, InputBox etc. zu hinterlegen?
Danke vorab und Gruß.
Stefan
12.06.2009 09:41:53
Thread-ID: 1080899
2 Beiträge
Anzeige
VBA InputBox
Einzel

Hallo,
habe folgenden CODE
Sub Bemerkung() Dim Eingabe As String Dim erg% Text = InputBox("Bitte geben Sie einen Wert für ein:", "Dateneingabe:") Range("B6").Value = Text End Sub
Nun möchte ich aber, das wenn in z.B. B6 schon was steht er den Inhalt in z.B. B7 einträgt. usw.
...
18.06.2009 14:21:23
Thread-ID: 1082593
3 Beiträge
VBA Inputbox Type Parameter Problem
Bernhard

Liebes Forum,
bislang (Excel 2003) war es möglich eine Variable aus einer Inputbox auszulesen und mit Type:=0 konnte man außerhalb der Inputbox auf eine Zelle klicken - die Zelladresse wurde dann in die Inputbox übernommen und konnte ausgewertet werden.
Beispiel:
str_cell_input =...
20.01.2010 15:00:09
Thread-ID: 1131397
4 Beiträge
VBA Datum in INPUTBOX in Tabelle suchen
Klaus

Nachdem ich nun seit einigen Stunden das Forum durchforstet habe, gehen mir langsam die Suchbegriffe aus. Daher frag ich jetzt einfach einmal......
Ich habe (mal wieder) so eine Tabelle mit einer Zinsstaffel. In Spalte B steht immer die Valuta oder eben das Buchungsdatum.
Ich hab mir be...
22.04.2010 16:03:34
Thread-ID: 1153334
2 Beiträge
Anzeige
Mit Inputbox große Datentabelle durchsuchen VBA
Ralf

Hallo.
Ich habe ein Problem und komme einfach nicht weiter. Vllt kann mir jmd hier helfen.
Ich habe ein großes Worksheet mit 7 Spalten (von Spalte A bis Spalte G) und ca 11200 Zeilen. Die Überschriften der einzelnen Spalten sind jeweils von Zeile 3 bis Zeile 5 (Verbunden). Zeile 1 und...
21.06.2013 11:31:13
Thread-ID: 1318908
5 Beiträge
VBA via Inputbox suchen und Zelle ändern
Ralf
Hallo zusammen,
habe folgendes Problem:
Würde gerne über eine Inputbox nach einem Wert in Spalte B suchen. Wenn der Wert gefunden wurde, soll über eine weitere Inputbox der Wert in der Spalte G (in der selben Zeile) geändert werden können.
Bsp:
Suchwert "1234" wird gefunden in Zell...
22.06.2014 16:14:54
Thread-ID: 1366900
5 Beiträge
VBA Drucken, Passwortabfrage
Herman

Guten Tag,
ich möchte per VBA einen bestimmten Bereich drucken lassen. (Range("A1:Z35").PrintOut)
Dieser Ausdruck soll in Farbe erfolgen. Wenn man allerdings bei uns im Unternehmen etwas in Farbe ausdrucken möchte, ist es nötig in ein Abfragefenster einen Abteilungscode einzugeben. Da d...
09.01.2015 10:08:44
Thread-ID: 1401680
2 Beiträge
Eingabe in Inputbox mit VBA
S.

Guten Morgen
Ich habe eine Arbeitsmappe, in der eine Liste mit Nummern geführt wird. Ich greife auf diese mit einer anderen Mappe zu. Da man die Nummernliste auch öffnen und Filtern will, habe ich das Speichern unterdrückt mit folgendem Code: Private Sub Workbook_BeforeSave(ByVal SaveAsUI A...
03.11.2015 07:15:34
Thread-ID: 1455980
6 Beiträge
per VBA InputBox in Zelle schreiben und drucken
Dominic

Hallo zusammen,
ich benötige ein Skript bei dem ich einen Wert eingeben kann (1 bis 52) z. B. per InputBox. Dieser Wert wird in meine Tabelle in die Zelle C6 bis C12 übergeben.
Wie bekomme ich das hin? Mein folgendes Skript funktioniert nicht. Hier kommt immer der Fehler "Objekt erforde...
03.05.2016 11:02:25
Thread-ID: 1491626
4 Beiträge
Schliessen Datei mit Abfrage Passwort VBA
Schädler

Bei einer Datei mit VBA-Programmierung erscheint beim Schliessen der Datei plötzlich die Abfrage des Passwortes der Programmierung. Dies hat sich erst jetzt bei der Excel-Version 2016 gezeigt.
Hat jemand Erfahrungen in diesem Bereich? Kann mich da jemand unterstützen?
Vielen Dank im Vor...
19.05.2016 12:53:45
Thread-ID: 1494178
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige