Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Rows(Nummer)&":94".Delete????

Forumthread: Rows(Nummer)&":94".Delete?

Rows(Nummer)&":94".Delete?
01.11.2005 21:28:58
Gast
Hallo zusammen,
ich möchte Zeilen in verschiedenen Arbeitsblätter automatisch löschen.
Mit Nummer habe ich die letzte Zeile mit Daten ermittelt.
94 ist die letze Zeile die gelöscht werden soll (ab Zeile 94 befinden sich wieder Zeilen mit Daten die unbedingt zu erhalten sind).
Der Recorder wirf mir
"Rows("69:94").Select
Selection.Delete Shift:=xlUp" aus.
Wie gehe ichs am besten an?
Gruß Gast
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Rows("69:" & DeineVariable).Delete o.T.
01.11.2005 21:32:12
Ramses
...
AW: Rows(Nummer)&":94".Delete?
01.11.2005 21:32:52
Josef
Hallo Peter!
Rows(Nummer & ":94").Delete Shift:=xlUp

'******************************
'* Gruß Sepp
'*
'* Rückmeldung wäre nett!
'******************************

Anzeige
Danke ....
01.11.2005 21:43:46
Gast
Danke Sepp,
hatte "Shift:=xlUp" vergessen. (es funzt jetzt :-))))
Gruß aus Rheinhessen
Gast
AW: Danke ....
01.11.2005 21:46:11
Ramses
Hallo
"...hatte "Shift:=xlUp" vergessen..."
?
Dieser Zusatz ist nicht nötig, es funktioniert auch ohne korrekt.
Gruss Rainer
AW: Danke ....
01.11.2005 22:02:21
Gast
Hallo Rainer,
was ist nötig, was ist unnötig?
Ohne "Shift:=xlUp" hats bei mir nicht funktioniert!
Gruß Gast
Anzeige
AW: Danke ....
01.11.2005 22:09:52
Ramses
Hallo
Das muss funktionieren
Sie auch VBA-Online Hilfe.
Shift
Variant optional. Wird nur auf Range-Objekte angewendet. Gibt an, wie die umliegenden Zellen verschoben werden, um die gelöschten Zellen zu ersetzen. Zulässig ist eine der XlDeleteShiftDirection-Konstanten xlShiftToLeft oder xlShiftUp. Wenn dieses Argument ausgelassen wird, wählt Microsoft Excel einen Wert, der von der Form des ausgewählten Bereichs abhängt
Da Zeilen weder nach links, rechts oder nach unten gelöscht werden können, wählt EXCEL automatisch "xlup",... sofern man dazu "wählen" sagen kann ;-)
Auch das
Range("A2").EntireRow.Delete
funktioniert problemlos.
Gruss Rainer
Anzeige
AW: Danke ....
01.11.2005 22:16:04
Gast
Hallo Rainer,
mag ja alles sein, Danke für die Belehrung ;-))), dass meine ich Positiv!!!
Bei mir hats nicht gefunzt! Liegt vieleich da dran, dass ich mal wieder fast den ganzen Feirtag geexcelt habe. Das alles nur um es auf der Arbeit leichter zu haben.
Auch Dir ein DANKE!
Gruß Gast
Anzeige

Forumthreads zu verwandten Themen

Anzeige