Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
484to488
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
484to488
484to488
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Jeder Wert in Textbox in neue Zeile, aber wie ?

Jeder Wert in Textbox in neue Zeile, aber wie ?
15.09.2004 08:06:44
Stefan
Guten Morgen zusammen,
habe schon eine Frage an Euch. Ich übergebe mehrere Werte an eine Tabellenblatt-Textbox. Jedoch werden die Werte alle in die erste Zeile geschrieben, d.h. jeder Wert wird mit dem nächsten überschrieben.
Kann man nach jedem Wert ein Enter für eine neue Zeile senden, sodaß die Werte untereinander stehen ?
Danke Euch für die Hilfe.
Gruß Stefan

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Jeder Wert in Textbox in neue Zeile, aber wie ?
15.09.2004 08:29:54
Josef
Guten Morgen,
versuch´s mal mit
ActiveCell.Offset(0, 1).Value = .TextBox2.Value
Gruß
Josef
AW: Jeder Wert in Textbox in neue Zeile, aber wie ?
15.09.2004 08:52:04
Stefan
Hallo Josef,
danke für die Antwort. Funktioniert aber nicht, oder ich habe es nicht an der richtigen Stelle eingebaut. Nachfolgend mal mein Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "D70" Then
Dim i As Integer
Dim k As Integer
Range("E70:E80") = ""                       'Ausgabebereich leeren
k = 1                                       'Zeile für Ausgabe
Do While Cells(k, 1) <> ""
k = k + 1
Loop
For i = 1 To k
If Cells(i, 1) = Range("D70") Then          'wenn Spalte A = Suchfeld
With ActiveSheet.Shapes("Text Box 7")
.TextFrame.Characters.Text = Cells(i, 2)    'Übergabe Zellwert an Textbox
End With
End If
Next i
End If
End Sub

An der Stelle 'Übergabe an Textbox müßte irgendwas hin, was ein Return oder so erzeugt.
Gruß Stefan
Anzeige

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige