Supportnet / Forum / Tabellenkalkulation

Hallo, ich brauch Eure Hilfe!!!! Habe eine Tabelle die ich in regelmäßigen abständen aktualisiere. In Spalte A stehen dann die Auftragsnummer (Buchstaben und Zahlenkobination). Nach jeder Aktualisierung muss ich immer die gleichen Auftragsnummern löschen, da ich die nicht vorher abfiltern kann. Jetzut meine Frage: Kann ich per Makro die Aufträge löschen??? Das man in den Code die Auftragsnummern einträgt die man löschen will und nach der Aktualisierung das Makkro ausführt, so das die Zeilen mit den Aufträgen gelöscht wird. Vielen Dank für Eure Hilfe!!! Gruß Elhamplo

Hallo Elhamplo,
die Codes in ein Modul einfügen,
gefiltert wird Spalte A nach Eingabe (Input) werden die gefilterten Zeilen gelöscht.

Gruß
fedjo

Sub Autofilter()
Dim loLetzte As Long
Dim Name As String
Name = InputBox("Bitte Namen eingeben!")
Range("A1").Autofilter Field:=1, Criteria1:=Name
Range("A2:B65536").Cells.SpecialCells(xlCellTypeVisible)(1).Select
loLetzte = IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count)
Range("A2:A" & loLetzte).Select
Selection.Delete Shift:=xlUp
If ActiveCell.Value = "" Then
Selection.Autofilter
End If
End Sub

Public Sub Filteraus()
Selection.Autofilter
End Sub

Hallo,

danke für Deine Hilfe!!!

Der Code ist Super.

Jetzt habe ich noch eine Frage dazu. Kann man auch mehr als einen Namen bzw. Auftragsnummern eingeben???

Danke!!

Gruß

Elhamplo

Hallo,
der Autofilter erkennt nur einen Suchbegriff!

Gruß
fedjo

• 2 Tabellen vergleichen
• Formel: Zuordnung für Tabelle
• WENN-Formel
• Automatisch Zeilen löschen
• Excel - VBA: Variable Zellbezüge