---

Geschrieben von Boaz am 23.06.2004 um 13:26:

  Cursor innerhalb eines Texfeldes platzieren?

Hallo,

ich habe ein kleines Problem, und zwar möchte ich den Cursor innerhalb eines Textfeldes platzieren. Das Programm wird in Excel mit VBA geschrieben. Durch einen Klick auf einen Button wird in ein Textfeld ein Wert aus zwei Zellen geschrieben, dies muss aber ggf. mehrmals wiederholt werden. Ich habe das so eingerichtet, dass der Text immer von oben kommt und eine Leerzeile Zwischen dem alten und dem neuen Text erstellt. Nun ist der Cursor aber immer dort, wo der letzte Text geschrieben wurde. Ich will aber, das er in der (mit dem Button) erstellten Leerzeile steht, damit der Anwender direkt losschreiben kann.

Hier der Code:

Private Sub CommandButton1_Click()

Dim Inhalt As String


Inhalt = TextBox2.Text

TextBox2.Text = vbCrLf & Range("m5").Value & " " & Range("m14").Value & ": " & vbCrLf & Inhalt


TextBox2.Activate

End Sub

Wäre super wenn Ihr mir helfen könntet!

Vielen Dank schon mal im vorraus!!!

MFG
Boaz

---

Geschrieben von Medusa am 23.06.2004 um 23:45:

 

da hilft die Eigenschaft SelStart des Textfeldes weiter. Wenn SelLength Null ist (Markierungs-Länge) und SelStart 5 ist (Markierungs-Beginn), dann steht der Cursor vor dem 5. Zeichen.

code: 1: 2: 3: text1.text="Hallo Hallo" text1.selLength=0 text1.selStart=cint(len(text1.text)/2)

hiermit wäre der Cursor in der Mitte der Zeile. Falls dir das nicht weiterhilft, kann ich dir auch ein Code-Beispiel, das konkret auf dein Problem eingeht, geben. Aber morgen, bin müde