Zeile finden..Zeile löschen Marko

[atilla]

Hallo,

bitte nicht immer zitieren.

Zum Dateien einstellen lies bitte hier: http://www.clever-excel-forum.de/Thread-...ng-stellen

[Brodiak]

habe ne Lösung gefunden.. etwas aufgezeichnet und etwas VBA :100:
Danke für die Bemühungen


Sub Rahmen_entfernen()
  Sheets("Lieferungen").Select
' suchen Makro
    Cells.Find(What:="2H6803017B", After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
       
       
 'markieren Makro
 
 Selection.EntireRow.Select
 
  'löschen Makro
 
Selection.Delete Shift:=xlUp
End Sub

[atilla]

Hallo,

na, dann warten wir erst mal ab.