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

Auswahl

Auswahl
19.04.2007 15:14:46
Walter
Hallo Allerseits,
habe folgendes Makro:
For i = Cells(Rows.Count, 6).End(xlUp).Row To 4 Step -1
If Cells(i, 4).Value = "OB" Then
'Rows(i).Delete
wenn also in der Spalte 4 ein "OB" steht wird diese Zeile automatisch gelöscht, funktioniert soweit.
Nun komme ich weiter, da ich jetzt in der Spalte 7 nach vorhandener Nr. suchen
möchte. Immer wenn die Nr. mit einer 7 anfängt .
If Cells(i, 7).Value "7******" Then
leider werden alle Zeilen gelöscht. Die Zahl ist immer 9 Stellig, für ein Beispiel wäre ich dankbar,
wenn möglich als 2. für die andere Mappe die 6+7, wenn also die Zahl mit 6 oder 7 anfängt dann...
mfg walter

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

Betreff
Datum
Anwender
Anzeige
AW: Auswahl
19.04.2007 15:36:05
Beate
Hallo Walter,
Sub Test()
For i = Cells(Rows.Count, 6).End(xlUp).Row To 4 Step -1
    If Cells(i, 7).Value >= 700000000 And Cells(i, 7).Value < 800000000 Then
        Rows(i).Delete
    End If
Next
End Sub

Gruß,
Beate

Anzeige
Hallo Beate klappt! Danke o.t.
19.04.2007 16:17:00
Walter
Hallo Beate,
herzlichen dank für dieUnterstützung,
mfg Walter

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige