Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
416to420
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
416to420
416to420
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

txt mit enter

txt mit enter
steff
Hallo
Kann mir jemand sagen, was an dem Code falsch ist:

Private Sub txt_spielername_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
If txt_spielername.Text = "" Then
Else
Worksheets("tabelle2").Cells(11, 1) = txt_spielername.Text
Worksheets("tabelle2").Cells(11, 2) = lbl_punktezahl.Caption
Range("A11:B11").Copy
Range("A12:B12").Select
ActiveSheet.Paste
Call ausgangsstellung
Call Modul1.sortieren
txt_spielername.Text = ""
txt_spielername.Visible = False
UF_bestenliste.Show
End If
End Sub

Bei drücken der Entertaste passiert nichts!
steff

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

Betreff
Benutzer
Anzeige
AW: txt mit enter
Andre
Hi Steff,
kann es vielleicht sein, dass du lediglich diese Box auf deiner Userform hast, restliche visible = false oder ähnliches.
Es kann nur funktionieren, wenn der Tab bei Enter in ein nächstes Steuerelement springen kann, ansonsten wird das Before_update-Ereignis nicht ausgeführt.
Gruß Andre
danke : )
steff
: )
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige