Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1320to1324
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

VBA kopieren gefilterte Daten

VBA kopieren gefilterte Daten
22.07.2013 13:50:50
Christopher
Grüß Euch Leute,
ich habe ein Problem. Ich habe eine Tabelle die unterschiedlich gefiltert wird.
Dann und wann möchste ich den Inhalt der Tabelle sichern. leider kopiert er nur die Gefilterten Daten. Ich hab schon ne ganze Weile gesucht find aber nur Leute die genau das gegenteilige Problem haben. Wenn ich z.B. Liste habe A1:V500 und gefiltert zeigt es z.B. A1:V25 an wird auch nur dieser Bereich kopiert.
Sub kopieren()
With Tabelle1
Tabelle9.Range("A1:AA800").Clear
.Range("A18:V628").Copy
Tabelle9.Range("A1").PasteSpecial xlPasteValues
End With
End Sub

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA kopieren gefilterte Daten
22.07.2013 13:55:47
UweD
Hallo
so als Tipp...
- Lege eine Kopie der Tabelle an
- nimm den Filter dort raus,
- Kopiere dann diese Daten für deine Sicherung
- lösche die temporäre Tabelle wieder weg
Das ganze natürlich per VBA
Gruß UweD

AW: VBA kopieren gefilterte Daten
22.07.2013 14:33:34
Christopher
mpf da hätt ich ja auch drauf kommen können.
Dachte es gibt noch eine Möglichkeit über Specialcells(xlblabla) aber ich denk genau das geht nicht.
Dank Dir !!!

AW: VBA kopieren gefilterte Daten
22.07.2013 16:21:46
Rudi
Hallo,
eine Mäglichkeit:
Sub aaa()
Application.ScreenUpdating = False
ActiveWorkbook.CustomViews.Add "temp", True, True
If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData
Sheets(2).Cells.ClearContents
Cells(1, 1).CurrentRegion.Copy Sheets(2).Cells(1, 1)
With ActiveWorkbook.CustomViews("temp")
.Show
.Delete
End With
End Sub

Gruß
Rudi
Anzeige

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige