Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.06.2024 19:56:24
17.06.2024 19:39:46
Anzeige
Archiv - Navigation
1680to1684
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

gefilterte Spalten löschen

gefilterte Spalten löschen
25.03.2019 10:33:27
Okan
Guten Tag,
ich habe folgendes Anliegen.
Ich würde gerne die gelilterten Datensätze in ein anderes Tabellenblatt kopieren und die aus der Stammtabelle löschen.
Beim aufzeichnen der Arbeitsabläufe wurde mir u.a. nach leichter bearbeitung folgendes als Makro vorgeschlagen:
Sub DATEN()
Columns("A:A").Select
Selection.Delete Shift:=xlToLeft
Range("1:1,3:3").Select
Range("A3").Activate
Selection.Delete Shift:=xlUp
Range("A1:I1").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$I$5507").AutoFilter Field:=2, Criteria1:="101263"
Cells.Select
Selection.Copy
Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Paste
Sheets("Tabelle1").Select
Sheets("Tabelle1").Name = "Ort"
Sheets("Stammdaten").Select
Rows("145:5337").Select 'kritisch muss Variabel sein / Alle Datensätze welche offen sind lö _
schen
Application.CutCopyMode = False
Selection.Delete Shift:=xlUp
ActiveSheet.Range("$A$1:$I$5465").AutoFilter Field:=2
ActiveSheet.Range("$A$1:$I$5465").AutoFilter Field:=1, Criteria1:= _
"
Ich bedanke mich im Voraus.

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

Betreff
Datum
Anwender
Anzeige
AW: gefilterte Spalten löschen
25.03.2019 17:43:45
cysu11
Hi Okan,
lade doch bitte deine Beispieldatei hoch, da tun wir uns alle leichter Dir zu helfen!
LG
Alexandra
AW: gefilterte Spalten löschen
26.03.2019 10:52:40
Okan
Guten Tag Alexandra,
ich hab das Problem lösen können.
Dennoch damnke für die Rückmeldung.
VG
Okan
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige