Anzeige
Archiv - Navigation
1524to1528
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
Inhaltsverzeichnis

Wenn Zellenwert kleiner 0 dann Inhalt löschen

Wenn Zellenwert kleiner 0 dann Inhalt löschen
10.11.2016 21:45:09
Tyroler
Hallo Zusammen,
bräuchte bitte eure Unterstützung.
und zwar möchte ich, dass die Spalte P in Tabelle2 ausgewählt wird und und alle Werte kleiner 0 gelöscht werden.
Iwie komm ich gerade nicht weiter...
Vielen Vielen Dank!!
Tyroler

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wenn Zellenwert kleiner 0 dann Inhalt löschen
10.11.2016 23:01:33
Matthias
Hallo
evtl. hilft Dir das:
Option Explicit
Sub kleinerNull()
Dim rng As Range
For Each rng In Tabelle2.Range("P1:P28") 'Bereich anpassen!
If rng 
Gruß Matthias
AW: Wenn Zellenwert kleiner 0 dann Inhalt löschen
10.11.2016 23:02:40
Werner
Hallo Tyroler,
beispielsweise so:
Public Sub Löschen()
Dim loLetzte As Long
Dim raBereich As Range
Dim raZelle As Range
Application.ScreenUpdating = False
loLetzte = Sheets("Tabelle1").Cells(Rows.Count, 16).End(xlUp).Row 'Tabelle anpassen
Set raBereich = Sheets("Tabelle1").Range("P1:P" & loLetzte) 'Tabelle anpassen
For Each raZelle In raBereich
If raZelle.Value 
Gruß Werner
Anzeige
AW: Wenn Zellenwert kleiner 0 dann Inhalt löschen
11.11.2016 14:06:40
Tyroler
Vielen Dank für die Hilfe.
funktioniert soweit.
es hat sich nun leider eine andere Anforderung ergeben, dass ich den Wert kleiner 0 von Spalte 16 einfach in Spalte 15 kopieren muss (Idealerweis in der gleichen zeile)
Wie müsste ich hier vorgehen?
Vielen Dank im Voraus
Grüße
Johannes
AW: Wenn Zellenwert kleiner 0 dann Inhalt löschen
11.11.2016 14:34:45
Werner
Hallo Tyroler
hier der geänderte Codeteil:
For Each raZelle In raBereich
If raZelle.Value 
Ist aber ungetestet.
Gruß Werner

208 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige