Daten kopieren mit Bedingung

Forumthread: Daten kopieren mit Bedingung

07.08.2008 11:28:56

Jens

Hallo Excelfreunde,
ich möchte aus einer Datei nur bestimmte Daten herauskopieren und in eine neue Arbeitsmappe
einfügen.
Es sollen nur die Zeilen in eine neue Arbeitsmappe kopiert werden, wo in Spalte J rechstbündig = "Summe" steht.
Wer kann mir helfen?
Besten Dank im voraus.
Jens

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Daten kopieren mit Bedingung

07.08.2008 11:55:45

Hanz
AW: Daten kopieren mit Bedingung

07.08.2008 13:34:57

Jens

AW: Daten kopieren mit Bedingung

07.08.2008 11:55:45

Hanz

Hallo Jens,
mit dieser Schleife sollte es gehen:


Sub Jens
For i = 1 To 1000
If Cells(i, 10).Value = "Summe" And Cells(i, 10).HorizontalAlignment = xlRight Then
'Hier den Kopierbefehl rein
End If
Next
End Sub

Gruß Worti

AW: Daten kopieren mit Bedingung

07.08.2008 13:34:57

Jens

Hallo Excelfreund,
herzlichen Dank für die schnelle Hilfe.
Einen schönen Tag
wünscht Jens

Forumthread: Daten kopieren mit Bedingung

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread