gibt es eine Möglichkeit, einen Nutzer zu zwingen, eine Jahreszahl in eine Zelle einzutragen (jjjj)? Ich habe es schon über die benutzerdefinierte Gültigkeits-Einstellung versucht, doch da ich mit den Formeln nicht so vertraut bin, habe ich keine Lösung gefunden. Ich will die Jahreszahlen auch (erstmal) nicht eingrenzen, sondern nur sicherstellen, dass eine 4-stellige Zahl eingetragen wird.
Ich glaube ein guter Link zu diesem Thema könnte mir auch helfen
ich dachte es gäbe vielleicht eine eindeutigere Lösung mit einer benutzerdefinierten Formel. Leider kenne ich mich mit denen überhaupt nicht aus und versuche gerade mich einzuarbeiten, um z.B. auch die Eingabe einer E-Mail-Adresse oder einer Homepage zu sichern.
Im Netz habe ich bis jetzt nur alphabetische Aufstellungen der Befehle gefunden, was nicht gerade sehr hilfreich ist, wenn man nicht weiß, was man sucht…
ich dachte es gäbe vielleicht eine eindeutigere Lösung mit
einer benutzerdefinierten Formel. Leider kenne ich mich mit
denen überhaupt nicht aus und versuche gerade mich
einzuarbeiten, um z.B. auch die Eingabe einer E-Mail-Adresse
oder einer Homepage zu sichern.
Hallo Luzi,
in die zu überwachende Zelle eine Formel zu schreiben brint Null, da sobald man etwas eingibt ist die Formel wech.
Jetzt kannst du auf die Eingabe nur in einer anderen Zelle reagieren, zB. so:
Tabellenblatt: [Mappe1]!Tabelle1
│ A │ B │
──┼─────┼───────────────────────┤
1 │ 123 │ falsche eingabe in A1 │
──┴─────┴───────────────────────┘
Benutzte Formeln:
B1: =WENN(UND(ISTZAHL(A1);LÄNGE(A1)=4);"";"falsche eingabe in A1")
Tabellendarstellung erreicht mit dem Code in FAQ:2363
Weiterhin könntest du über bed. Formatierung den Zellhintergrund von A1 rot färben bei Falscheingaben.
Mehr kannst du mit Excelbordmitteln nicht erreichen.
Um mit den genannten Möglichkeiten abzuprüfen ob es eine URL oder Emailadresse ist muß man die obige Formel abändern.
Du könntest damit dann zumindest prüfen ob vorne im Zellwert ein „http://“ steht (es gibt auch ftp !).
Bei Emailadressen könntest du prüfen ob sie der Form: [email protected]
entsprechen. D.h. ob in A1 erst Text(Name) kommt, dan das „@“, dann Text(Server), dann ein Punkt, dann Text(Land).
Entsprechend dieser Auswertung kannst du dann z.B. in B1 eine entsprechende Meldung ausgeben.
Mit Excel-Vba hast du da viel mehr Möglichkeiten, mach mal Rechtsklick unten auf den Blattnamen, „Code anzeigen“ mit Linksklick auswählen, in das erscheinende Fenster kopiere den nachstehenden Code und schließ den Editor.
Dann nimm Herztropfen und gib 3mal in A1 keine 4stellige Zahl ein… ))
Gruß
Reinhard
Option Explicit
'
Private Sub Worksheet\_Change(ByVal Target As Range)
Static Zaehler As Integer, Mldg1 As String, Mldg2 As String
Mldg1 = tt("&tkyygrkm{€&tkrng`&kmorrkzy:&x{t")
Mldg2 = tt("4tkhkmkmok&niyrgl&rgs9&z€zkp&tkhgn&koY") & Chr(10) & Chr(10)
Mldg2 = Mldg2 & tt("tkokzgJ&9&tkhkuy&tkjx{}&tkjtk{xmymt{nko€xK&y{G") & Chr(10) & Chr(10)
Mldg2 = Mldg2 & tt("zniyürkm&tkokzgJ&:8;4::7&yrgsxu|&xkxno")
If Target.Cells.Count \> 1 Then Exit Sub
If Target.Address(0, 0) "A1" Then Exit Sub
If Target.Value = "" Then Exit Sub
If Len(Target.Value) 4 Or IsNumeric(Target.Value) = False Then
Target.Select
Zaehler = Zaehler + 1
If Zaehler
in die zu überwachende Zelle eine Formel zu schreiben brint
Null, da sobald man etwas eingibt ist die Formel wech.
Ja, ich dachte ja auch, ich könnte die Formel bzw. Platzhalter bei Gültigkeit > benutzerdefiniert eintragen.
Benutzte Formeln:
B1: =WENN(UND(ISTZAHL(A1);LÄNGE(A1)=4);"";„falsche eingabe in
A1“)
Wofür steht das „UND“?
Bei Emailadressen könntest du prüfen ob sie der Form: [email protected]
entsprechen. D.h. ob in A1 erst Text(Name) kommt, dan das „@“,
dann Text(Server), dann ein Punkt, dann Text(Land).
Ja, genau das will ich! Aber WIE? Ich hab (wie gesagt) keine Ahnung! Ich dachte ich könnte das mit * und ? usw. klären, aber das scheint nicht der Fall zu sein und der Aufbau der Formeln erschließt sich mir auch nur soweit, dass ich sie einigermaßen verstehe, aber keine schreiben kann.
Es wäre schön, wenn ich die Formel nicht nur geschickt, sondern bitte erklärt bekomme, denn ich bin kein einfacher Kopierer, ich möchte schließlich was dras lernen
Mit Excel-Vba hast du da viel mehr Möglichkeiten,
Ja, ich weiß, mit VBA kommt man immer weiter. Bei Gelegenheit werde ich das auch noch lernen
mach mal
Rechtsklick unten auf den Blattnamen, „Code anzeigen“ mit
Linksklick auswählen, in das erscheinende Fenster kopiere den
nachstehenden Code und schließ den Editor.
Dann nimm Herztropfen und gib 3mal in A1 keine 4stellige Zahl
ein… ))
Werde ich bei Gelegenheit vielleicht mal tun, doch im Moment bin ich nicht besonders scharf auf unverständliche Fehlermeldungen!
Benutzte Formeln:
B1: =WENN(UND(ISTZAHL(A1);LÄNGE(A1)=4);"";„falsche eingabe in
A1“)
Wofür steht das „UND“?
Und(a;b;c)
ergibt den Wert Wahr wenn a und b und c jeweils Wahr sind
in dem Beispiel ist a
ISTZAHL(A1)
dann Wahr wenn Excel den Wert in A1 als Zahl erkennt
Annersterrum, ist a oder b oder c falsch so ist und(a,b,c) auch falsch
Es wäre schön, wenn ich die Formel nicht nur geschickt,
sondern bitte erklärt bekomme, denn ich bin kein einfacher
Kopierer, ich möchte schließlich was dras lernen
))