Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
628to632
628to632
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

sowas wie eine "PIN Abfrage"

Forumthread: sowas wie eine "PIN Abfrage"

sowas wie eine "PIN Abfrage"
26.06.2005 20:10:14
Micha
Hallo Leute,
ich möchte gern ein Makro so schützen, das der Anwender einen Code eingeben muss. Wie könnte ich das am Besten lösen? Mit einer UF und einem Textfeld? Oder gibt es da noch eine bessere Lösung?
Vielen Dank für Eure Hilfe
Gruß Micha
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: sowas wie eine "PIN Abfrage"
26.06.2005 20:28:04
Christoph
Hi Micha,
das einfachste wäre eine InputBox
Im Bsp ist die Pin: 123 (kann aber auch Text sein)
Gruß
Christoph 
Option Explixit
Sub Pin()
If InputBox("Pin eingeben") <> "123" Then MsgBox "Falsch": End
Call Makro1
End Sub
Sub Makro1()
'hier dein Code, z.B:
MsgBox "OK"
End Sub
Anzeige
AW: sowas wie eine "PIN Abfrage" erled.
26.06.2005 20:43:15
Micha
Hallo Christoph,
danke. geht 100%.
Gruß Micha
AW: sowas wie eine "PIN Abfrage" erled.
27.06.2005 07:55:23
ray
hi micha,
hier noch mal ne alternative
Benutzer unabhängig von den Office- und Excelpaßwörtern einen eigenen Paßwortschutz ermöglichen:

Private Sub Workbook_Open()
Dim sWord As String, sPass As String
sWord = GetSetting("MeinProgramm", "Einstellungen", "Kennwort")
If sWord = "" Then Exit Sub
sPass = InputBox(prompt:="Ihr Passwort:")
If sPass = sWord Then
MsgBox prompt:="Alles paletti"
Else
MsgBox "Nix geht mehr!"
End If
End Sub

StandardModule: Modul1
Sub SetPassword()
Dim sWord As String
sWord = InputBox(prompt:="Ihr Passwort:")
If sWord = "" Then Exit Sub
SaveSetting _
appname:="MeinProgramm", _
section:="Einstellungen", _
key:="Kennwort", _
setting:=sWord
End Sub
Sub DeletePassword()
DeleteSetting "MeinProgramm"
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Was bedeutet "If c=6 Then" ?
Josef_T

Hallo zusammen
kann mir mal bitte jemand erklären, was die Anweisung: "If c=6 Then" bewirkt?
Dim c
Select Case Target.Column
Case 19
Cancel = True
c = MsgBox("Mängel behoben ?", vbYesNo)
If c = 6 Then
Target.Value = Format(Now, "dd/mm/yy hh:mm") & " Mängel b...
09.09.2008 14:39:00
Thread-ID: 1008509
11 Beiträge
Was bedautet das ^ Zeichen in Formeln
Rocky

Hallo Excelfreunde,
bin jetzt des öffteren auf Formeln gestoßen die dieses Zeichen drin haben: ^
Was heißt das? und macht es?
Danke an alle
Gruß Rocky
25.11.2008 10:39:00
Thread-ID: 1027608
3 Beiträge
Teilstring "was " in Zelle suchen
Werner

VBA-Level: befriedigend
Hallo Freunde,
innerhalb einer Spalte sollen diejenigen Zellen markiert werden, die den Teilstring "was " (einschliesslich der Leerstelle) enthalten, aber nicht,
wenn "was " direkt auf "et" oder direkt auf "nd" folgt. Sinn ist, zwar den Teilstring "was " zu s...
06.04.2009 11:30:35
Thread-ID: 1067067
6 Beiträge
Was bedeutet das Zeichen "^" in Formeln
Merlin

Was bedeutet das Zeichen "^" in Formeln?
21.10.2009 10:45:46
Thread-ID: 1111008
6 Beiträge
Was bedeutet >>For colIndex
Dietmar

Hallo in die Abendrunde,
kann mir jemand diesen Code erklären? Es scheint ein AusleseCode zu sein, der das Sheet als Textdatei ausliest.
Ich will das zugrundeliegende Sheet neu gestalten.
Meine Frage:
Kann es sein dass der Code Daten ausliest, die farblich hinterlegt sind? Wenn...
01.07.2010 21:16:52
Thread-ID: 1165012
5 Beiträge
Frage zu "Dir$" - was bedeutet das $-Zeichen?
Martin

Hallo,
ich habe in einem Beitrag im Archiv (https://www.herber.de/forum/archiv/1068to1072/t1070551.htm) folgende Scheibweise beim Aufrufen der Dir-Funktion gelesen: Dir$
Welche Bedeutung hat das Dollar $-Zeichen?
Viele Grüße
Martin
15.01.2012 13:25:23
Thread-ID: 1246253
5 Beiträge
Anzeige
alles was links vom > erscheint löschen. - VBA
Wolfgang

Hallo,
ich würde gerne erreichen, dass in Tabelle3, Zelle G15 das Zeichen > (sofern es darin steht-ist nicht immer der Fall-) und alles was sich links davon befindet, gelöscht wird. Über Makrorekorder bekomme ich das irgendwie nicht hin. Danke schon jetzt für die Rückmeldungen.
Gru...
03.11.2012 11:59:32
Thread-ID: 1285072
4 Beiträge
Anzeige
Etwas für Profis...brauche ein...
luna

Hallo,
ich brauche ein Programm (oder VBA-Script), das folgendes ermöglicht: nach dem Start(Öffnen) soll es selbständig eine Verbindung zum Internet aufbauen, eine bestimmte Seite anwählen (z.B. www.Beispiel.de),etwas verweilen, und danach selbständig die Verbindung beenden. Dies soll sich m...
19.07.2002 16:26:53
Thread-ID: 138575
7 Beiträge
Alles was < 10 in nächstes Tabellenblatt
mattis

Hallo Forumsler.Ich habe folgende Aufgabe:In einer Tabelle sind in Spalte A sehr viele Einträge
und in Spalte B dazugehörige Funktionswerte.Wenn nun ein Wert in Spalte B kleiner als 10 ist
soll der Wert mit vorangestelltem Ausgangswert von
Spalte A in das zweite Tabellenblatt geschrieb...
23.07.2002 13:22:44
Thread-ID: 139434
5 Beiträge
Anzeige
SVERWEIS;INDEX;VERGLEICH;ODER;WAS;SOLL;ICH;TUEN?
rouven

Hallo Zusammen, ich weiß nicht mehr weiter, da ich immer wieder auf euer Forum stoße, hoffe ich das ihr mir weiter helfen könnt..... Ich wäre euch sehr dankbar weil ich schon ca. 10Std. aufgewendet habe diese DOOFE Funktion zum laufen zu kriegen. Zur Sache.
Aus einer Text Datei kann ich ent...
02.10.2015 21:07:48
Thread-ID: 1450573
8 Beiträge
Hinzufügen einer Zeile und etwas hineinkopieren
BAZZIE

Hallo Ihr!
Wisst ihr, wie ich mit VBA Excel sagen kann, dass er eine Zeile hinzufügen soll und dann 4 Werte aus 4 Spalten hin einkopieren soll.
wie programmiere ich das?Vielen Dank für eure Anworten!!
Bazzi
05.08.2002 14:52:20
Thread-ID: 144923
2 Beiträge
einzelne Spalten schützen aber trotzdem was einfüg
Martin

ha llo zusammen
ich hab eine tabelle in der ich gewisse spalten vor weiteren beschriftungen gechützt habe. nun möchte ich aber, dass ich via Macro trotzdem z.b. eine neue zeile einfügen kann. was ja nicht geht ohne den blatt schutz raus zu nehmen. gibts vielleicht ne elegantere lösung?vielen...
22.08.2002 10:39:56
Thread-ID: 151461
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige