Collapse column

Autor Thema: Office 2010: Formel/Makro: Mehrere Zellen einer Spalte bis zur nächsten leeren Zelle kopieren  (Gelesen 2541 mal)

Offline Sgt_Maverick

  • Newbie
  • *
  • Beiträge: 5
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Ohne
  • Version [Office] : Office 2010
Hallo zusammen :)

Ich bin am verzweifeln und hoffe, dass mir da jemand helfen kann, denn Google konnte es leider nicht.

Sachverhalt:
Ich habe mehrere E-Mails mit Unterhaltungen, welche ich gerne im Excel zusammenfassen möchte. Das heisst ich bin mittlerweile so weit, dass ich die ganze Unterhaltung einer E-Mail ins Excel kopieren kann und dann alles was ich nicht benötige, wie zum Beispiel "Betreff", "Datum", "Zeit", etc. entfernt wird und mir in Spalte A der Absender und in Spalte B der Text angezeigt wird. Dies sieht dann so aus:

A1 Name1  B1 Super, mir auch danke
A2             B2 was machst du heute abend?
A3             B3 wollen wir was unternehmen?
A4             B4
A5 Name2  B5 Hallo
A6             B6 Mir geht es gut, danke
A7             B7 und dir?
A8             B8
A9 Name1  B9 Guten Morgen
A10           B10 Wie geht es dir?

Da die neuste Nachricht immer zu oberst erscheint, muss ich das ganze nun umkehren. Doch da die einzelnen Textzeilen von der E-Mail auch im Excel in einzelnen Zeilen dargestellt wird und ich dann alles umkehren würde, würde der Verlauf dann wie folgt aussehen:

Wie geht es dir?
Guten Morgen

und dir?
Mir geht es gut, danke
Hallo

usw...

Gesuchte Lösung:
Ich suche somit eine Formel oder eher ein Makro welches mir automatisch B1-B3 in (zum Beispiel) C1 kopiert, dann B5-B7 in C2 kopiert, dann B9-B10 in C3 kopiert, usw.

Hinweise/Ideen:
Logisch könnte man das ganze manuell kopieren oder in jede Zelle von C eine Formel schreiben, doch da ich über 100 E-Mails habe, müsste das nächste Mal vielleicht nicht B1-B3 in C1 kopiert werden sondern B1-B5.

Da es zwischen jedem Textblock wieder eine Leere Zeile hat, dachte ich, dass es vielleicht eine Möglichkeit gibt dass man sagen kann: Kopiere von B1 bis zur nächsten leeren Zelle in B nach C1, dann kopiere von der ersten leeren Zelle in B bis zur nächsten leeren Zelle in B nach C2, dann von der zweiten leeren Zelle in B bis zur dritten leeren Zelle in B nach C3, usw...


Ich hoffe, dass mir jemand helfen kann und bin euch jetzt schon für jeden Tipp extrem Dankbar  :)
Sgt_Maverick

Keine Lösung gefunden? Du kannst Dich gerne an unser erfahrenes Experten-Team wenden und Dein Anliegen in Auftrag geben.
>>> Schnell und einfach ein unverbindliches Angebot anfordern. Per E-Mail an anfrage@excel-inside.de oder per Online-Formular
<<<

!!! Wichtige Information
!!! Dieses Forum steht aus technischen Gründen ab dem 11. September 2019 nur noch im Lesemodus zur Verfügung.
Das NEUE Office-Fragen-Forum kannst du aber unter der gewohnten Domain https://office-fragen.de wie gewohnt nutzen.

- Wir freuen uns auf deinen Besuch im neuen Forum.

Offline Sgt_Maverick

  • Newbie
  • *
  • Beiträge: 5
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Ohne
  • Version [Office] : Office 2010
Hmmm... sieht aus als könnte mir niemand helfen  :'(

Ist das Problem unlösbar oder habe ich es zu kompliziert beschrieben?  ;D

Offline DL

  • Hero Member
  • *****
  • Beiträge: 808
  • {Irrtum / Versuch * Glaskugel}
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Mittelmäßig
  • Version [Office] : Office 2016
Wir sehen uns!
... Detlef
Eine Mustertabelle hilft beim Helfen.
Excel Super-Funktionen: VERWEIS(), INDEX(), WAHL()

Offline Sgt_Maverick

  • Newbie
  • *
  • Beiträge: 5
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Ohne
  • Version [Office] : Office 2010
Hallo Detlef

Danke für den Link, doch leider funktioniert dies bei mir nicht, da es sich bei mir um Text und keine Zahleninhalte handelst. Somit gibt es keine logischen Reihenfolgen, welche man nutzen könnte.

Liebe Grüsse
Sgt_Maverick

Offline DL

  • Hero Member
  • *****
  • Beiträge: 808
  • {Irrtum / Versuch * Glaskugel}
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Mittelmäßig
  • Version [Office] : Office 2016
Hallo

Wenn ich mir deine Anfrage noch mal durchlese bin ich mir nicht sicher ob es dir jetzt um eine Sortierung oder um eine Verkettung geht der Texte geht.
Wir sehen uns!
... Detlef
Eine Mustertabelle hilft beim Helfen.
Excel Super-Funktionen: VERWEIS(), INDEX(), WAHL()

Keine Lösung gefunden? Du kannst Dich gerne an unser erfahrenes Experten-Team wenden und Dein Anliegen in Auftrag geben.
>>> Schnell und einfach ein unverbindliches Angebot anfordern. Per E-Mail an anfrage@excel-inside.de oder per Online-Formular
<<<

!!! Wichtige Information
!!! Dieses Forum steht aus technischen Gründen ab dem 11. September 2019 nur noch im Lesemodus zur Verfügung.
Das NEUE Office-Fragen-Forum kannst du aber unter der gewohnten Domain https://office-fragen.de wie gewohnt nutzen.

- Wir freuen uns auf deinen Besuch im neuen Forum.

Offline Sgt_Maverick

  • Newbie
  • *
  • Beiträge: 5
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Ohne
  • Version [Office] : Office 2010
Hallo

Wenn ich mir deine Anfrage noch mal durchlese bin ich mir nicht sicher ob es dir jetzt um eine Sortierung oder um eine Verkettung geht der Texte geht.

Hallo Detlef

Es geht darum, dass ich so zu sagen verschiedene Textblöcke habe, welche ich in der Reihenfolge umkehren möchte.
Hier nochmals ein Beispiel:

A1: Super, das freut mich, mir geht es auch gut danke.
A2: schön, was hab ihr dann unternommen?
A3:
A4: Hallo.
A5: Mir geht es gut danke und selber?
A6: Ja, es war ein super Abend.
A7:
A8: Hallo wie geht es dir?
A9: hattest du gestern noch einen schönen Abend?


Nun möchte ich die Konversation umkehren, doch so, dass die Blöcke zusammen bleiben und folgende Reihenfolge haben:
B1=A8: Hallo wie geht es dir?
B2=A9: hattest du gestern noch einen schönen Abend?
B3=-
B4=A4: Hallo.
B5=A5: Mir geht es gut danke und selber?
B6=A6: Ja, es war ein super Abend.
B7=-
B8=A1: Super, das freut mich, mir geht es auch gut danke.
B9=A2: schön, was hab ihr dann unternommen?


Ich hoffe ich konnte es nun etwas verständlicher aufzeigen.
Danke für Deinen Einsatz :D

Offline DL

  • Hero Member
  • *****
  • Beiträge: 808
  • {Irrtum / Versuch * Glaskugel}
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Mittelmäßig
  • Version [Office] : Office 2016
Die Daten beginnen in Zeile 2. A2 ist leer, ab A3 beginnt der erste Text.
B2
=WENN(A2="";B1+1;B1)-ZEILE()%%C2
=RANG.GLEICH(B2;$B$2:$B$11;0)D2
=INDEX($A$2:$A$11;C2)&""
Wir sehen uns!
... Detlef
Eine Mustertabelle hilft beim Helfen.
Excel Super-Funktionen: VERWEIS(), INDEX(), WAHL()

Offline lupo1

  • Sr. Member
  • ****
  • Beiträge: 250
    • Profil anzeigen
  • Office-KnowHow: Anfänger
  • VBA-KnowHow- : Ohne
  • Version [Office] : Office 2010
War das evtl. verdreht, DL?
« Antwort #7 am: Dezember 20, 2016, 17:48:17 Nachmittag »
Daten ab Zeile 2

B2: =B1-(A1="")+1%% entlangkopieren

Wenn fertig, Formel mit Werten überkopieren und nach B sortieren
MfG Lupo1 (und natürlich gern auch Hallo!)

Offline Sgt_Maverick

  • Newbie
  • *
  • Beiträge: 5
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Ohne
  • Version [Office] : Office 2010
WOW! Ihr seid der Hammer!! Danke euch 1000 Mal :D

Habe in B2 die Formel von lupo 1 und in C2/D2 die Formel von DL verwendet, denn mit der Formel in B2 von DL hat es mir die leeren Zeilen nicht korrekt übernommen.

Jetzt funktioniert es aber perfekt und ich möchte euch nochmals 1000 mal danke sagen :)

Keine Lösung gefunden? Du kannst Dich gerne an unser erfahrenes Experten-Team wenden und Dein Anliegen in Auftrag geben.
>>> Schnell und einfach ein unverbindliches Angebot anfordern. Per E-Mail an anfrage@excel-inside.de oder per Online-Formular
<<<

!!! Wichtige Information
!!! Dieses Forum steht aus technischen Gründen ab dem 11. September 2019 nur noch im Lesemodus zur Verfügung.
Das NEUE Office-Fragen-Forum kannst du aber unter der gewohnten Domain https://office-fragen.de wie gewohnt nutzen.

- Wir freuen uns auf deinen Besuch im neuen Forum.