Anzeige
Archiv - Navigation
112to116
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
112to116
112to116
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Makro letzte Zeile

Makro letzte Zeile
12.04.2002 07:01:24
Georg
Hallo,
mit nachfolgendem Makro lösche ich die Zeile, wenn in der Spalte F "AG" steht.
Das Makro fängt in der ersten Zeile bis zu 30000 an zu suchen und funktioniert.
Kann mir jemand helfen, dass das Makro in der letzten Zeile anfängt, also von unten nach oben.

Const Spalte = "F"
Const Zeilen = "30000"
Const Suchzeichen = "AG"


For x = Zeilen To 1 Step -1
If InStr(Range("F" & x), Suchzeichen) > 0 Then _
Rows(x & ":" & x).Delete Shift:=xlUp
Next x

Das würde den Ablauf beschleunigen.
Ich krieg das selber nicht hin.
Vielen Dank und Gruß; Georg

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

Betreff
Datum
Anwender
Anzeige
Re: Makro letzte Zeile
12.04.2002 07:21:27
Wasi
Moin,
Versuch Mal:


Dim Zeilen as Integer
Zeilen = 30000
Const Suchzeichen = "AG"

For x = Zeilen To 1 Step -1
If InStr(Cells(x,6), Suchzeichen) > 0 Then
ziel = x & ":" & x
Rows(ziel).Delete Shift:=xlUp
End If
Next x

Gruß

Uwe

Re: Makro letzte Zeile
12.04.2002 10:12:01
Georg
Hallo, Uwe

Erst mal vielen Dank für Deine Arbeit. Das war mal wieder ein Selbsttor bester Qualität von mir.
Ich suche die Abfrage der Spalte F von der letzten belegten Zeile ohne Bereichsangaben, da es schon mal nur 10000 Datensätze sein können.
Entschuldige die dusselige Problembeschreibung
Sorry und Gruß; Georg

Anzeige
Re: Makro letzte Zeile/off Topic
12.04.2002 11:44:17
Roland Köstring
Hi Peter,
Dein Posting passt irgendwie schlecht...
Dabei hast Du doch heute ganz andere Pflichten,
als beim herber zu posten ... ;-)
Roland

308 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige