2 Sätze in Textbox mit "und" verbinden
03.05.2022 16:20:27
Hans-Jörg
ich habe hoffentlich eine einfache Frage.
Ich habe eine Textbox, die mit verschiedenen Buttons nacheinander Textbausteine in die Textbox gibt.
Ablaufbeispiel:
Text in Textbox übertragen: Du hast sehr motiviert mitgearbeitet.
Dann füge ich mit folgenden Code ein "und" ein und lösche den Punkt.
Private Sub Textverbindung_Click()
TextBox1 = Replace(TextBox1.Value, ".", "")
Me.TextBox1.SelText = "und "
End Sub
Du hast sehr motiviert mitgearbeitet und Deine Arbeitsaufgaben hast du erfüllt.
Jetzt steht mir nur noch das große "D" am Satzanfang zweiter Satz im weg, welches klein sein muss. Und dafür hätte ich gerne eure Hilfe oder Ideen.
1. Code um Cursor nach dem "und" zu setzen, damit man einfach mit Tast Entf das "D" löschen und kleines eingeben kann
2. Besser wäre das "D" nach dem "und" mit einem Code gleich markieren zu können.
3. absolut ideal wäre eine Code das "D" automatisch klein machen zu können.
Wie immer bin ich sehr dankbar für Ideen und Vorschläge!
Grüße
Hans-Jörg