Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Verketten von Zellen ohne leere Zellen

Forumthread: Verketten von Zellen ohne leere Zellen

Verketten von Zellen ohne leere Zellen
01.11.2003 22:07:31
R@iner
Hallo,

bei mit stehen von A1 bis L1 verschiedene Einträge:
A1 = 1
B1 = leere Zelle
C1 = leere Zelle
D1 = 2
E1 = 2
.
.
.
Nun würde ich gerne in M1 das ganze mit + zusammengefasst haben. Es sollte also stehen: 1 + 2 + 2 (keine Summe). Es sollen also alle leeren Zellen ignoriert werden und alle Zellen mit Betrag mit "+" verbunden werden.

MfG R@iner
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Verketten von Zellen ohne leere Zellen
01.11.2003 22:12:28
Josef Ehrensberger
Hi R@iner,

das selbe makro wie für Simone,
nur jetzt für Spalten.


Sub verketten()
Dim rng As Range
Dim trenner As String
trenner = " + "  'Trennzeichen
[M1].ClearContents   'Ausgabezelle
For Each rng In [A1:L1]
If rng <> "" Then
[M1] = [M1] & rng & trenner
End If
Next
[M1] = Mid([M1], 1, Len([M1]) - 1)  'letztes Trennzeichen entfernen
End Sub


Gruß Sepp
Anzeige
AW: Verketten von Zellen ohne leere Zellen
01.11.2003 22:18:50
Rainer
Servus Sepp,

das klappt. Habe nur bei letztes Trennzeichen entfernen aus -1 ein -2 machen müssen. Vielen Dank

Gruß R@iner
Danke für die Rückmeldung (o.T.)
01.11.2003 22:26:18
Josef Ehrensberger
/

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Zellen in Excel verketten und leere Zellen ignorieren


Schritt-für-Schritt-Anleitung

Um Zellen in Excel zu verketten und dabei leere Zellen zu ignorieren, kannst du ein einfaches VBA-Makro verwenden. Folge diesen Schritten:

  1. Öffne Excel und drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu starten.

  2. Klicke im VBA-Editor auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

  3. Kopiere den folgenden Code in das Modul:

    Sub verketten()
        Dim rng As Range
        Dim trenner As String
        trenner = " + "  'Trennzeichen
        [M1].ClearContents   'Ausgabezelle
        For Each rng In [A1:L1]
            If rng <> "" Then
                [M1] = [M1] & rng & trenner
            End If
        Next
        [M1] = Mid([M1], 1, Len([M1]) - Len(trenner))  'letztes Trennzeichen entfernen
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Drücke ALT + F8, wähle das Makro verketteten aus und klicke auf Ausführen.

Das Ergebnis wird in Zelle M1 angezeigt und verknüpft alle nicht leeren Zellen von A1 bis L1 mit einem "+".


Häufige Fehler und Lösungen

  • Problem: Das Makro funktioniert nicht.

    • Lösung: Stelle sicher, dass die Makros in Excel aktiviert sind. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center > Makroeinstellungen und wähle die Option, die Makros aktiviert.
  • Problem: Das letzte Trennzeichen wird nicht entfernt.

    • Lösung: Überprüfe die Zeile, die das letzte Trennzeichen entfernt. Stelle sicher, dass du die Länge des Trennzeichens korrekt abziehst.

Alternative Methoden

Wenn du kein VBA verwenden möchtest, kannst du auch die Formel TEXTVERKETTEN in Excel 365 oder Excel 2021 nutzen, um Zellen zu verketten und leere Zellen zu ignorieren:

=TEXTVERKETTEN(" + "; WAHR; A1:L1)

Diese Formel ermöglicht es dir, die leeren Zellen automatisch zu ignorieren, ohne dass ein Makro erforderlich ist.


Praktische Beispiele

Angenommen, du hast folgende Werte in den Zellen A1 bis L1:

  • A1: 1
  • B1: (leer)
  • C1: (leer)
  • D1: 2
  • E1: 2

Nach dem Ausführen des Makros oder der Verwendung der TEXTVERKETTEN-Formel sollte in M1 folgendes angezeigt werden:

1 + 2 + 2

Dies zeigt, dass alle leeren Zellen erfolgreich ignoriert wurden.


Tipps für Profis

  • Nutze das Makro für größere Datenmengen, um Zeit zu sparen.
  • Passe das Trennzeichen im Makro an, um verschiedene Formate zu verwenden, z.B. ein Komma oder ein Semikolon.
  • Teste die Funktionalität mit verschiedenen Zellbereichen, um sicherzustellen, dass das Makro robust ist.

FAQ: Häufige Fragen

1. Frage
Wie kann ich das Makro anpassen, um Daten aus anderen Zeilen zu verketten?
Antwort: Ändere einfach den Zellbereich in der For Each-Schleife, z.B. von [A1:L1] zu [A2:L2].

2. Frage
Kann ich das Makro auch für Spalten verwenden?
Antwort: Ja, passe den Zellbereich entsprechend an, z.B. [A1:A12], um die Zellen in einer Spalte zu verketten.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige