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

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

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

317 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige