Eingabemaske
#1
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


Angehängte Dateien
.xlsx   12.xlsx (Größe: 10,31 KB / Downloads: 10)
Antworten Top
#2
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.
Viele Grüße
Klaus-Dieter
Der Erfolg hat viele Väter, 
der Misserfolg ist ein Waisenkind
Richard Cobden
Antworten Top
#3
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.
Gruß,
Helmut

Win10 - Office365 / MacOS - Office365
Antworten Top
#4
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
Antworten Top
#5
(12.05.2023, 15: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.
   
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
[-] Folgende(r) 2 Nutzer sagen Danke an RPP63 für diesen Beitrag:
  • derHoepp, HKindler
Antworten Top
#6
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.
WIN/MSO schicken angeblich alle 5 Sekunden Deinen Screen heim zu Papa (recall-Klausel). 
Antworten Top
#7
Ich hab dyn. Tabellen draus gemacht - sollte so reichen.

Gruß Uwe


Angehängte Dateien
.xlsm   12.xlsm (Größe: 25,45 KB / Downloads: 16)
[-] Folgende(r) 1 Nutzer sagt Danke an Egon12 für diesen Beitrag:
  • Ivan 16
Antworten Top
#8
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?
Gruß
Ivan 16
Antworten Top
#9
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
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Antworten Top
#10
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.
 
.xlsm   12.xlsm (Größe: 27,19 KB / Downloads: 9)
Gruß Uwe
[-] Folgende(r) 1 Nutzer sagt Danke an Egon12 für diesen Beitrag:
  • Ivan 16
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste