Office: Logik eines Befehls letzte Zeile

Code:

Hallo zusammen

oben ist eine Definition in einem meiner Makros. Ich hatte in diesem Forum das angefragt, wie die letzte Zeile angegangen werden kann, um anschliessend eine If-Schleife laufen zu lassen, um bspw. Zeilen mit leeren Zellen in Spalte C zu löschen (von unten nach oben).
Ich brauche hier eure Hilfe, um die Logik dieses Befehls zu verstehen.

Wie exakt funktioniert die Findung der letzten Zeile (lngLetzte)? Geht es runter in die erste ausgefüllt Zelle in Spalte ...A? B? Gar keine Prüfung, in welcher Spalte das erste Mal etwas ausgefüllt ist?


Danke vorab für eure Hilfe.

Grüsse

Vrille

:)

 

Ganz ähnlich ebenso heute, von der Logik her jedoch einfacher:

https://www.ms-office-forum.net/foru...d.php?t=368658

 

Moin,
deine letzte Annahme ist richtig. Es wird nicht geprüft, in welcher Spalte die längste Spalte ist. Schau gerne auch mal hier für andere Möglichkeiten.

 

Hallo,

ergänzend zum Link auf Günthers (übrigens sehr gute) Seite in #3, noch folgende sehr kurze Übersicht zum Thema:
https://www.excel-inside.de/vba-loes...-vba-ermitteln

 

Hallo und vielen lieben Dank euch beiden.

Die Links haben mir geholfen.

Wenn es keine Umstände macht, möchte ich eine neue Herausforderung grad mit einpacken, die nur ein wenig mit der letzten Anfrage zu tun hat.

In meinem Makro ziehe ich über eine SVerweis Werte in eine Spalte. Bei Mismatches gibt es das berühmte "#N/A".

Eine If-Schleife "suche #N/A und lösche die Zeile, wo entweder #N/A enthalten oder nicht ein gewisser Wert" funktioniert nicht. Auch dann nicht, wenn die komplette Spalte kopiert und als Wert eingefügt wird.

Also habe ich Ersetzen aus einem anderen Makro kopiert (ersetze #, dann ersetze N/A, dann ersetze 0" über die Spalte mit dem Sverweis, aber der SVerweis ist kopiert und mit Werte gepastet worden vorher).


Noch dubioser ist, dass eine If-Schleife, nach dem Ersetzen der "#N/A" zu einer leeren Zelle, nicht funktioniert. Wenn ich diese If-Schleife mit F8 laufen lasse, überspringt er den Schritt und geht grad zum nächsten Befehl über.

Sind die Zellen garnicht leer?


Hier mal ein Auszug des Ersetzens und der nachfolgenden If-Schleife

Code:

Da bewegt sich wirklich nicht viel nach dem Ersetzen...

Danke euch vielmals*Smilie

 

Probier es mal so:
Code:

Einzelne Zeilen zu löschen kann bei einer größeren Tabelle sehr langsam werden!

Bessere Varianten wären z. B. :
-Autofilter verwenden und vor dem Löschen die Zeilen wegfiltern, die nicht gelöscht werden sollen
-Die zu löschenden Zeilen/Zellen in eine Range-Variable speichern (mit UNION) und diese dann für das Löschen verwenden

 

Hallo Michael

recht herzlichen Dank. Es hat geklappt, aber es braucht recht lange, da über 10'000 Zeilen gross. Das ist nur ein Nebenbeieffekt, wenn man ganze Datenbanken plündert *wink.gif*

Gruss

Vrille