Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
308to312
308to312
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Makro nur auf bestimmte Zeilen anwenden

Makro nur auf bestimmte Zeilen anwenden
17.09.2003 17:09:35
Floh
Hallo Excelexperten ,

Folgende Frage:
Habe ein Makro zum Löschen aufgezeichnet:


Sub löschen()
' löschen Makro
' Makro am 04.08.2003 von  floh aufgezeichnet
ActiveSheet.Unprotect
ActiveCell.Rows("1:1").EntireRow.Select
Selection.Delete Shift:=xlUp
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub


Wie bewerkstellige ich es, daß dieses Makro nur auf die Zeilen
14 bis 100 angewendet werden kann?

Mit freundlichen Grüßen
Floh

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro nur auf bestimmte Zeilen anwenden
17.09.2003 17:14:35
ChrisL
Hi Floh


Sub löschen()
ActiveSheet.Unprotect
ActiveCell.Rows("14:100").EntireRow.Delete Shift:=xlUp
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub


Gruss
Chris
AW: Makro nur auf bestimmte Zeilen anwenden
17.09.2003 17:16:36
ChrisL
oder hast du es so gemeint?


Sub löschen()
If ActiveCell.Row < 14 Or ActiveCell.Row > 100 Then Exit Sub
ActiveSheet.Unprotect
Rows(ActiveCell.Row).EntireRow.Delete Shift:=xlUp
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub


Gruss
Chris
Anzeige
AW: Makro nur auf bestimmte Zeilen anwenden
17.09.2003 17:32:49
Floh
Hallo Chris,

Die zweite Lösung,
ist perfekt.

Vielen, Vielen Dank !

335 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige