Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
884to888
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
884to888
884to888
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zeile Löschen wenn =SUM in Zeile

Zeile Löschen wenn =SUM in Zeile
13.07.2007 14:52:00
Martin
Hallo,
ich bekomme es nicht hin, dankbar für jeden Tipp:
Suche ein VBA Code der durch ein Blatt geht und jede ZEILE löscht in der sich irgendeine ZELL befindet in dem die Summenfunktion ("=SUM(") verwandt wird. Verwende engl. Excel desegen die "SUM".
Wie geht das, würde mir sehr helfe!
Martin

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile Löschen wenn =SUM in Zeile
13.07.2007 15:18:09
Dan
Hallo, ein Beispiel hier. Obwohl es geht bestimmt einfacher :-)
Option Explicit

Sub DeleteRowsWithSUM()
Dim used_range As Range
Dim one_cell As Range
Dim r As Long
Set used_range = ActiveSheet.usedRange
For r = used_range.Rows.Count To 1 Step -1
For Each one_cell In used_range.Rows(r).Cells
If (VBA.InStr(1, one_cell.Value, "SUM") > 0) Then
used_range.Rows(r).Delete
Exit For
End If
Next one_cell
Next r
End Sub


Gruss Dan, cz.

AW: Zeile Löschen wenn =SUM in Zeile
13.07.2007 16:43:00
Martin
SUPER! geht, VIELEN DANK!

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige