Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zellinhalt von diversen Zellen in Textbox einlesen

Forumthread: Zellinhalt von diversen Zellen in Textbox einlesen

Zellinhalt von diversen Zellen in Textbox einlesen
11.07.2003 12:58:36
Pius
Hallo
Mit folgendem Code blende ich nur bestimmte Zeilen ein
Dim c As Range
Rows("2:1000").Select
Selection.EntireRow.Hidden = True
Range("A2:A1000").Select
For Each c In Selection
If c.Value = Sheets("Kundenliste").Range("L2") Then _
Rows(c.Row).EntireRow.Hidden = False
Next c
Wie kann ich nun aus den allen Eingeblendeten Zeilen die Werte von Spalte H2:H50 in einer Textbox einlesen. Wenn möglich pro Zellinhalt eine Zeile in der Textbox.
Danke
Gruss Pius
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellinhalt von diversen Zellen in Textbox einlesen
11.07.2003 13:12:49
Markus L
Hallo Pius,
erstelle ein UserForm mit Namen frmTest
erstelle darin eine Textbox mit Namen txtZeilen
setze die Eigenschaft MultiLine der Textbox auf True
Benutze folgenden Code:

Sub Test()
Dim strZeilen As String
Range("A2:A1000").Select
For Each c In Selection
If c.EntireRow.Hidden = False Then
strZeilen = strZeilen & Range("H" & c.Row) & vbLf
End If
Next c
frmTest.txtZeilen = strZeilen
frmTest.Show
End Sub


Anzeige

Forumthreads zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige