Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 04:37:43
Mit Word erstellte PDF als Anhang an E-Mail anhängen
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1052to1056
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1052to1056
1052to1056
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Userform nach Eingabe in Textfeld schließen

Userform nach Eingabe in Textfeld schließen
02.03.2009 15:10:21
Jakob
Hallo,
ich habe eine Userform erstellt mit einen Textfeld. Die Eingabe wird auch korrekt in die entsprechende zelle geschrieben. Nun habe ich noch 2 Fragen dazu:
- kann ich die Eingabe in den Textfeld einschränken (Eingabe nur aus 2 Buchstaben möglich z. Bsp. "MX")?
- kann ich die Userform nach betätigen der Enter-Taste schließen? Irgendwie bekomme ich es nicht hin für die Userform einen Code einzugeben
Vielen Dank.
Gruß,
Jakob

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Userform nach Eingabe in Textfeld schließen
02.03.2009 15:26:08
Renee
Hi Jakob,
Frage1: ...Textfeld einschränken (... z. Bsp. "MX")?
Ja. Entweder im TextBox1_Change Event oder aber, wenn mehrere fixe Wert besser eine Listbox oder CombBox nehmen!
Frage2: ...Irgendwie bekomme ich es nicht hin
Doppelklicken des Steuerelements in der UF Entwurfsmodus und ggf. entsprechendes Ereignis des Steuerelements rechts oben im DropDown auswählen.
GreetZ Renée
AW: Userform nach Eingabe in Textfeld schließen
02.03.2009 15:56:22
hary
Hallo Jakob
meinst du so was. Zugelassen sind nur zwei Grossbuchstaben.
https://www.herber.de/bbs/user/59927.xls
Gruss Hary
Anzeige
AW: Userform nach Eingabe in Textfeld schließen
02.03.2009 16:28:51
Jakob
Hallo Hary,
mit den CommandButton und den folgenden Code funktioniert das schließen der Userform nach der Betätigung der Entertaste:

Private Sub CommandButton1_Enter()
[G6] = Me.TxtLand.Value
Unload Landauswahl
End Sub


Der 2. code in Deiner Beispieldatei funktioniert dagegen nicht. Wenn ich diesen Code eingebe wird keine Eingabe im Textfeld "TxtLand" erlaubt.


Private Sub TxtLand_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Len(TxtLand)


Woran liegt das?
Gruß,
Jakob

Anzeige
AW: Userform nach Eingabe in Textfeld schließen
02.03.2009 16:37:11
hary
Hallo Jackob
Es sind nur Gross Buchstaben zugelassen.
Gruss Hary
AW: Userform nach Eingabe in Textfeld schließen
02.03.2009 16:00:20
Jakob
Hallo Renée,
Frage 2 haut immer noch nicht hin. Ich habe eine Userform mit den Namen "Land" und ein Textfeld Namens "TxtLand". Bei den Textfeld (rechte Maus/Code anzeigen) habe ich den folgenden Code eingegeben:

Private Sub TxtLand_Change()
[G6] = Me.TxtLand.Value
End Sub


Der Userform "Land" kann ich keinen Code hinzufügen, d.h. beim betätigen der Rechten Maus kommt kein Kontextmenü. Ich habe auch versucht an der Stelle wo ich den Code für das Textfeld eingebe folgenden Code einzugeben:


Private Sub Land_Enter()
Unload Land
End Sub


Das funktioniert aber nicht.
Was mache ich falsch?
Gruß,
Jakob

Anzeige
AW: Userform nach Eingabe in Textfeld schließen
02.03.2009 16:44:54
hary
Hallo Jackob
ich nochmal. Mit der EnterTaste hab ich noch nicht raus. Zugelassen sind nur Grossbuchstaben. Wenn Du nach dem zweiten Buchstaben nochmal auf einen Buchstaben drueckst, geht die Form zu und Eintrag in Zelle A1. Teste mal in einer leeren Mappe.
Nimm mal diesen Code:

Private Sub TxtLand_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Len(TxtLand)


Gruss Hary

AW: jetzt gehts mit Enter, getestet
02.03.2009 18:20:37
hary
Hallo Jakob
jetzt geht's. Brauchte 2ten Code fuer die Entertaste.

Private Sub TxtLand_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then
Cells(1, 1) = TxtLand        'Hier rein in welche Zelle der Inhalt soll
UserForm1.Hide
End If
End Sub
Private Sub TxtLand_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Len(TxtLand)


Gruss Hary

Anzeige
AW: jetzt gehts mit Enter, getestet
03.03.2009 09:19:19
Jakob
Hallo Hary,
perfekt.
Vielen Dank für Deine Hilfe.
Gruß,
Jakob

302 Forumthreads zu ähnlichen Themen

Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:33:59
Thread-ID: 1000866
3 Beiträge
Anzeige
formel vereinfachen
Bastian

guten morgen aus der schönen schweiz :)
ich habe mal wieder (aber ich lerne wirkich dazu, glaubt mir das bitte) ein problem.
ich habe eine formel gebastelt, die zwar funktioniert, die aber gleichzeitig ewig ewig lang ist.
diese würde ich gerne vereinfachen.
ich habe euch dazu ei...
15.08.2008 09:24:00
Thread-ID: 1002044
6 Beiträge
@ Tino - brauche Hilfe bei einer deiner Formeln
oblivion

Hallo, ich habe eine Frage an dich. Du hast mir die Formel erstellt in A16.
Ich habe die Datei mal hochgeladen und in Blatt "Beispiel" Spalte A etwas hereingeschrieben.
Danke für deine Hilfe.
Gruß Oblivion
https://www.herber.de/bbs/user/54685.zip
17.08.2008 21:06:00
Thread-ID: 1002466
4 Beiträge
Anzeige
Schreibschutz/bedingte Formatierung Makro
Tobi

Hallo,
Ich übertrage mit Hilfe eines Makros (IF-Funktion) Zahlen aus einem Tabellenblatt in ein anderes welches schreibgeschützt ist. Wenn die Bedingung in der Funktion nicht erfüllt wird dann überträgt es "blank" ("").
Die Zellen welche leer "blank" sind, färben sich dann mit Hilfe der...
20.08.2008 14:39:51
Thread-ID: 1003216
5 Beiträge
Excel Daten in HTML Formular übertragen
Johannes

Hallo,
ich bin über einen Thread in einem anderen Forum auf dieses Forum und zwei Threads gestoßen worden, bei denen sich besonders der User Tino als Super-Hilfe herauskristalisiert hat (und dafür ziemlich angeblafft wurde...), weshalb ich mir erhoffe hier bzgl. meines Problems Hilfe zu erh...
21.08.2008 13:48:00
Thread-ID: 1003473
7 Beiträge
Brüche mit kleiner Schrift formatieren
Siegfried

Hallo Excelianer,
der Betreff sagt sicher wenig aus. Ich möchte Zeiten, die auf Viertelstunden gerundet sind, als Brüche darstellen - soweit kein Problem. Jetzt hätte ich aber gern die Viertelstunden nicht in der Standardformatierung, also 1 1/4 z. B., sondern mit kleingeschriebenen Ziffern...
25.08.2008 11:32:00
Thread-ID: 1004409
7 Beiträge
ganze Zeile nach Bedingung formatieren
Tom

Hallo
wie kann ich denn ausgehend von der aktuellen Zeile diese mittels VBA formatieren.
Hintergrund:
Steht in Spalte N der Wert "Ja", dann ändere den Hintergund dieser Zeile von A bis R in grau ab (Interner Farbwert von Excel sollte 15 sein)
Wird diese Formatierung mittels VBA...
26.08.2008 14:48:36
Thread-ID: 1004813
3 Beiträge
Formel: Max in Verbindung mit Mehrfachabfrage
Peter

Hallo !
Folgende Frage:
wie kann ich in einer Mehrfachabfrage den größten (max.) Wert ziehen.
Anmerkung: Die Mehrfachabfrage bekomme ich gut hin, jedoch wenn ich in der einen Formel einen von der Abfrage eingeschränkten Bereich zusätzlich nach einer höchsten Nummer möchte, geht d...
28.08.2008 18:57:50
Thread-ID: 1005572
3 Beiträge
Anzeige

Links zu Excel-Dialogen

TextBox UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
4
5
3
2
4
6
6
2
2
10
4
4
3
2
2
6
5
1
2
1
3
2
3
6