Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1404to1408
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
Inhaltsverzeichnis

Frage zu SetFocus

Frage zu SetFocus
28.01.2015 09:08:01
Frank
Hallo und Guten Morgen, wünsche allen einen schönen Tag!
Mein Problem: Ich habe neulich folgenden Code hier im Forum erhalten:
For i = (ListBox2.ListCount - 1) To 0 Step -1
If Not ListBox2.List(i, 4) = "" Then
ListBox2.ListIndex = i
Exit For
End If
Next i
Das funzt auch bestens. Mir wird auich die entsprechende Zeile in derr ListBox markiert, aber ich möchte dennoch, dass der Cursor in TextBox7 übergeht, so dass der User gleich mit der Eingabe fortfahren kann.
Ich habe an den Code angefügt:
TextBox7 = ""
TextBox7.SetFocus
Das funzt aber leider nicht, weiss jemand Rat? Danke vorab!
Gruß Frank H.

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Frage zu SetFocus
28.01.2015 09:33:47
Klaus
Hallo Frank,
bei mir geht es, habe eine Testdatei gebaut und den Code benutzt:
Private Sub CommandButton1_Click()
For i = (ListBox2.ListCount - 1) To 0 Step -1
If Not ListBox2.List(i, 4) = "" Then
ListBox2.ListIndex = i
Exit For
End If
Next i
TextBox1 = ""
TextBox1.SetFocus
End Sub
Warum geht es bei dir nicht? Die Antwort liegt nicht in den gezeigten Codezeilen! Bitte die Datei hochladen, dann kann man den Fehler suchen gehen.
Grüße,
Klaus M.vdT.

AW: Frage zu SetFocus
28.01.2015 09:43:49
Frank
Hallo Klaus!
Hatte 'ne falsche Aktivierreihenfolge. Nun klappts! Danke!
Gruß Frank H.

Anzeige
Machmal steckt halt der Teufel im Detail! owT.
28.01.2015 09:49:03
Klaus
.

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige