Text aus allen markierten Zellen in Textbox zeigen

Guten Tag an alle ...

mit diesem Code wird der Text aus allen markierten Zellen in der Textbox, mit Zeilenumbruch, der Userform gezeigt. Das funktioniert.
Hier wird der markierte Zellbereich leider auf 3 Zellen beschränkt.

Wie muss der Code lauten, dass keine Beschränkung auf 3 Zellen besteht, sondern alle markierten Zellen genutzt werden und auch jeweils der Text dann, auch mit Zeilenumbruch, in er Textbox angezeigt wird?

Mit der Bitte um Hilfe, und Gruß
Dieter(Drummer)

Mein jetziger Teil-Code:

 If Selection.Count = 3 Then

      tb1 = "Zelltext: " & Selection(1) & Chr$(10) & Selection(2) & Chr$(10) & Selection(3)

   End If

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Infobox zum Thema

EXCEL - Text aus allen markierten Zellen in Textbox zeigen

Die Fragestellung

Du möchtest den Text aus allen markierten Zellen in einer Excel-Tabelle in einer Textbox anzeigen lassen.

Erläuterung des Problems {#erläuterung-des-problems}

In Excel gibt es keine eingebaute Funktion, um den Inhalt mehrerer ausgewählter Zellen direkt in einer Textbox anzuzeigen. Dies kann jedoch mit einem VBA-Makro erreicht werden, das den Inhalt jeder ausgewählten Zelle sammelt und in einer Textbox zusammenführt.

Lösung des Problems {#lösung-des-problems}

Um den Text aus allen markierten Zellen in einer Textbox anzuzeigen, kannst du das folgende VBA-Makro verwenden:

Sub ShowSelectedCellsText()
    Dim rng As Range
    Dim cell As Range
    Dim strText As String

    ' Überprüfe, ob Zellen ausgewählt sind
    If Not Selection Is Nothing Then
        Set rng = Selection

        ' Sammle den Text aus jeder Zelle
        For Each cell In rng
            strText = strText & cell.Text & vbCrLf
        Next cell

        ' Zeige den gesammelten Text in einer Message Box an
        MsgBox strText
    Else
        MsgBox "Bitte markiere zuerst die Zellen, deren Text angezeigt werden soll."
    End If
End Sub

Um dieses Makro zu verwenden:

Drücke ALT + F11, um den VBA-Editor zu öffnen.
Wähle Einfügen > Modul, um ein neues Modul zu erstellen.
Kopiere den oben stehenden Code in das Modul.
Schließe den VBA-Editor und gehe zurück zu Excel.
Markiere die Zellen, deren Text du anzeigen möchtest.
Führe das Makro aus, indem du ALT + F8 drückst, das Makro ShowSelectedCellsText auswählst und auf Ausführen klickst.

Anwendungsbeispiele aus der Praxis

Kommentare sammeln: Schnelles Sammeln von Feedback oder Kommentaren aus einer Liste von Zellen.
Datenzusammenfassung: Erstellen einer Zusammenfassung von Daten aus verschiedenen Zellen für einen Bericht.

Tipps

Du kannst den Text auch in einer UserForm-Textbox anzeigen lassen, wenn du eine interaktive Benutzeroberfläche bevorzugst.
Achte darauf, dass die Textbox groß genug ist, um den gesamten Text anzuzeigen, oder füge Scrollbalken hinzu.

Zusammenfassung

Die Anzeige von Text aus markierten Zellen in einer Textbox kann in Excel mit einem VBA-Makro realisiert werden. Dieses Makro durchläuft alle ausgewählten Zellen und sammelt ihren Inhalt, um ihn dann in einer Message Box oder einer UserForm-Textbox anzuzeigen. Dies ist besonders nützlich, um Daten aus mehreren Zellen schnell zu extrahieren und in einem zusammengefassten Format darzustellen.

Beliebteste Forumthreads (12 Monate)

Text aus allen markierten Zellen in Textbox zeigen

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

315 Forumthreads zu ähnlichen Themen

Links zu Excel-Dialogen

Infobox zum Thema

EXCEL - Text aus allen markierten Zellen in Textbox zeigen

Inhaltsverzeichnis

Die Fragestellung

Erläuterung des Problems {#erläuterung-des-problems}

Lösung des Problems {#lösung-des-problems}

Anwendungsbeispiele aus der Praxis

Tipps

Verwandte Themenbereiche

Zusammenfassung

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Text aus allen markierten Zellen in Textbox zeigen

4 Beiträge zum Forumthread Beiträge zu diesem Forumthread

315 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Infobox zum Thema

EXCEL - Text aus allen markierten Zellen in Textbox zeigen

Inhaltsverzeichnis

Die Fragestellung

Erläuterung des Problems {#erläuterung-des-problems}

Lösung des Problems {#lösung-des-problems}

Anwendungsbeispiele aus der Praxis

Tipps

Verwandte Themenbereiche

Zusammenfassung

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread