Makro Zelleninhalte zusammenführen

Forumthread: Makro Zelleninhalte zusammenführen

29.07.2002 13:42:12

Heike

Hallo,
habe jetzt eine halbe Stunde das Archiv durchforstet, viele ähnliche Lösungen gefunden, aber leider keine, die genau auf mein Problem passt.

Ich habe zwei Spalten und würde die Inhalte dieser Spalten gerne zusammenführen in Spalte A.

Beispiel:
A B
test 1
test 2
test 3

soll werden

A
test 1
test 2
test 3

Zwischen den beiden Werten soll einfach nur ein Leerzeichen stehen.

Ich bräuchte dazu ein Makro, da ich die Zellinhalte weiterverwenden möchte, und keine Formel da stehen soll.

Möglichst sollte das Makro von A1 u. B1 bis zur letzten gefüllten Zeile durchlaufen.

Es wäre toll, wenn mir da jemand helfen könnte!

Merci,
Heike

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: Makro Zelleninhalte zusammenführen

29.07.2002 13:45:49

Frederik Fuhrmann

Hallo!

Verstehe dein Problem noch nicht ganz!

Inhalte aus 2 zellen in eine?

in zelle a1:
=b1&" "&c1

so vielleicht?

Re: Makro Zelleninhalte zusammenführen

29.07.2002 13:47:54

Heike

Ja richtig, die Werte aus A und B sollen zusammen durch ein Leerzeichen getrennt in A geschrieben werden.

Allerdings mit einem Makro, nicht mit einer Formel...

Viele Grüsse,
Heike

Re: Makro Zelleninhalte zusammenführen

29.07.2002 13:50:38

Frederik Fuhrmann

Hallo Heike!

Dann führe doch die Schritte aus, und zeichne das Makro dabei auf!

Gruß
F.

Re: Makro Zelleninhalte zusammenführen

29.07.2002 13:50:46

Otto Ecker

Hallo Heike,

Gruß otto

Re: Makro Zelleninhalte zusammenführen

29.07.2002 13:52:57

matthias

Dim x As String
Dim y As String

For a = 1 To 500 <- je nachdem wieviele werte...
x = Worksheets("Tabelle1").Range("A" & a)
y = Worksheets("Tabelle1").Range("B" & a)

Worksheets("Tabelle1").Range("A" & a).Formula = x & " " & y

Worksheets("Tabelle1").Range("B" & a).ClearContents

Next a

Re: Makro Zelleninhalte zusammenführen

29.07.2002 14:03:37

Mike E.

Hallo,

einen CommandButton auf das Tabellenblatt setzen und mit folgendem Code versehen (gesetzt, in Spalte A steht der 1.Teil des gewünschten Bereichs und in Spalte B der zweite)
Spalte C übernimmt dann die Zellinhalte mit gewünschtem Leerzeichen:

Private Sub CommandButton1_Click()
Range("a1").Select

i = 1
Cells(i, 1).Select

While Cells(i, 1) <> ""
Cells(i, 3) = Cells(i, 1) & " " & Cells(i, 2)
i = i + 1
Wend
End
End Sub

Gruß
Mike E.

Infobox / Tutorial

Zelleninhalte in Excel zusammenführen mit VBA

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Um die Inhalte von zwei Zellen in Excel zusammenzuführen, kannst Du ein einfaches VBA-Makro verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
Füge ein neues Modul hinzu: Klicke mit der rechten Maustaste auf „VBAProject (DeineDatei.xlsx)“ und wähle „Einfügen“ > „Modul“.

Kopiere den folgenden Code in das Modul:

Sub ZellenInhalteZusammenführen()
    Dim x As String
    Dim y As String
    Dim a As Long

    For a = 1 To 500 ' Passe die Anzahl der Zeilen nach Bedarf an
        x = Worksheets("Tabelle1").Range("A" & a).Value
        y = Worksheets("Tabelle1").Range("B" & a).Value

        Worksheets("Tabelle1").Range("A" & a).Value = x & " " & y
        Worksheets("Tabelle1").Range("B" & a).ClearContents
    Next a
End Sub

Schließe den VBA-Editor und kehre zurück zu Excel.
Führe das Makro aus: Drücke ALT + F8, wähle „ZellenInhalteZusammenführen“ und klicke auf „Ausführen“.

Mit diesem Makro werden die Inhalte aus den Spalten A und B zusammengeführt und in der Spalte A platziert.

Häufige Fehler und Lösungen

Fehler: „Laufzeitfehler 9: Index außerhalb des gültigen Bereichs“
- Lösung: Stelle sicher, dass der Blattname (z.B. „Tabelle1“) korrekt ist. Ändere den Namen im Code, falls nötig.
Fehler: Zellen bleiben leer
- Lösung: Überprüfe, ob die Zellen in Spalte A und B tatsächlich Werte enthalten. Das Makro löscht die Inhalte in Spalte B nach dem Zusammenführen.

Alternative Methoden

Wenn Du kein VBA-Makro verwenden möchtest, kannst Du auch Formeln nutzen. Zum Beispiel:

In Zelle A1:
```
=B1 & " " & C1
```
Dann ziehe die Formel nach unten, um die Inhalte aus den Zellen in der gesamten Spalte zusammenzuführen. Beachte jedoch, dass hier die Zellinhalte nicht wirklich zusammengeführt, sondern nur angezeigt werden.

Praktische Beispiele

Beispiel 1: Wenn in A1 "test" und in B1 "1" steht, wird das Ergebnis in A1 „test 1“ sein.
Beispiel 2: Wenn Du mehrere Zeilen hast, wie in Deinem Beispiel:

A B

test 1

test 2

test 3

Nach dem Ausführen des Makros wird A1 „test 1“, A2 „test 2“ und A3 „test 3“ enthalten.

A	B
test	1
test	2
test	3

Tipps für Profis

Makro anpassen: Du kannst das Makro so anpassen, dass es nur bis zur letzten gefüllten Zeile in Spalte A oder B geht, anstatt eine feste Anzahl von 500 Zeilen zu verwenden.
```
Dim lastRow As Long
lastRow = Cells(Rows.Count, 1).End(xlUp).Row
For a = 1 To lastRow
```
Fehlerbehandlung: Füge eine einfache Fehlerbehandlung hinzu, um sicherzustellen, dass Dein Makro auch bei unerwarteten Eingaben stabil läuft.

FAQ: Häufige Fragen

1. Wie kann ich das Makro anpassen, um mehr als zwei Zellen zusammenzuführen?
Du kannst einfach weitere Variablen deklarieren und die Logik im Makro entsprechend erweitern.

2. Funktioniert dieses Makro in allen Excel-Versionen?
Ja, das Makro sollte in Excel-Versionen ab 2007 funktionieren, solange Du VBA nutzen kannst.

3. Was passiert, wenn ich das Makro ausführe?
Die Inhalte in Spalte B werden gelöscht, um Platz für die zusammengeführten Inhalte in Spalte A zu schaffen.

Beliebteste Forumthreads (12 Monate)

Makro Zelleninhalte zusammenführen

Forumthread: Makro Zelleninhalte zusammenführen

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Infobox / Tutorial

Zelleninhalte in Excel zusammenführen mit VBA

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

Makro Zelleninhalte zusammenführen

Forumthread: Makro Zelleninhalte zusammenführen

6 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Infobox / Tutorial

Zelleninhalte in Excel zusammenführen mit VBA

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread