Supportnet / Forum / Tabellenkalkulation
Ausgewählte Daten in einer neuen Tabelle zusammenfassen
Frage
Hallo,
ich habe in der Tabelle 1 hunderte Zeilen von Daten und möchte in einer Tabelle 2 nur ausgewählte Datenzeilen direkt untereinander schreiben lassen. Hat jemand ne Ahnung, wie man das eventuell hinbekommen kann?
Tabelle1
| A | B
1 | x | Daten 1
2 | | Daten 2
3 | | Daten 3
4 | x | Daten 4
5 | | Daten 5
6 | | Daten 6
Tabelle2
| A
1 | Daten 1
2 | Daten 4
Antwort 1 von coros
Hallo,
mit nachfolgendem Makro sollte das realisiert sein, was u Dir vorgestellt hast. Kopiere nachfolgendes Makro in ein StandardModul und starte es z.B. über eine Befehlsschaltfläche.
Ich hoffe, Du kommst klar. Bei Fargen melde Dich wieder.
Solltest Du nicht wissen, wie Du den Code in Deine Datei bekommst, dann schau mal auf meiner HP in der Rubrik Anleitungen und dort dann in der Anleitungsnummer 3 nach. Dort stelle ich dazu eine bebilderte Anleitung zur Verfügung, die Dir sicherlich helfen wird.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
mit nachfolgendem Makro sollte das realisiert sein, was u Dir vorgestellt hast. Kopiere nachfolgendes Makro in ein StandardModul und starte es z.B. über eine Befehlsschaltfläche.
Option Explicit
Sub Auswerten_kopieren()
Dim i As Integer
Application.ScreenUpdating = False
For i = 1 To Range("A65536").End(xlUp).Row
If Cells(i, 1) = "X" Or Cells(i, 1) = "x" Then
Cells(i, 2).Copy
Sheets("Tabelle2").Cells(Sheets("Tabelle2").Range("A65536").End(xlUp).Offset(1, 0).Row, 1).PasteSpecial Paste:=xlPasteValues
End If
Next
End SubIch hoffe, Du kommst klar. Bei Fargen melde Dich wieder.
Solltest Du nicht wissen, wie Du den Code in Deine Datei bekommst, dann schau mal auf meiner HP in der Rubrik Anleitungen und dort dann in der Anleitungsnummer 3 nach. Dort stelle ich dazu eine bebilderte Anleitung zur Verfügung, die Dir sicherlich helfen wird.
MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.