Hallo allerseits,
ich moechte mir von einem Excel-Sheets die letzte Spalte und die letzte Zeile ausgeben lassen, in der ein Wert steht. Sinn ist es, eine Routine NUR ueber diese Zellen laufen zu lassen, so dass ich nicht das ganze Sheet mit der Routine durcharbeiten muss und Zeit spare.
Danke,
Patrick
Hallo,
MaxColumn = Cells(1, Columns.Count).End(xlToLeft).Column
MaxRow = Cells(Rows.Count, 1).End(xlUp).Row
Das hätte dir Google aber auch gleich ausgespuckt!!
Scheint mir schon ein bischen nach Faulheit!
Bitte nächstes mal vorher besser Recherchieren!
Wenn ich dir jetzt was unterstellt habe: Sorry, dann weisst du wahrscheinlich noch nicht wie man seine Suchbegriffe wählen sollt.
Gruß Phil
Hi Phil,
danke fuer die schnelle Antwort. Ich habe gegoogelt, aber dann nach vielen Versuchen etwas genervt aufgegeben. Deine Antwort ist super, wenn ich z.B. die maximale Spalte einer bestimmten Zeile ausgeben moechte bzw. die maximale Zeile einer bestimmten Spalte. Mir geht es aber darum, diejenige Spalte auszugeben, die „insgesamt“, d.h. ueber alle Zeilen hinweg betrachtet, die letzte ist. (Das selbe mit den Zeilen.) Man koennte den von dir vorgeschlagenen Code zwar ueber alle Zeilen und Spalten laufen lassen und dann das Maximum ausgeben lassen, aber ich bilde mir ein, da gibt es zwei Konstanten, die die Werte gleich ohne Programmieraufwand ausgeben. Ich weiss Sie halt nur nicht mehr. (Bin auch momentan nicht wirklich mehr in VBA.)
Bin fuer Hinweise gern offen.
Beste Gruesse,
Patrick
Ok, Sorry!
Gib mal bei Google z.B. vba excel letzte spalte ein!
Am besten immer vba excel vor die Suchkriterien schreiben.
Zurück zum Thema:
Der Code oben reicht mir normalerweise, Excel bietet aber auch spezielle Objekte an. (glaube in relativ alten Versionen aber noch nicht)
Das sollte deine Frage beantworten:
MaxRow = Cells.SpecialCells(xlCellTypeLastCell).Row
MaxColumn = Cells.SpecialCells(xlCellTypeLastCell).Column
Gruß Phil
Super. Genau das, was ich gesucht habe. Ich danke dir!