Thema Datum  Von Nutzer Rating
Antwort
04.07.2022 09:42:32 Gast63261
NotSolved
04.07.2022 10:27:26 ralf_b
NotSolved
04.07.2022 10:34:09 Gast11635
NotSolved
04.07.2022 10:40:48 ralf_b
NotSolved
04.07.2022 11:01:41 Gast14653
NotSolved
Blau Alle Werte unter einem bestimmten Wert in der Spalte löschen
04.07.2022 12:03:52 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
ralf_b
Datum:
04.07.2022 12:03:52
Views:
114
Rating: Antwort:
  Ja
Thema:
Alle Werte unter einem bestimmten Wert in der Spalte löschen

ok, die Anzahl der Schleifendurchläufe ist 2 

weil For i = lngLetzte To lngLetzte - 2 Step -1

lngLetzte ist die Zeilennummer der letzten belegten Zeile. Damit fängt die Schleife an und geht  bis zum to-Wert der ist lngLetzte -2 

Du zeigst eine Beispielliste mit mindesens 20 Zeilen, und behauptest das die Schleife 10 Durchläufe hat. 

Du verstehst sicher das ich deshalb etwas skeptisch bin.  Aufgrund der deutlicheren Erklärung komme ich auf diese Lösung. 

Sub werteloeschen()
 
 Dim i As Long
 i = 1
 
 Do While Cells(i, "P").Value >= 0
  i = i + 1
 Loop
  
 Range(Cells(i, "P"), Cells(i, "P").End(xlDown)).ClearContents
 Range(Cells(i, "I"), Cells(i, "I").End(xlDown)).ClearContents
  
End Sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
04.07.2022 09:42:32 Gast63261
NotSolved
04.07.2022 10:27:26 ralf_b
NotSolved
04.07.2022 10:34:09 Gast11635
NotSolved
04.07.2022 10:40:48 ralf_b
NotSolved
04.07.2022 11:01:41 Gast14653
NotSolved
Blau Alle Werte unter einem bestimmten Wert in der Spalte löschen
04.07.2022 12:03:52 ralf_b
NotSolved