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
1388to1392
1388to1392
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Abfrage - Dialog

Forumthread: Abfrage - Dialog

Abfrage - Dialog
27.10.2014 14:20:46
Peter
Hallo zusammen,
ich starte noch einmal einen Versuch, mein Anliegen zu schildern.
In einer Anwendung habe ich bisher ein Formblatt über Zelleinträge
sowie über Drop-Down Menues ausgefüllt.
Da bei dieser Methode häufig Felder übersehen werden, möchte
ich das Formblatt über einen Abfragedialog ausfüllen.
Ich habe dazu vier Beispiele in der Anlage aufgeführt und fände
es toll, von Euch die entsprechenden VBA Schritte zu bekommen.
Vielen Dank im Voraus
Peter
https://www.herber.de/bbs/user/93394.xlsm

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Abfrage - Dialog
28.10.2014 12:51:15
Frank
Hallo Peter,
1. Erstellen einer Userform im VBA-Editor, die eine Combobox (Äquivalent zum Drop-Down) und 3 TextBoxen enthält. Vor jedes Eingabeelement gehört dann noch ein Label, wo drinsteht, was im Eingabeelement eingegeben wird. Weiterhin 2 Commandbuttons, einer für OK einer für Abbrechen.
2. in der Sub UserForm_Initialize der Combobox die Liste der Spannweiten zuweisen (ggf. kann man die Eingabe der PLZ auch als Combobox machen und müsste dann auch hier die Werte zuweisen. Hat allerdings nur Sinn bei einer kleinen Anzahl in Frage kommender PLZ). Eventuell den TextBoxen in dieser Sub auch Defaultwerte zuweisen.
3. Dem 'Abbrechen'-Button das Entladen der UF und das Beenden des Codes zuweisen.
4. Dem OK-Button Code zuweisen, der
- entsprechend der Spannweite den Zähler bestimmt 
SpW=CInt(ComboBox1.Text)
select case SpW
case 12
Z=1
case 15
Z=2
etc
end select

- TextBoxen abfragen, Inhalt prüfen (ganze Zahl/überhaupt Zahl) und Variablen zuweisen (entsprechend ComboBox1 und SpW). Bei Fehler 

Mldg=MsgBox ("Fehlerhafte Eingabe", "Werte überprüfen")

- Ablegen der Werte in den Zellen 
Cells(7,10).value=Z
Cells(7,15).value=ProjName
Cells(7,20).value=PLZ
Cells(7,25).value=Last
Grüsse,
Frank

Anzeige
AW: Abfrage - Dialog
28.10.2014 14:48:39
Peter
Hallo Frank,
zuerst einmal vielen Dank, ich werde morgen erst mal probieren, ob ich damit weiter komme.
Viele grüsse
Peter
;

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