Neue Zeile am Ende einer Liste hinzufügen



Excel-Version: XL9
nach unten

Betrifft: Neue Zeile am Ende einer Liste hinzufügen
von: Hajo
Geschrieben am: 28.06.2002 - 09:29:22

Hallo Excel-Fans!

Gibt es einen einfachen VBA-Code, mit dem ich eine neue Datenzeile am Ende einer Liste (unbekannter Länge) hinzufügen kann? Muß ich dazu erst die Länge der Liste ermitteln, oder gibt es einen Befehl, der wie bei Datenbanken einen neuen Datensatz einfach am Ende hinzufügt?

Ich bin für jeden Hinweis dankbar.


nach oben   nach unten

Re: Neue Zeile am Ende einer Liste hinzufügen
von: Hajo_Zi
Geschrieben am: 28.06.2002 - 09:33:48

Hallo Hajo

Du mußt die letzte Zeile erst feststellen die sicherste Methode für Spalte A ist


If [a65536] = "" Then
    letzte = [a65536].End(xlUp).Row
Else
    letzte = 65536
End If

da [A65536].End(xlUp).Row verursacht aber fehler wenn 65536 nicht leer


Gruß Hajo


nach oben   nach unten

Re: Neue Zeile am Ende einer Liste hinzufügen
von: @lex
Geschrieben am: 28.06.2002 - 09:45:46

Hallo Hajo !
Kurze Frage an "Herber 2" :-)
Warum ist Dein Code im Vergleich zu
Cells(Rows.Count,1).End(xlup).Row
die sicherere Methode ?
Ich dachte immer der Cells-Befehl ist durch nix zu erschüttern
VG,
Alex
nach oben   nach unten

Re: Neue Zeile am Ende einer Liste hinzufügen
von: Hajo_Zi
Geschrieben am: 28.06.2002 - 09:51:00

Hallo Alex

einfach testen ist die beste Lösung
Fülle zelle A65536

und lasse Beide Code laufen
beim ersten kommt 65536 und beim zweiten ???


Gruß Hajo


nach oben   nach unten

Re: Neue Zeile am Ende einer Liste hinzufügen
von: Martin Beck
Geschrieben am: 28.06.2002 - 09:55:18

Hallo Alex,

schreibe mal irgendwas in die Zelle A65536 und lasse Deinen Code laufen, dann siehst Du, was falsch ist.

Bei der Ausgangsfrage (Einfügen einer neuen Zeile nach der letzten belegten Zeile) gibt es aber sowieso Probleme, wenn die letzte belegte Zeile die letzte mögliche Zeile im Blatt ist ;-)

Gruß
Martin Beck


nach oben   nach unten

Überzeugt :-)
von: @lex
Geschrieben am: 28.06.2002 - 09:58:13

Gut, das kommt davon, wenn man noch nie 65536 Zeilen mit Daten gefüllt hat. :-)
Ist mit schon klar, warum zwei das eine funktioniert, das andere nicht.

VG,
Alex

nach oben   nach unten

Danke für die schnelle Hilfe
von: Hajo
Geschrieben am: 28.06.2002 - 10:10:48

Vielen Dank für den "wasserdichten" Code. Er hilft mir weiter.

Gruß vom Namensvetter ;)


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Kopieren und Verknüpfung"