Anzeige
Archiv - Navigation
756to760
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
756to760
756to760
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Zwei Zellen vereinen
21.04.2006 13:31:58
Franz
Hallo zusammen,
kann mir einer von euch vielleicht sagen, wie ich zwei Zellen vereinen kann?
Bsp.:
Spalte1 Spalte2
1 234
Ergebnis:
Spalte1
1234
also die Werte nicht zusammenrechnen, sondern einfach hintereinander schreiben. Vielen Dank für eure Hilfe, Gruß, Franz

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

Betreff
Datum
Anwender
Anzeige
AW: Zwei Zellen vereinen
21.04.2006 13:33:47
Franz
Uuups, da hat sich beim Speichern leider etwas verschoben.
Unter Spalte1 soll lediglich 1 stehen und unter Spalte2 234, vereinigt dann 1234.
Danke
AW: Zwei Zellen vereinen
21.04.2006 13:35:19
Solaiman
Hallo Franz,
nichts einfacher als das ;-)
Beispiel:
A1 = 1
B1 = 234
C1 = "=A1 & B1"
Bei C1 die Anführungszeichen nicht eingeben nur =A1 & B1
Gruß
Solaiman
AW: Zwei Zellen vereinen
21.04.2006 14:31:45
Franz
Hi Solaiman :-)
Vielen Dank für die schnelle Antwort :-)))) Ich würde diese Anweisung gerne in ein Makro einbauen. Die Werte in der Spalte A und Spalte B sollen in der Spalte C zusammengeführt werden. Gibt es eine Möglichkeit dies per Makro so lange durchführen zu lassen bis in den Spalten A und B keine Werte mehr enthalten sind? vielen Dank!!!! Gruss
Anzeige
AW: Zwei Zellen vereinen
21.04.2006 14:54:05
Eule
Hi Franz
hier eine Möglichkeit

Sub zusammen()
Dim tbl
Range("A1").Select
Set tbl = ActiveCell.CurrentRegion
tbl.Offset(0, 2).Resize(tbl.Rows.Count, 1).FormulaR1C1 = "=RC[-2]&RC[-1]"
End Sub

Gruss Eule
AW: Zwei Zellen vereinen
21.04.2006 16:14:53
Solaiman
Hallo Franz,
hier noch eine VBA Lösung aber ohne Formel!!!
'-------------------------------------------------

Sub Verketten()
Dim Wks As Worksheet
Dim letzteZeile As Integer
Set Wks = Worksheets("Tabelle1")
letzteZeile = Wks.Range("A1").End(xlDown).Row
For i = 1 To letzteZeile
With Wks
.Range("C" & i) = Range("A" & i) & Range("B" & i)
End With
Next i
End Sub

'-------------------------------------------------
Gruß
Solaiman
Anzeige
AW: Zwei Zellen vereinen
21.04.2006 16:33:30
Franz
Hab die Makros zwar noch nicht ausprobiert, aber vielen Dank schon mal an alle, die geantwortet haben. Schönes WE

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige