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

VBA: Wenn Bedingung erfüllt dann ausschneiden

VBA: Wenn Bedingung erfüllt dann ausschneiden
31.07.2005 18:02:59
AndréL.
Hallo !
Ich möchte einen Bereich nach Zahlen die
kleiner als 0 und größer als 1000 durchsuchen.
Dann möchte ich, daß die gefundenen Zellen ausgeschitten
und eine Spalte nach rechts einfügen.
Die Abfrage klappt aber mit dem Ausschneiden
habe ich meine Probleme.
Wäre nett, wenn sich jemand das mal anschaut.
Mein Beginn:
For Each c In Range("BK6:BK2217")
If c.Value = 1000 Then '?
Next c
Danke
Gruß
AndréL.

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

Betreff
Datum
Anwender
Anzeige
AW: VBA: Wenn Bedingung erfüllt dann ausschneiden
31.07.2005 18:06:36
Matthias
Hallo André,
so?

If c.Value <= 0 Or c.Value >= 1000 Then c.Cut c.Offset(0, 1)

Gruß Matthias
AW: VBA: Wenn Bedingung erfüllt dann ausschneiden
31.07.2005 18:12:19
AndréL.
Hallo Matthias,
das funzt genauso wie ich es haben wollte!
Vielen Dank
und schönen Sonntag noch.
Gruß
AndréL.
AW: VBA: Wenn Bedingung erfüllt dann ausschneiden
10.08.2005 15:49:14
Jo
Hallo,
ich würde gerne ganze Zeilen ausschneiden und zwar in Abhängigkeit, ob in der Spalte der jeweiligen Zeile eine 9 oder eine 0 steht. Also bei 9 ausschneiden...
Vielen Dank!
Gruß
Joachim
Anzeige

306 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige