Frage zu Reste
#1
Hallo,

habe eine sehr lange Spalte mit Zahlen
In der Spalte daneben stehen die Restemod3
Jetzt möchte ich, das alle Zeilen gelöscht werden, die nicht 2 mod 3 haben?

Wie kann ich das machen?
Antworten Top
#2
Hallo,
eine Tabelle wäre hilfreich.
Wir können nicht ins Blaue raten.

MfG Günter
Antworten Top
#3
(08.03.2023, 20:01)redeagle56 schrieb: Hallo,
eine Tabelle wäre hilfreich.
Wir können nicht ins Blaue raten.

MfG Günter

Beschreib ich so schlecht?

.xlsx   CleverexcelZeilö.xlsx (Größe: 19,51 KB / Downloads: 4)

Die gelben Zeilen sollen alle gelöscht werden, aber soweit, wie die Zahlen gehen, nicht nur die beiden, also alle 0mod3 und 1mod3
Antworten Top
#4
Hallo,

für Zahl A könntest du diese Formel verwenden...


Code:
=WENNFEHLER(INDEX($A$1:$A$3000;AGGREGAT(15;6;ZEILE($B$1:$B$3000)/(FINDEN(2;$B$1:$B$3000)>0);ZEILE(A1)));"")
Antworten Top
#5
Hallo,

per VBA z.B. so:

Code:
Sub Nur2Mod3()
  Dim i As Long, j As Long, k As Long
  Dim lngSpalten As Long, lngZeilen As Long
  Dim varQ As Variant, varZ As Variant
  varQ = Cells(1, 1).CurrentRegion.Value
  lngZeilen = UBound(varQ, 1)
  lngSpalten = UBound(varQ, 2)
  ReDim varZ(1 To lngZeilen, 1 To lngSpalten)
  For i = 2 To lngZeilen
    If varQ(i, 2) = 2 Then
      k = k + 1
      For j = 1 To lngSpalten
        varZ(k, j) = varQ(i, j)
      Next j
    Else
      If varQ(i, 4) = 2 Then
        k = k + 1
        For j = 1 To lngSpalten
          varZ(k, j) = varQ(i, j)
        Next j
      End If
    End If
  Next i
  Cells(2, 1).Resize(lngZeilen, lngSpalten).Value = varZ
End Sub

Gruß Uwe
Antworten Top
#6
Wieso nicht den Autofilter verwenden und das Filtrat in einem Rutsch löschen?
Schöne Grüße
Berni
Antworten Top
#7
(08.03.2023, 22:04)MisterBurns schrieb: Wieso nicht den Autofilter verwenden und das Filtrat in einem Rutsch löschen?
Danke erst mal an alle, Kümmer mich morgen weiter drum... Was Mister Burns ist Autofilter?
Antworten Top
#8
Eigeninitiative ist durchaus erlaubt, die Stichworte "Excel Autofilter" in der Suchmaschine deiner Wahl bringen dir hervorragende Ergebnisse.
https://support.microsoft.com/de-de/offi...ab61133d92
Schöne Grüße
Berni
Antworten Top
#9
Was Mister Burns ist ein Filtrat ?
Zum übersetzen von Excel Formeln:

http://dolf.trieschnigg.nl/excel/index.p...gids=en+de
Antworten Top
#10
Hi

Filtrat ist das, was beim Filtern übrig bleibt, sowohl in Excel als auch im richtigen Leben.
Gruß

Edgar

Meine Antworten sind freiwillig und ohne Gewähr!
Über Rückmeldungen würde ich mich freuen.
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste