Thema Datum  Von Nutzer Rating
Antwort
Rot Antwort für Karl - Textbox...
 31.12.2008 10:36:22 jh
NotSolved
31.12.2008 13:01:56 Holger
NotSolved

Ansicht des Beitrags:
Von:
jh		 Datum:
31.12.2008 10:36:22		 Views:
1709		 Rating:
     
Antwort:
  Ja
Thema:
Antwort für Karl - Textbox...
Hallo

Leider gab es beim Versuch, auF deine Frage zu antworten, eine
Fehlermeldung, deshalb die Antwort auf diesem Wege:

Voraussetzung für die korrekte Funktion ist, dass für die betreffende
Textbox MultiLine und WordWrap = True ist.

Private Sub CommandButton1_Click()
If TextBox1.TextLength > 0 Then
TextBox1.Value = TextBox1.Value & vbCrLf
End If
' Zeilenumbruch nur einfügen, wenn in der Box schon etwas steht
TextBox1.Value = TextBox1.Value & "Wert für Button 1"
End Sub

Und so weiter für alle existierenden Buttons. Wenn du den Inhalt der
Textbox später in eine Excel-Tabelle einfügen willst, musst du das so
tun:

Cells(z, s).Value = Replace(TextBox1.Value, vbCrLf, vbLf)

Der Grund dafür ist, dass der Zeilenumbruch in der Zelle nur mittels
vbLf vorgenommen wird, vbCr wird als "druckbares" Zeichen behandelt
und erscheint als kleines Kästchen. Für die Zielzelle muss dann
natürlich auch der Zeilenumbruch aktiviert werden, (Format - Zellen -
Ausrichtung) oder per VBA:

Cells(z, s).WrapText = True

Gruß (und guten Rutsch!)


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Antwort für Karl - Textbox...
 31.12.2008 10:36:22 jh
NotSolved
31.12.2008 13:01:56 Holger
NotSolved