Mehrere Zeilen in eine Zeile schreiben

Computer: Software & Programmierung Office Software
1

Hallo Excel-Profis,

wie schaffe ich es, mehrere Daten aus Zeilen in die oberste Zeile automatisch zu schreiben, aber nur, wenn in der ersten Zeile links in der ersten Spalte auch eine Information enthalten ist.
Beispiel:

  1. Spalte 2. Spalte

  2. Zeile 111111 Heute ist ein

  3. Zeile schöner Tag, weil

  4. Zeile morgen Wochenende ist.

Aussehen soll es so:

  1. Spalte 2. Spalte

  2. Zeile 111111 Heute ist ein schöner Tag,…

Die Formel soll er aber nur anwenden, wenn die erste Zeile der ersten Spalte nicht leer ist.

Zu Eurer Info, das Tabellenblatt hat ca. 60.000 Zeilen (Schweiß!)

Danke für Eure Hilfe!

Gruß Novak

2

Ich denke was du suchst sind die Funktionen Wenn() und Verketten, und für die Bedingung Nicht Leer gibt es auch eine Funktion.

Gruss
Nils

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

3

Hi Novak,

Zu Eurer Info, das Tabellenblatt hat ca. 60.000 Zeilen
(Schweiß!)

Damit könntest Du Probleme bekommen, da Excel nur 255 Spalten zu läßt und die Anzahl der Zeichen pro Zelle auch beschränkt ist. Zumindest laufen die meisten Stringfunktionen nicht mehr, wenn in einer Zelle mehr als 256 Zeichen stehen.

Ansonsten könnte eine Makro etwa in dieser Form helfen:

Sub Zusammenkleben()
 Zeile = 2
 While Cells(Zeile,1).Formula ""
 Cells(1,1).Formula = Cells(1,1).Formula & Cells(Zeile,1).Formula
 Zeile = Zeile + 1
 wend
End Sub

Ciao

Uwe