Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
800to804
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
800to804
800to804
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

VBA-Auswahl und löschen

VBA-Auswahl und löschen
11.09.2006 17:03:21
Ibn-Sina
Hallo,
ich habe eine Tabelle mit vielen vers. Daten. In einer Spalte sind "Nullen".
Ich möchte nun, dass excel das erste Feld der Spalte anwählt und die Zeilen in der Spalte nach "nullen" durchsucht und diese dann löscht oder etwas anderes eingibt (einen Text z.B, ist hier Geschmackssache).
Ich weiß das man das mit einer Do-loop schleife machen kann, ich aber fange erst mit VBA an und habe meine liebe Mühe und Not.
Vielleicht kann mir jmd. einen Tipp geben.
Danke schonmal.
Grüsse

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA-Auswahl und löschen
11.09.2006 17:08:18
Josef
Hallo Ibn-Sina!
Hier ein Beispiel für die Spalte "C".
Sub NullenLoeschen()
Dim rng As Range, rngU As Range

For Each rng In Range("C:C")
  If rng = 0 Then
    If rngU Is Nothing Then
      Set rngU = rng.EntireRow
    Else
      Set rngU = Union(rngU, rng.EntireRow)
    End If
  End If
Next

'löschen
If Not rngU = Nothing Then rngU.Delete
'oder
'If Not rngU Is Nothing Then rngU.Value = "Nicht mehr leer;-)"

End Sub


Gruß Sepp

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige