Office: (Office 2010) Anzahl Zeichen Textfeld begrenzen mit VBA

Hallo,

beim Verlassen des Textfeldes prüfe ich, ob ich die Länge des Textfeldes größer 5 Zeichen ist:

Code:

Wie kann ich diese Prüfung nach jedem Buchstaben machen, dass die Meldung sofort bei Überschreitung kommt? Mit KeyPress habe ich das iwie nicht hinbekommen...

:)

 

Warum stellst Du nicht einfach die Größe des Textfelds in der Tabelle auf 5 Zeichen ein?
Oder verwendest das Eingabeformat?
Oder beides?

 

Weil in der Tabelle einige Datensätze noch mehr als 5 Zeichen haben (Daten wurden zunächst aus Excel übernommen), was ich nach und nach manuell anpasse. ICh will aber vermeiden, dass jetzt neue DS dazu kommen, die mehr als 5 Zeichen haben.

Was meinst du mit Eingabeformat? Wo genau kann ich da die Zeichenanzahl definieren?

 

Siehe in der Hilfe von ACCESS nach.

 

Ok, ist okay, aber auch nicht ideal, weil die Prüfung erst erfolgt, wenn ich mehr als 5 Buchstaben eingegeben habe.

Wie kann ich denn nach jedem Buchstaben prüfen, ob die aktuelle Länge >5 ist? Wenn ja, kommt halt eine meldung.

 

Quatsch *wink.gif*
Beim Eingabeformat von LLLLL ist es gar nicht möglich mehr als fünf
Buchstaben einzugeben.

Wenn du unbedingt auf die Prüfung via VBA bestehst, nutze die Ereignisbehandlung
OnChange (bei Änderung) des Textfeldes.
Code:

BTW:

Dass man Steuerelemente und Felder nicht unbedingt nach Accessfunktionen/-Eigenschaften/-Methoden
benennen sollte, hat sich doch eigentlich schon rumgesprochen!?!

 

Eingabeformat ist ehrlich gesagt leicht verwirrend, weil man dann den Cursor immer auf das 1. zeichen setzen muss. Wenn man das textfeld rechts von der Begrenzung anwählt, sitzt der Mauszeiger auf dem letzten Zeichen und somit lässt sich halt kein Buchstabe eingeben *Smilie

"Bei Änderung" funktioniert nicht bei einem neuen DS, wo das Textfeld noch leer ist. Dann kann ich auch mehr als 5 Zeichen eintragen. Es funktioniert nur, wenn bereits etwas im Feld eingetragen ist.

Und der "name" war nur als Beispiel gedacht, sorry für die Verwirrung, habe nicht dran gedacht *Smilie

 

Unbound text box: limiting entry length sollte IMHO auch bei gebundenen Textfeldern funktionieren.

 

Ich würde BeforeUpdate Event auswerten.
Das ist einfach und berücksichtigt auch das einfügen per Copy & Paste oder Drag & Drop.

Natürlich kann man auch eine Kombination mit anderen Events verwende, aber ich habe damit die besten Erfahrungen gemacht, da man per Copy & Paste eingefügt Daten auch noch korrigieren kann. Ansonsten setzt da schon eine Fehlerbehandlung ein, die dann nur praxisuntauglich umgesetzt werden kann.

LG Markus

 

Glaube ich nicht.
Code:

funktioniert bei meinem Acc2010 auch bei neuen Datensätzen.

 

Wenn die Eingabemaske "ordentlich", d.h. mit der Tastatur per Tab bedient wird, gibt es dieses Problem überhaupt nicht.

 

Auch das lässt sich beheben:
Code: