Supportnet / Forum / Tabellenkalkulation

Hallo, ich habe folgendes Problem: Ich soll in einer Spalte Text aus verschiedenen Spalten zusammenführen. Das heisst, das ein in der Spalte vorhandener Text nicht überschrieben sonder angehängt werden soll. Ist so was überhaupt möglich? Windows 2000, Excel 2000. Vielen Dank für Eure Antworten. MfG Der (Stirn)Krause Karl

hi karl :)

tastet das zeilenende automatisch ab und aendert folgendes zur zeit

zelle A1 bis ermitteltes zeilenende wird ersetzt durch A1+C1+D1

gruss nighty

Sub makro01()
Application.EnableEvents = False
Set LastCell = ActiveSheet.Cells.SpecialCells(xlLastCell)
alta = LastCell.Row
a = LastCell.Row
Do While Application.CountA(Rows(a)) = 0 And a <> 1
a = a - 1
Loop
alta = a
altb = LastCell.Column
lzeile = alta
With Worksheet
For t1 = 1 To lzeile
Cells(t1, 1) = Cells(t1, 1) & Cells(t1, 3) & Cells(t1, 4)
Cells(t1, 3) = ""
Cells(t1, 4) = ""
Next t1
End With
Application.EnableEvents = True
End Sub

Hi nighty,

vielen Dank für Deinen Tipp.
Ich weiss nur nicht so genau, wie und was ich damit machen kann, soll, darf.
Bitte hilf mir noch ein bischen weiter.

Danke.

MfG

Karl (nicht mehr Stirn)Krause

meinst du so etwas?
A1 = Guten
B1 = Tag
C1 = Guten Tag Formel: =A1&" "&B1
Gruß

=A1&B1&C1&D1


Alle Zellen Auf standard format stellen u gegebennenfalls noch in die formel leerzeichen einfügen!!!!


MFG

hi karl :)

das makro ist einzufuegen extras/makro/visual basic-editor/

im vbeditor

einfuegen/modul

hier das vorher kopierte makro einfuegen,erst speichen,dann makro ausfuehren

diese zeile werden die zellen zusammengefuegt

bei diesem befehl Cells(t1, 1)
ist dier erste 1 die zeile und die zweite die spalte
Cells(t1, 1) = Cells(t1, 1) & Cells(t1, 3) & Cells(t1, 4)

so kannst du noch mehr ranhaengen,zeile ist automatisch bis ende,spalte hier die 3 waere spalte C

& Cells(t1, 3)

in den drauffolgenden zeilen werden die zur zeit C1+D1 nach zusammensetzung geloescht
Cells(t1, 3) = ""
Cells(t1, 4) = ""

oder sag deine spalte an :)

oder schick mir beispieltabelle :)

gruss nighty

Hallo an alle,

bin ganz überrascht von der Hilfsbereitschaft hier. Hat mit sehr weitergeholfen.
Recht herzlichen Dank an alle.

MfG

Karl

• Text läuft über Spalten ium Word hinaus!
• Excel: Text in Spalten
• Excel: Text zu Spalten
• Excel: Text zu Spalten
• MS Access - kann ich Spalten "automatisch" mit gleichem Text füllen?