PDA

Vollständige Version anzeigen : Set Focus Befehl


espresso
03.10.2016, 08:16
Hallo,

ich bräuchte bitte eure Hilfe für einen „.SetFocus“ Befehl.

Ich Starte per Button eine Userform in der sich eine Text Box befindet und diese
Textbox ( die 2 zeilig ist ) wird automatisch mit 2 „ - „ gefüllt die untereinander stehen.
Mit diesem Befehl

TBox1 = "-" & vbCrLf & "-"


das passt auch soweit.

Nun möchte ich das in der 1. Zeile der „-„der Focus liegt und mit der nächsten Eingabe
der „-„ automatisch überschrieben wird, mit :

With Me.TBox1
.SetFocus
.SelStart = 0
.SelLength = Len("-") '(.text)
End With


klappt dies leider nicht.

Der Eingabebalken ( Cursor / Focus) erscheint immer in der 2. Zeile und am Ende.



Vielen Dank schon mal und einen Schönen Feiertag
Espresso

PS: Excel 2003

RPP63neu
03.10.2016, 08:58
Moin!
Mein Test funktioniert problemlos:
<pre style='border:thin solid #000000; padding:12px 24px; margin-left:12px; color:#000000'><span style='color:#0000EE'>Private</span> <span style='color:#0000EE'>Sub</span> UserForm_Initialize() <span style='color:#0000EE'>With</span> TextBox1 .Value = <span style='color:#FF0000'>&quot;-&quot;</span> & vbCrLf & <span style='color:#FF0000'>&quot;-&quot;</span> .SetFocus .SelStart = <span style='color:#FF0080'>0</span> .SelLength = <span style='color:#FF0080'>1</span> <span style='color:#0000EE'>End</span> <span style='color:#0000EE'>With</span> <span style='color:#0000EE'>End</span> <span style='color:#0000EE'>Sub</span></pre>

Gruß Ralf

espresso
03.10.2016, 09:27
Hallo Ralf,

Danke,

aber es blinkt kein Eingabebalken und es ist auch kein "-" farbig hinterlegt so das man weiß wo die Eingabe erfolgen würde.

Habs durchs rumprobieren mit deinem Code jetzt doch hinbekommen .

Den Befehl hab ich bei dem CommandButton Eingefügt der die Userform startet.


Private Sub CommandButton8_Click()
Materialschein.Show
With Materialschein.TBox1
.Value = "-" & vbCrLf & "-"
.SetFocus
.SelStart = 0
.SelLength = 1
End With
End Sub



Danke nochmal und einen Schönen Feiertag

Luschi
03.10.2016, 11:02
Hallo espresso,

bei mir aber schon, siehe Anhang.

Gruß von Luschi
aus klein-Paris