Letzte benutzte Zeile einer Mappe

3 Antworten zu dieser Frage

1. Antwort von nach 20 Minuten 0 hilfreich

   Re: Letzte benutzte Zeile einer Mappe

   such Dir eine aus...
   

   Public Sub letzte_zeile_1()
   'Hier wird die letzte Zeile ermittelt
   'Egal in welcher Spalte sich die letzte Zeile befindet
   'Es werden alle Spalten geprüft und die letzte Zeile ausgegeben
   letztezeile = Sheets(1).UsedRange.SpecialCells(xlCellTypeLastCell).Row
   MsgBox letztezeile
   End Sub
   
   
   Public Sub letzte_zeile_2()
   'Hier wir die letzte Zeile der Spalte A ermittelt
   letztezeile = ActiveSheet.Cells(65536, 1).End(xlUp).Row
   MsgBox letztezeile
   End Sub
   
   
   Public Sub letzte_zeile_3()
   'Hier wir die letzte Zeile der Spalte A ermittelt
   letztezeile = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
   MsgBox letztezeile
   End Sub
   
   
   Public Sub letzte_spalte_1()
   'Hier wird die letzte Zeile ermittelt
   'Egal in welcher Spalte sich die letzte Zeile befindet
   'Es werden alle Spalten geprüft und die letzte Zeile ausgegeben
   letztespalte = Sheets(1).UsedRange.SpecialCells(xlCellTypeLastCell).Column
   MsgBox letztespalte
   End Sub
   
   
   Public Sub letzte_spalte_2()
   'Hier wird die letzte spalte der Zeile 4 ermittelt
   letztespalte = Sheets(1).Cells(4, 256).End(xlToLeft).Column
   MsgBox letztespalte
   End Sub
   
   
   Public Sub letzte_zelle_1()
   'Mit diesem Makro wird die Adresse der letzten Zelle (Zeile, Spalte) ermittelt
   letztezelle = Range("A1").SpecialCells(xlCellTypeLastCell).Address
   MsgBox letztezelle
   End Sub
   
   
   Public Sub letzte_zelle_2()
   'Mit diesem Makro wird die letzte Zelle markiert
   Range("A1").SpecialCells(xlCellTypeLastCell).Select
   End Sub
   

   
   

2. Antwort von nach 9 Stunden 2 hilfreich

   Re: Letzte benutzte Zeile einer Mappe

   Hallo Stucki,
   es gibt eine VBA-Anweisung "Zeilennummer, die den letzten
   Eintrag enthält, ermitteln",
   das geht auch ganz einfach mit einer Formel:
   
   =VERGLEICH(;A:A;-1)
   -> gibt die Zeilennummer aus, die den letzten Eintrag enthält
   
   weiters:
   
   =INDIREKT("A"&VERGLEICH(;A:A;-1))
   -> gibt den Inhalt der letzten Zeile aus
   
   lg, Jerry
   

   • Antwort von nach 19 Stunden 0 hilfreich

     stop!

     das stimmt so nicht ganz...
     es ist der letzte WERT(!) in der Spalte, der gefunden wird.
     Wenn da Texte stehen ist die Formel nicht zu verwenden.
     
     Trotzdem danke für den Tipp!