Clever-Excel-Forum

Normale Version: Eingabemaske
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Seiten: 1 2 3 4
Hallo zusammen,

ich habe ein Problem indem ich eine Eingabemaske erstellen wollte. Im Beispiel seht ihr zwei Tabellen. Gibt es eine Möglichkeit mittels einer Eingabemaske die Daten einzugeben und zwar so, dass zum beispiel in der linken Tabellen (Flöhe) die nächste Eingabe unter A6 erfolgt. Die nächste dann unter A7 usw. Problem ist auch die Eingabe dann auf der rechten Tabelle (Katzen). Auch hier sollte dann die nächste Eingabe unter G6 erfolgen.
Kann mir da jemand helfen
Gruß Fred
Hallo,

der Aufbau deiner Listen ist eher suboptimal. Zunächst einmal ist die leere Zeile unter den Überschriften nicht gut, das stört bei verschiedenen Standardfunktionen. Überhaupt würde ich das alles in eine Liste schreiben, mit einer zusätzlichen Spalte für die Unterscheidung zwischen Mäusen und Katzen.
Hi,

wozu braucht man eine gesonderte Eingabemaske? Ein Exceldatenblatt ist doch bereits eine Eingabemaske. Welche Vorteile versprichst du dir durch eine getrennte Maske?

Die einfachste Methode ist es, die Excel-eigene "Maske" zu verwenden. Dazu muss man diesen Befehl zunächst zugänglich machen. Dazu auf den Pfeil rechts neben der Schnellzugriffsleiste klicken, "Weitere Befehle..." auswählen, von "Häufig verwendete Befehle" auf "Nicht im Menüband enthaltene Befehle" oder auf "Alle Befehle" umstellen. Nun darunter "Maske" auswählen und dem Schnellzugriff hinzufügen. Jetzt kannst du deine Tabelle selektieren und den Menüpunkt aufrufen, schon hast du eine brauchbare Eingabemaske.

Aber mal ehrlich: Wer benötigt so was? Eine Strg-T-Tabelle ist deutlich komfortabler. Auch komfortabler als jede selbstgestrickte Userform.
Zitat:Die einfachste Methode ist es, die Excel-eigene "Maske" zu verwenden. Dazu muss man diesen Befehl zunächst zugänglich machen. 

hallo
bei mir reicht es, wenn ich eine Zelle der Liste zu markiere. 
Dann lässt sich bei mir die Maske per Tastenkombination [ALT] halten, dann [N] [M] öffnen.

Gruß Holger
(12.05.2023, 14:32)HKindler schrieb: [ -> ]Welche Vorteile versprichst du dir durch eine getrennte Maske?

Falsche Frage, Helmut!
Vielleicht erhalten wir ja eine Antwort auf folgende Frage:
Welche Nachteile erhoffst Du durch ein Userform zu verhindern?

Ich habe hier noch eine Jugendsünde:
1.693 Zeilen Code …
Heute schwer einzuschätzen, aber wahrscheinlich behandeln grob 800 nachträglich eingeführte Zeilen das Debugging.
[attachment=48125]
Vermutlich 95% von Anwenderprogramm-Programmierung gehen in Fehlerbehandlung, Oberfläche, Dialogreihenfolgen, Fehlerreparatur-Routinen, Datensicherung, Exportmöglichkeiten ...

Das ist auch nötig so, denn der gemeine User ist "dumm, unkonstruktiv oder böse" (ist plakativ und nicht ernst gemeint). Eben gemein. ;)

Wenn man dann aber 20-30 Exemplare verkaufen konnte, lohnt es sich so, wie für einen schlauen User.
Ich hab dyn. Tabellen draus gemacht - sollte so reichen.

Gruß Uwe
Hallo Uwe

Deine Lösung finge ich sehr sehr schön.
Um nicht zu meckern ist mir auf gefallen das das Format der Textboxen 3 + 4 fehlen, denn sie werden nur als Text eingetragen, das nur am Rande.

Jetzt zu meiner eigentlichen Frage:
Wie würdest du das in diesem Beispiel machen, wenn bereits ein getätigter Eintrag gemacht worden ist und diesen bearbeitet werden muss??
Wie müsste dann der VBA Code lauten?
Womit wir wieder bei #5 wären …
Zitat:ist mir auf gefallen das das Format der Textboxen 3 + 4 fehlen

Was glaubst Du, bedeutet der Begriff Textbox?
Da sind wir bei #5, Stichwort Debugging:
If IsNumeric(Textbox3) Then Cells(z, s) = CDbl(Textbox3)

Eine Excel-Zelle erkennt automatisch, dass es eine Zahl ist, wenn man direkt eingibt.

Ich werde den Thread beobachten und mich nur einmischen, wenn ich Fehler entdecke.
Ihr macht das schon! Wink

Gruß Ralf
Hallo,
 
anbei mal ein Schnellschuss.
Formatierung, Löschen und Fehlerbehandlung machst du dann bitte selbst. Alles was dazu nötig ist schon soweit vorbereitet.
Also es bleibt was zum Nachdenken übrig.
 [attachment=48133]
Gruß Uwe
Seiten: 1 2 3 4